ASP
lionel1982
...
展开
-
ASP常用对象
Connection1.AccessSet conn=Server.CreateObject("ADODB.Connection")connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("db1.mdb")conn.Open connstrconn.closeset conn=nothing2.SQLd原创 2006-11-20 00:47:00 · 696 阅读 · 0 评论 -
递归
递归:函数自己调用自己function selfCall(n) if n>0 then selfCall=selfCall(n-1)*n else selfCall=1 end if end function response.write "5!="&selfCall(5) %> 运行结果: 5!=120转载 2006-11-20 00:56:00 · 675 阅读 · 0 评论 -
asp上传大文件的设置
在Windows2003中ASP上传的附件大小的限制为200K,所以经常会出现这样的错误提示:Request 对象 错误 ‘ASP 0104 : 80004005‘。 解决方法:更改win2003的IIS 6.0对asp的上传文件大小为200k限制,aspx的上传程序没有影响。在IIS6.0中,默认设置是特别严格和安全的,最大只能传送 204,800 个字节,这样可以最大限度地减少因以前太转载 2006-11-20 01:23:00 · 954 阅读 · 0 评论 -
Jmail组件应用实例
Sub SendMail (mail_to,mail_subject,mail_body)On Error Resume NextDim JMailuserip = Request.ServerVariables("HTTP_X_FORWARDED_FOR") If userip = "" Then userip = Request.ServerVariables("REMOTE_ADDR")原创 2006-11-20 01:33:00 · 861 阅读 · 0 评论 -
文件下载函数
Function downloadFile(strFile)strFilename=server.MapPath(strFile)Response.Buffer=TrueResponse.ClearSet s=Server.CreateObject("ADODB.Stream")s.Opens.Type=1on error resume nextSet fso=Server.CreateObjec转载 2006-11-20 01:36:00 · 687 阅读 · 0 评论 -
ASP组件应用实例
1)VB6.0新建工程ActiveX DLL,引用“microsoft active server pages object library”和“microsoft activeX data objects 2.1 library”,工程名改为myDll,将类模块的名称改为myClass,.cls文件内容如下:Public Function sayHello(userName) sayH原创 2007-06-29 23:33:00 · 618 阅读 · 0 评论 -
asp正则表达式常用方法
<br />RegExp就是建立正则的对像。 <br />如: <br />Set regEx = New RegExp <br />regEx.Pattern 就是来设置正则的模式的, <br />如: <br />regEx.Pattern ="/d+" <br />regEx.IgnoreCase = True ' 设置是否区分大小写 <br />regEx.Global = True ' 设置全程可用性。 <br /><br />RegExp对像有3种方法,分别是execute、test、repla原创 2010-07-22 10:23:00 · 546 阅读 · 0 评论 -
ASP中如何使用正则表达式及实例讲解
<br />在我们编写ASP程序时,经常会判断一个字符串的有效性,如;一个串是否是数字、是否是有效的Email地址等等。如果不使用正则表达式,那么判断的程序会很长,并且容易出错,如果使用正则表达式,这些判断就是一件很轻松的工作了。后面我们将介绍如何判断数字和Email地址的有效性。<br />一、正则表达式概述 <br />如果原来没有使用过正则表达式,那么可能对这个术语和概念会不太熟悉。不过,它们并不是您想象的那么新奇。<br />请回想一下在硬盘上是如何查找文件的。您肯定会使用 ? 和 * 字符来帮助查转载 2010-07-22 10:45:00 · 564 阅读 · 0 评论 -
asp读取IP库(dat文件)
' ============================================ ' 返回IP信息 ' ============================================ Function Look_Ip(IP) Dim Wry, IPType, QQWryVersion, IpCounter ' 设置类对象 Set Wry = New TQQW转载 2011-11-30 13:16:38 · 674 阅读 · 0 评论