摘要： 这个class主要用于操作asp中的xmlhttp。首先是类定义 Cls_AspHttp.asp：<%''=================================================================''飞扬远程获取类(AspHttp) 1.0.1 Bate1''By 奔腾的心''2006-04-19''=================================================================Class FlyCms_AspHttpP 阅读全文

摘要： 数据库连接：以下为引用的内容：<%set conn=server.createobject("adodb.connection")conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("数据库名")%>打开数据库：以下为引用的内容：exec="select * from 数据库表"set rs=server.createobject("adodb.recordset")rs.open 阅读全文

摘要： IsNumeric 函数IsNumeric 函数 返回 Boolean 值指明表达式的值是否为数字。 语法 IsNumeric(expression) expression 参数可以是任意表达式。 说明 如果整个 expression 被识别为数字，IsNumeric 函数返回 True；否则函数返回 False。 如果 expression 是日期表达式，IsNumeric 函数返回 False。<%a=1234response.write(isnulmeric(a))b="www.rihanshop.com"response.write(isnulmeric(b) 阅读全文

摘要： '[读取文本文件] '函数名：ReadTextFile '作 用：读取文本文件 '参 数：Fname ---- 文本文件名称（包括路径） '返回值：返回读取的文本内容 '************************************************** Public Function ReadTextFile(ByVal Fname) Dim M_fso,FnameN,Fnr ReadTextFile="" Set M_fso = CreateObject("Scripting.FileSystem 阅读全文