收集JS代码经典集合

1. oncontextmenu=window.event.returnvalue=false 将彻底屏蔽鼠标右键

no

可用于Table 2. 取消选取、防止复制 3. onpaste=return false 不准粘贴 4. oncopy=return false; oncut=return false; 防止复制 5. IE地址栏前换成自己的图标 6. 可以在收藏夹中显示出你的图标 7. 关闭输入法 8. 永远都会带着框架 9. 防止被人frame 10. 网页将不能被另存为 11. 12. 怎样通过asp的手段来检查来访者是否用了代理 <% if Request.ServerVariables(HTTP_X_FORWARDED_FOR)<> then response.write 您通过了代理服务器，& _ 真实的IP为&Request.ServerVariables(HTTP_X_FORWARDED_FOR) end if %> 13. 取得控件的绝对位置 //javascript //VBScript 14. 光标是停在文本框文字的最后 15. 判断上一页的来源 asp: request.servervariables(HTTP_REFERER) javascript: document.referrer 16. 最小化、最大化、关闭窗口 本例适用于IE 17. <% '定义数据库连接的一些常量 Const adOpenForwardOnly = 0 '游标只向前浏览记录，不支持分页、Recordset、BookMark Const adOpenKeyset = 1 '键集游标，其他用户对记录说做的修改将反映到记录集中，但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、BookMark Const adOpenDynamic = 2 '动态游标功能最强，但耗资源也最多。用户对记录说做的修改，增加或删除记录都将反映到记录集中。支持全功能浏览(ACCESS不支持)。 Const adOpenStatic = 3 '静态游标，只是数据的一个快照，用户对记录说做的修改，增加或删除记录都不会反映到记录集中。支持向前或向后移动 Const adLockReadOnly = 1 '锁定类型，默认的，只读，不能作任何修改 Const adLockPessimistic = 2 '当编辑时立即锁定记录，最安全的方式 Const adLockOptimistic = 3 '只有在调用Update方法时才锁定记录集，而在此前的其他操作仍可对当前记录进行更改、插入和删除等 Const adLockBatchOptimistic = 4 '当编辑时记录不会被锁定，而更改、插入和删除是在批处理方式下完成的 Const adCmdText = &H0001 Const adCmdTable = &H0002 %> 18. 网页不会被缓存 HTM网页 或者 ASP网页 Response.Expires = -1 Response.ExpiresAbsolute = Now() - 1 Response.cachecontrol = no-cache PHP网页 header(Expires: Mon, 26 Jul 1997 05:00:00 GMT); header(Cache-Control: no-cache, must-revalidate); header(Pragma: no-cache); 19. 检查一段字符串是否全由数字组成 20. 获得一个窗口的大小 document.body.clientWidth,document.body.clientHeight 21. 怎么判断是否是字符 if (/[^\x00-\xff]/g.test(s)) alert(含有汉字); else alert(全是字符); 22.TEXTAREA自适应文字行数的多少 23. 日期减去天数等于第二个日期 24. 选择了哪一个Radio Style Barcode 25.获得本页url的request.servervariables()集合 Response.Write for each ob in Request.ServerVariables Response.Write next Response.Write

Variables	value
&ob&	&Request.ServerVariables(ob)&

26. 本机ip<%=request.servervariables(remote_addr)%> 服务器名<%=Request.ServerVariables(SERVER_NAME)%> 服务器IP<%=Request.ServerVariables(LOCAL_ADDR)%> 服务器端口<%=Request.ServerVariables(SERVER_PORT)%> 服务器时间<%=now%> IIS版本<%=Request.ServerVariablesSERVER_SOFTWARE)%> 脚本超时时间<%=Server.ScriptTimeout%> 本文件路径<%=server.mappath(Request.ServerVariables(SCRIPT_NAME))%> 服务器CPU数量<%=Request.ServerVariables(NUMBER_OF_PROCESSORS)%> 服务器解译引擎<%=ScriptEngine & /& ScriptEngineMajorVersion &.&ScriptEngineMinorVersion&.& ScriptEngineBuildVersion %> 服务器操作系统<%=Request.ServerVariables(OS)%> 27.ENTER键可以让光标移到下一个输入框 28. 检测某个网站的链接速度： 把如下代码加入区域中: 29. 各种样式的光标 auto ：标准光标 default ：标准箭头 hand ：手形光标 wait ：等待光标 text ：I形光标 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 30.本地无缓存，每次自动刷新 response.expires=0 response.addHeader pragma , no-cache response.addHeader cache-control , private 31.修改contentType并下载gif等格式 <% function dl(f,n) on error resume next set s=CreateObject(Adodb.Stream) S.Mode=3 S.Type=1 S.Open s.LoadFromFile(server.mappath(f)) if err.number>0 then response.write err.number & : & err.description else response.contentType=application/x-gzip response.addheader Content-Disposition:,attachment; filename= & n response.binarywrite(s.Read(s.size)) end if end function call dl(012922501.gif,t1.gif) %>