正文

常用代码 2005-06-21 20:11:00

【评论】 【打印】 【字体: 】 本文链接:http://blog.pfan.cn/wegang/1980.html

分享到:

1. oncontextmenu="window.event.returnvalue=false" 将彻底屏蔽鼠标右键   <table border oncontextmenu=return(false)><td>no</table> 可用于Table   2. <body onselectstart="return false"> 取消选取、防止复制   3. onpaste="return false" 不准粘贴   4. oncopy="return false;" oncut="return false;" 防止复制   5. <link rel="Shortcut Icon" href="favicon.ico"> IE地址栏前换成自己的图标   6. <link rel="Bookmark" href="favicon.ico"> 可以在收藏夹中显示出你的图标   如何制作将本站设为首页   你可能已经注意到,现在许多网站的首页上都有这么一个链接“按这里将本站设为首页”(这里的首页指的是浏览器的起始页)。   不但大的ISP,ICP这么做,一些个人主页也推出这一“服务”以招揽网友。     具体是如何实现这个功能的呢?我来帮你剖析一下:     点击那个超链接会显示下载一个名为lspace.reg的文件,下载后双击它,便会修改你的注册表,然后当你再打开浏览器的时候,起始页就 发生了变化。(一听到修改注册表,许多网友就比较"怵",会不会把windows给弄坏了。)     别怕,我们来打开lspace.reg看看(用最普通的notepad记事本就可以打开),发现内容如下:   REGEDIT4   [HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main]   "Start Page" = "http://www.g168.ne/;   [HKEY_CURRENT_USER\Software\Netscape\Netscape Navigator\Main]"Home Page" = "http://www.g168.net/;     原来就两条,第一条设置IE的star page;第二条设置NC的home page(没什么花头噢:)。后面跟的URL就是你主页的网址!   7. <input style="ime-mode:disabled"> 关闭输入法   8. 永远都会带着框架   <script language="****"><!--   if (window == top)top.location.href = "frames.htm"; //frames.htm为框架网页   // --></script>   9. 防止被人frame   <SCRIPT LANGUAGE=****><!--   if (top.location != self.location)top.location=self.location;   // --></SCRIPT>   10. <noscript><iframe src=*.html></iframe></noscript> 网页将不能被另存为   11. <input type=button value=查看网页源代码   onclick="window.location = view-source: + http://www.csdn.net/">   12. 怎样通过asp的手段来检查来访者是否用了代理   <% if Request.ServerVariables("HTTP_X_FORWARDED_FOR")<>"" then   response.write "<font color=#FF0000>您通过了代理服务器,"& _   "真实的IP为"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")   end if   %>   13. 取得控件的绝对位置   //****   <script language="****">   function getIE(e){   var t=e.offsetTop;   var l=e.offsetLeft;   while(e=e.offsetParent){   t+=e.offsetTop;   l+=e.offsetLeft;   }   alert("top="+t+"\nleft="+l);   }   </script>   //VBScript   <script language="VBScript"><!--   function getIE()   dim t,l,a,b   set a=document.all.img1   t=document.all.img1.offsetTop   l=document.all.img1.offsetLeft   while a.tagName<>"BODY"   set a = a.offsetParent   t=t+a.offsetTop   l=l+a.offsetLeft   wend   msgbox "top="&t&chr(13)&"left="&l,64,"得到控件的位置"   end function   --></script>   14. 光标是停在文本框文字的最后   <script language="****">   function cc()   {   var e = event.srcElement;   var r =e.createTextRange();   r.moveStart( character ,e.value.length);   r.collapse(true);   r.select();   }   </script>   <input type=text name=text1 value="123" onfocus="cc()">   15. 判断上一页的来源   asp:   request.servervariables("HTTP_REFERER")   ****:   document.referrer   16. 最小化、最大化、关闭窗口   <object id=hh1 classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">   <param name="Command" value="Minimize"></object>   <object id=hh2 classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">   <param name="Command" value="Maximize"></object>   <OBJECT id=hh3 classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">   <PARAM NAME="Command" value="Close"></OBJECT>   <input type=button value=最小化 onclick=hh1.Click()>   <input type=button value=最大化 onclick=hh2.Click()>   <input type=button value=关闭 onclick=hh3.Click()>   本例适用于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网页   <META HTTP-EQUIV="pragma" CONTENT="no-cache">   <META HTTP-EQUIV="Cache-Control" CONTENT="no-cache, must-revalidate">   <META HTTP-EQUIV="expires" CONTENT="Wed, 26 Feb 1997 08:21:57 GMT">   或者<META HTTP-EQUIV="expires" CONTENT="0">   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. 检查一段字符串是否全由数字组成   <script language="****"><!--   function checkNum(str){return str.match(/\D/)==null}   alert(checkNum("1232142141"))   alert(checkNum("123214214a1"))   // --></script>   20. 获得一个窗口的大小   document.body.clientWidth,document.body.clientHeight   21. 怎么判断是否是字符   if (/[^\x00-\xff]/g.test(s)) alert("含有汉字");   else alert("全是字符");   22.TEXTAREA自适应文字行数的多少   <textarea rows=1 name=s1 cols=27 onpropertychange="this.style.posHeight=this.scrollHeight">   </textarea>   23. 日期减去天数等于第二个日期   <script language=****>   function cc(dd,dadd)   {   //可以加上错误处理   var a = new Date(dd)   a = a.valueOf()   a = a - dadd * 24 * 60 * 60 * 1000   a = new Date(a)   alert(a.getFullYear() + "年" + (a.getMonth() + 1) + "月" + a.getDate() + "日")   }   cc("12/23/2002",2)   </script>   24. 选择了哪一个Radio   <HTML><script language="vbscript">   function checkme()   for each ob in radio1   if ob.checked then window.alert ob.value   next   end function   </script><BODY>   <INPUT name="radio1" type="radio" value="style" checked>Style   <INPUT name="radio1" type="radio" value="barcode">Barcode   <INPUT type="button" value="check" onclick="checkme()">   </BODY></HTML>   25.获得本页url的request.servervariables("")集合   Response.Write "<TABLE border=1><!-- Table Header --><TR><TD><B>Variables</B></TD><TD><B>value</B></TD></TR>"   for each ob in Request.ServerVariables   Response.Write "<TR><TD>"&ob&"</TD><TD>"&Request.ServerVariables(ob)&"</TD></TR>"   next   Response.Write "</TABLE>"   26.   本机ip<%=request.servervariables("remote_addr")%>   服务器名<%=Request.ServerVariables("SERVER_NAME")%>   服务器IP<%=Request.ServerVariables("LOCAL_ADDR")%>   服务器端口<%=Request.ServerVariables("SERVER_PORT")%>   服务器时间<%=now%>   IIS版本<%=Request.ServerVariables"SERVER_SOFTWARE")%>   脚本超时时间<%=Server.ScriptTimeout%>   本文件路径<%=server.mappath(Request.ServerVariables("SCRIPT_NAME"))%>   服务器CPU数量<%=Request.ServerVariables("NUMBER_OF_PROCESSORS")%>   服务器解译引擎<%=ScriptEngine & "/"& ScriptEngineMajorVersion &"."&ScriptEngineMinorVersion&"."& ScriptEngineBuildVersion %>   服务器操作系统<%=Request.ServerVariables("OS")%>   27.ENTER键可以让光标移到下一个输入框   <input onkeydown="if(event.keyCode==13)event.keyCode=9">   28. 检测某个网站的链接速度:   把如下代码加入<body>区域中:   <script language=****>   tim=1   setInterval("tim++",100)   b=1   var autourl=new Array()   autourl[1]="www.njcatv.net"   autourl[2]="javacool.3322.net" +"/"+Math.random()+" width=1   height=1 onerror=auto( http://;;;;;+autourl[I+" )>")}   run()</script>   autourl[3]="www.sina.com.cn"   autourl[4]="www.nuaa.edu.cn"   autourl[5]="www.cctv.com"   function butt(){   document.write("<form name=autof>")   for(var i=1;i<autourl.length;i++)   document.write("<input type=text name=txt"+i+" size=10 value=测试中……> =》<input type=text name=url"+i+" size=40> =》<input   type=button value=GO onclick=window.open(this.form.url"+i+".value)><br/>")   document.write("<input type=submit value=刷新></form>")   }   butt()   function auto(url){   document.forms[0]["url"+b].value=url   if(tim>200)   {document.forms[0]["txt"+b].value="链接超时"}   else   {document.forms[0]["txt"+b].value="时间"+tim/10+"秒"}   b++   }   function run(){for(var i=1;i<autourl.length;i++)document.write("<img src=http://+autourl[I+" )>")}   run()</script>   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  

阅读(2970) | 评论(0)


版权声明:编程爱好者网站为此博客服务提供商,如本文牵涉到版权问题,编程爱好者网站不承担相关责任,如有版权问题请直接与本文作者联系解决。谢谢!

评论

暂无评论
您需要登录后才能评论,请 登录 或者 注册