【asp源码栏目提醒】:本文主要为网学会员提供“asp屏蔽IP代码 实用asp代码若干 - 互联网”,希望对需要asp屏蔽IP代码 实用asp代码若干 - 互联网网友有所帮助,学习一下!
asp屏蔽IP代码 实用
asp代码若干 2009-05-11 1550受屏蔽IP地址段集合星号为通配符通常保存于配置文件中。
Const BadIPGroup192.168.1.202.68...12.55.34185..96.24127..0.1192.168.0.1If IsForbidIPBadIPGroupTrue Then Response.WriteGetIPIP地址禁止访问Response.EndEnd If参数vBadIP要屏蔽的IP段IP地址集合用符号分隔多个IP地址段返回BoolTrue用户IP在被屏蔽范围False反之Function IsForbidIPvBadIPDim counterarrIPPartarrBadIParrBadIPPartij arrBadIPSplitvBadIParrIPPartSplitGetIP.For i0 To UBoundarrBadIPcounter0 arrBadIPPartSplitarrBadIPi.For j0 To UBoundarrIPPartIfarrBadIPPartjor CstrarrIPPartjCstrarrBadIPPartjThen countercounter1 End If Next If counter4 Then IsForbidIPTrue Exit Function End If Next IsForbidIPFalse End Function返回客户IP地址Function GetIPDim IP IPRequest.ServerVariablesHTTP_X_FORWARDED_FORIf IPThen IPRequest.ServerVariablesREMOTE_ADDRGetIPIP End Function实用
asp代码1.oncontextmenuwindow.event.returnvaluefalse将彻底屏蔽鼠标右键tabl eborder oncontextmenureturnfalsetd no/table可用于Table 2.body onselectstartreturn false取消选取、防止复制3.onpastereturn false不准粘贴4.oncopyreturn falseoncutreturn false防止复制5.link relShortcut Iconhreffavicon.icoIE地址栏前换成自己的图标6.link relBookmarkhreffavicon.ico可以在收藏夹中显示出你的图标7.input styleime-modedisabled关闭输入法8.永远都会带着框架script languagejava script--ifwindowtoptop.location.hrefframes.htm//frames.htm为框架网页//--/script 9.防止被人frame SCRIPT LANGUAGEjava script--iftop.locationself.locationtop.locationself.location//--/SCRIPT 10.noscript iframe src.html/iframe/noscript网页将不能被另存为11.input typebutton value查看网页源代码onclickwindow.locationview-source12.怎样通过
asp的手段来检查来访者是否用了代理if Request.ServerVariablesHTTP_X_FORWARDED_FORthen response.writefont colorFF0000您通过了代理服务器_真实的IP为Request.ServerVariablesHTTP_X_FORWARDED_FORend if13.取得控件的绝对位置//java script script languagejava scriptfunction getIEevar te.offsetTopvar le.offsetLeftwhileee.offsetParentte.offsetTople.offsetLeftalerttoptnleftl/script//VBScript script languageVBScript--function getIEdim tlab set adocument.all.img1 tdocument.all.img1.offsetTop ldocument.all.img1.offsetLeft while a.tagNameBODYset aa.offsetParent tta.offsetTop lla.offsetLeft wend msgboxtoptchr13leftl64得到控件的位置end function--/script 14.光标是停在文本框文字的最后script languagejava scriptfunction ccvar eevent.srcElementvar re.createTextRanger.moveStartcharactere.value.lengthr.collapsetruer.select/script input typetext nametext1 value123onfocuscc15.判断上一页的来源asprequest.servervariablesHTTP_REFERERjava scriptdocument.referrer 16.最小化、最大化、关闭窗口object idhh1 classidclsidADB880A6-D8FF-11CF-9377-00AA003B7A11param nameCommandvalueMinimize/object object idhh2 classidclsidADB880A6-D8FF-11CF-9377-00AA003B7A11param nameCommandvalueMaximize/object OBJECT idhh3 classidclsidadb880a6-d8ff-11cf-9377-00aa003b7a11ARAM NAMECommandvalueClose/OBJECT input typebutton value最小化onclickhh1.Clickinput typebutton value最大化onclickhh2.Clickinput typebutton value关闭onclickhh3.Click本例适用于IE 17.定义数据库连接的一些常量Const adOpenForwardOnly0游标只向前浏览记录不支持分页、Recordset、BookMark Const adOpenKeyset1键集游标其他用户对记录说做的修改将反映到记录集中但其他用户增加或删除记录不会反映到记录集中。
支持分页、Recordset、BookMark Const adOpenDynamic2动态游标功能最强但耗资源也最多。
用户对记录说做的修改增加或删除记录都将反映到记录集中。
支持全功能浏览ACCESS不支持。
Const adOpenStatic3静态游标只是数据的一个快照用户对记录说做的修改增加或删除记录都不会反映到记录集中。
支持向前或向后移动Const adLockReadOnly1锁定类型默认的只读不能作任何修改Const adLockPessimistic2当编辑时立即锁定记录最安全的方式Const adLockOptimistic3只有在调用Update方法时才锁定记录集而在此前的其他操作仍可对当前记录进行更改、插入和删除等Const adLockBatchOptimistic4当编辑时记录不会被锁定而更改、插入和删除是在批处理方式下完成的Const adCmdTextH0001 Const adCmdTableH000218.网页不会被缓存HTM网页META HTTP-EQUIVpragmaCONTENTno-cacheMETA HTTP-EQUIVCache-ControlCONTENTno-cachemust-revalidateMETA HTTP-EQUIVexpiresCONTENTWed26 Feb 1997 082157 GMT或者META HTTP-EQUIVexpiresCONTENT0
ASP网页Response.Expires-1 Response.ExpiresAbsoluteNow-1 Response.cachecontrolno-cachePHP网页headerExpiresMon26 Jul 1997 050000 GMTheaderCache-Controlno-cachemust-revalidateheaderPragmano-cache19.检查一段字符串是否全由数字组成script languagejava script--function checkNumstrreturn str.match/D/nullalertcheckNum1232142141alertcheckNum123214214 a1//--/script 20.获得一个窗口的大小document.body.clientWidthdocument.body.clientHeight 21.怎么判断是否是字符if/x00-xff/g.testsalert含有汉字else alert全是字符22.TEXTAREA自适应文字行数的多少textarea rows1 names1 cols27 onpropertychangethis.style.posHeightthis.scrollHeight/textarea 23.日期减去天数等于第二个日期script languagejava script function ccdddadd//可以加上错误处理var anew Dateddaa.valueOfaa-dadd2460601000 anew Dateaalerta.getFullYear年a.getMonth1月a.getDate日cc12/23/20022/script 24.选择了哪一个Radio HTML script languagevbscriptfunction checkmefor each ob in radio1 if ob.checked then window.alert ob.value next end function/script BODY INPUT nameradio1typeradiovaluestylechecked Style INPUT nameradio1typeradiovaluebarcodeBarcode INPUT typebuttonvaluecheckonclickcheckme/BODY/HTML 25.获得本页url的request.servervariables集合Response.WriteTABLE border1--Table Header--TR TD BVariables/B/TD TD Bvalue/B/TD/TRfor each ob in Request.ServerVariables Response.WriteTR TDob/TD TDRequest.ServerVariablesob/TD/TRnext Response.Write/TABLE26.本机iprequest.servervariablesremote_addr服务器名Request.ServerVariablesSERVER_NAME服务器IPRequest.ServerVariablesLOCAL_ADDR服务器端口Request.ServerVariablesSERVER_PORT服务器时间nowIIS版本Request.ServerVariablesSERVER_SOFTWARE脚本超时时间Server.ScriptTimeout本文件路径server.mappathRequest.ServerVariablesSCRIPT_NAME服务器CPU数量Request.ServerVariablesNUMBER_OF_PROCESSORS服务器解译引擎ScriptEngine/ScriptEngineMajorVersion.ScriptEngineMinorVersion.ScriptEngineBuildVersion服务器操作系统Request.ServerVariablesOS27.ENTER键可以让光标移到下一个输入框input onkeydownifevent.keyCode13event.keyCode928.检测某个网站的链接速度把如下代码加入body区域中script languagejava script tim1 setIntervaltim100b1 var au tourlnew Arrayautourl1www.njcatv.netautourl2javacool.3322.netautourl3www.sina.com.cnautourl4www.nuaa.edu.cnautourl5www.cctv.comfunction buttdocument.writeform nameautofforvar i1i autourl.lengthidocument.writeinput typetext nametxtisize10 value测试中…》input typetext nameurlisize40》input typebutton valueGO onclickwindow.openthis.form.urli.valuebr/document.writeinput typesubmit value刷新/formbuttfunction autourldocument.forms0urlb.valueurl iftim 200document.forms0txtb.value链接超时elsedocument.forms0txtb.value时间tim/10秒bfunction runforvar i1i autourl.lengthidocument.writeimg srcwidth1 height1 onerrorautorun/script 29.各种样式的光标auto标准光标default标准箭头hand手形光标wait等待光标textI形光标vertical-text水平I形光标no-drop不可拖动光标not-allowed无效光标help帮助光标all-scroll三角方向标move移动标crosshair十字标e-resize n-resize nw-resize w-resize s-resize se-resize sw-resize