‘#################################### ‘函数：ishttp[str] ‘参数：str，待处理的字符串 ‘作者：木木 ‘日期：2007/7/12 ‘描述：检测HTTP连接地址或地址栏是否以HTTP开头 ‘示例： ‘#################################### Function ishttp(str) Dim regEx Set regEx = New RegExp regEx.Pattern = “^(http|HTTP)[A-Za
