asp
文章平均质量分 66
caobin518
这个作者很懒,什么都没留下…
展开
-
E_mail地址判断函数
判断E_mail输入是否正确 Function IsValidE_mail(E_mail) 判断E_mail地址中是否有@符号,如果没有@符号或者@符号在E_mail字符第一个或最后一个,则函数都返回False,并退出函数。 E_mailArray=Sp原创 2005-08-10 17:19:00 · 1597 阅读 · 0 评论 -
SQL注入研究
请勿用于非法用途,本代码只是为了让广大ASP爱好者明白原理,防范于未然。Function bytes2BSTR(vIn)dim strReturndim i,ThisCharCode,NextCharCodestrReturn = ""For i = 1 To LenB(vIn)ThisCharCode = AscB(MidB(vIn,i,1))If ThisCharCode strReturn原创 2006-03-06 10:02:00 · 642 阅读 · 0 评论 -
ASP程序中同一个用户不允许同时登陆两次
if request.Form.count>0 then session("username")=request("username")application(session("username"))=session.SessionIDresponse.Redirect("index.asp")end if%>其他需要认证的页面index.asp:if application(session("u原创 2006-03-06 09:49:00 · 688 阅读 · 0 评论 -
无组件生成BMP验证码(转)
Call Com_CreatValidCode("ValidCode")Sub Com_CreatValidCode(pSN)Author: LayenQQ: 84815733E-mail: support@ssaw.net 禁止缓存Response.Expires = -9999 Response.AddHeader "Pragma","no-cache"Response.A原创 2006-03-06 09:37:00 · 607 阅读 · 0 评论 -
IIS不支持ASP的解决办法
有的朋友在用了一段IIS后会出现500错误,即使重新安装也会出现问题,下面是我遇到的错误情况和解决办法,分享给大家,希望能给有同样困惑或者将来会有同样困惑的朋友一点帮助错误特征: Server Application ErrorThe server has reached the maximum recovery limit for the application during the proce转载 2006-04-16 14:33:00 · 1833 阅读 · 0 评论 -
iis经常出现的问题
1.IIS访问ASP页面时报错The requested resource is in use.的解决方法家一定对:ASP页面时报错The requested resource is in use.的问题很头痛吧.我也遇到了一样的问题.大家一起来分享一下吧!!!IIS访问ASP页面时报错The requested resource is in use.的解决原创 2006-04-23 09:55:00 · 1270 阅读 · 0 评论 -
ASP中取得图片宽度和高度的类(无组件)
Class ImgWHInfo 获取图片宽度和高度的类,支持JPG,GIF,PNG,BMP Dim ASO Private Sub Class_Initialize Set ASO=Server.CreateObject("ADODB.Stream") ASO.Mode=3 ASO.Type=1 ASO.Open End原创 2006-04-28 00:20:00 · 617 阅读 · 0 评论 -
数据库类
1、功能 正如前面所说,这个类的目的是把ADODB.Connection、Adodb.Recordset等烦琐的操作封装起来并在类里实现错误处理。现在看看类的成员、属性和方法: 1)成员:(没有公有或保护成员) 2)属性: ClassName-返回类名 Version-返回版本 LastError-返回最后的错误 IgnoreError-设置/返回是否忽略数据库错误原创 2006-04-28 00:06:00 · 783 阅读 · 0 评论 -
asp发送邮件
首先是jmail.smtpmail的核心代码:Set jmail = Server.CreateObject("JMAIL.SMTPMail") 创建一个JMAIL对象jmail.silent = true JMAIL不会抛出例外错误,返回的值为FALSE跟TRUEjmail.logging = true 启用使用日志jmail.Charset = "GB2312" 邮件文字的代码转载 2006-05-13 19:16:00 · 1400 阅读 · 0 评论 -
防注入(特别是:上传防止注入)
近来,网络上的SQL Injection 漏洞利用攻击,JS脚本,HTML脚本攻击似乎逾演逾烈.陆续的很多站点都被此类攻击所困扰,并非像主机漏洞那样可以当即修复,来自于WEB的攻击方式使我们在防范或者是修复上都带来了很大的不便。HOOO…… 一个站长最大的痛苦莫过于此.自己的密码如何如何强壮却始终被攻击者得到,但如何才能做到真正意义上的安全呢?第一,别把密码和你的生活联系起来;第二,Superma转载 2006-05-16 00:07:00 · 3307 阅读 · 2 评论 -
2003服务器防止海洋木马的安全设置
删除以下的注册表主键:WScript.ShellWScript.Shell.1Shell.applicationShell.application.1WSCRIPT.NETWORKWSCRIPT.NETWORK.1regsvr32 /u wshom.ocx回车、regsvr32 /u wshext.dll回车Windows 2003 硬盘安全设置c:/administrators 全部转载 2006-05-25 22:33:00 · 658 阅读 · 0 评论 -
2003服务器防止海洋木马的安全设置
删除以下的注册表主键:WScript.ShellWScript.Shell.1Shell.applicationShell.application.1WSCRIPT.NETWORKWSCRIPT.NETWORK.1regsvr32 /u wshom.ocx回车、regsvr32 /u wshext.dll回车Windows 2003 硬盘安全设置c:/administrators 全部转载 2006-05-25 22:33:00 · 710 阅读 · 0 评论 -
2003服务器防止海洋木马的安全设置
删除以下的注册表主键:WScript.ShellWScript.Shell.1Shell.applicationShell.application.1WSCRIPT.NETWORKWSCRIPT.NETWORK.1regsvr32 /u wshom.ocx回车、regsvr32 /u wshext.dll回车Windows 2003 硬盘安全设置c:/administrators 全部转载 2006-05-25 22:33:00 · 644 阅读 · 0 评论 -
字符串A在字符串B中重复的次数
<br />字符串A在字符串B中重复的次数 <br />1、(len(B)-len(replace(B,A, " ")))/len(A) <br />2、RepeatCount =Ubound(Split(YourStr,CheckStr))-1转载 2011-03-16 15:56:00 · 1286 阅读 · 0 评论 -
建站系统
建站系统:www.dvbbs.com建站系统:http://www.dedecms.com/转载 2013-04-11 11:42:26 · 862 阅读 · 0 评论 -
一个非常简洁的验证码程序(转载)
Response.Buffer = TrueWith Response.Expires = -1.AddHeader "Pragma","no-cache".AddHeader "cache-ctrol","no-cache"End WithDim a(10,10)a(0,1) = "0x3c" 数字0a(0,2) = "0x66"a(0,3) = "0xc3"a(0,4) = "0xc3"原创 2006-03-06 09:52:00 · 677 阅读 · 0 评论 -
ASP中取得图片宽度和高度的类(无组件)
Class ImgWHInfo 获取图片宽度和高度的类,支持JPG,GIF,PNG,BMP Dim ASO Private Sub Class_Initialize Set ASO=Server.CreateObject("ADODB.Stream") ASO.Mode=3 ASO.Type=1 ASO.Open End原创 2006-03-06 09:45:00 · 769 阅读 · 0 评论 -
几个比较好用的asp检查函数
因为比较简单,我就不说什么了。一看就明白的! Function ChkStr(InString) If InStringInString=Replace(LCase(InString)," ","") InString=Replace(LCase(InString),";","") InString=Replace(LCase(InString),"","") InString=Replace原创 2005-08-14 23:15:00 · 847 阅读 · 0 评论 -
破解cmos密码
要说密码。首先就是CMOS密码了。CMOS(本意是指互补金属氧化物半体存储器,是一种大规模应用于集成电路芯片制造的原料)是电脑主板上的一块可读写的RAM芯片,主要用来保存当前系统的硬件配置。CMOS RAM芯片由系统通过一块后备电池供电,所以无论是开关机状态中,CMOS的信息都不会丢失。既然CMOS的信息不会丢失,那么它的安全性应该是很好了。所以,我们还是先来设置一下CMOS密码吧。 设置原创 2005-08-10 11:55:00 · 1709 阅读 · 0 评论 -
ASP常用函数一
dim db db="dbms.mdb" ****************************************************************** 执行sql语句,不返回值,sql语句最好是如下: update 表名 set 字段名=value,字段名=value where 字段名=value delete from 表名 where 字段名=valu原创 2005-08-10 16:51:00 · 604 阅读 · 0 评论 -
字体变大变小
//改变图片大小function resizepic(thispic){if(thispic.width>700) thispic.width=700;}//无级缩放图片大小function bbimg(o){ var zoom=parseInt(o.style.zoom, 10)||100; zoom+=event.wheelDelta/12; if (zoom>0) o.style.zo原创 2005-08-10 12:25:00 · 1507 阅读 · 0 评论 -
cint与int的区别
cint(0.5)=0cint(1.5)=2//////////取出与它最近的偶数int(0.5)=0int(1.5)=1/////////取整原创 2005-08-14 23:24:00 · 1473 阅读 · 0 评论 -
图片水印
sub jpegclass(imgurl,fontsize,family,isbold,top,left,content,Horflip) 调用过程名 Dim Jpeg,font_color,font_size,font_family,f_width,f_height,f_content,f_Horflip 建立实例 Set Jpeg = Server.Cr原创 2005-09-24 14:55:00 · 599 阅读 · 0 评论 -
Access 的最大容量
Access 的最大容量 以 Access 2000 中文版为例。打开帮助,找到以下条目: 设置和定义microsoft Access -> Microsoft Access 规格 Microsoft Access 数据库常规规格 Microsoft Access 数据库 (.mdb) 文件大小 2 G 字节。不过,由于数据库可以包括其他文件中的链接表,所以它的大小仅实际上只原创 2006-01-07 16:52:00 · 1012 阅读 · 0 评论 -
使文本框中只能输入:中文的js
New Document //JK_10000(JK) //zhaoxiaoyang(梅雪香)function keyPressInt(){ var e=window.event; var code=e.keyCode; alert(code); //可以输入a-z,A-Z,0-9,中文下的一切和BackSpace if(code ==116){ alert(); return false原创 2006-02-17 22:47:00 · 1131 阅读 · 0 评论 -
ASP开发规范
为了规范程序代码编写,提高代码可读性,降低后期维护成本,提高办公效率,建议以后编写的程序按以下几条规范进行: 一、 统一VBSCRIPT和ASP程序编写规范: (一)变量命名规则: 由于在ASP和VBSCRIPT中因为不需要声明变量,同时不能声明变量的类型,但为了提高代码的可读性,养成好的开发习惯,对于本系统开发的变量命名统一规则如下: 1. 使用Dim、Public、Privat原创 2006-02-18 20:21:00 · 743 阅读 · 0 评论 -
汉字转化为拼音(asp版)
原理,使用Dictionary技术1.添加索引2.遍历词典Set d = CreateObject("Scripting.Dictionary")d.add "a",-20319d.add "ai",-20317d.add "an",-20304d.add "ang",-20295d.add "ao",-20292d.add "ba",-20283d.add "bai",-20265d.add转载 2006-03-26 15:46:00 · 1180 阅读 · 0 评论 -
使用VBScript操作Html复选框(CheckBox)控件
这两天看到有朋友问起html内的各种控件怎么用script进行操作,现在自己也总结一下。因为项目原因,很多程序都是用VBScript写的,感兴趣的朋友可以改写成JavaScript,到时候别忘了共享一下啊,活活。 OK,切入主题,现介绍一下: 今天介绍使用VBScript判断复选框的选中数量和被选中的复选框的值。 在生成某个一览表时,比如一个订货单一览表,每条订货单记录前面可能会放置一个复选框,以转载 2006-03-28 12:48:00 · 1602 阅读 · 0 评论 -
在asp编写类
在 Class 块中,成员通过相应的声明语句被声明为 Private(私有成员,只能在类内部调用) 或 Public(公有成员,可以在类内外部调用) 。被声明为 Private 的将只在 Class 块内是可见的。被声明为 Public 不仅在 Clas原创 2006-02-18 19:27:00 · 1486 阅读 · 1 评论 -
ASP错误处理
ASP是非常简单的,以至于许多的开发者不会去思考错误处理。错误处理能够让你的应用程序更加合理。我看到过很多个用ASP编写的商业网站,大多数都忽略了错误处理。 错误的类型有三种主要的错误类型: 编译错误:这种错误出现一般都是代码的语法问题。因为编译错误而导致辞ASP停止运行。 运行错误这个错误是发生在你准备运行ASP时的。例如:如果你试图给一个变量赋值,但是却超出了该变量允许的范围。 逻辑错误逻辑原创 2006-02-18 20:33:00 · 775 阅读 · 0 评论 -
ASP打包类
On Error Resume NextDim rSet r = New Rarr.Add Server.MapPath("a.gIf")r.Add Server.MapPath("a.txt")r.Add Server.MapPath("test")r.Add Server.MapPath("file.asp")r.packname = Server.MapPath("xxx.dat")r.原创 2006-03-06 09:34:00 · 854 阅读 · 0 评论