meizz (梅花雨)的一些珍藏代码奉献(转)

原帖地址：http://topic.csdn.net/t/20020801/11/915901.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">     可以在收藏夹中显示出你的图标  
   
  7.     <input   style="ime-mode:disabled">                                                       关闭输入法  
   
  8.     永远都会带着框架  
  <script   language="JavaScript"><!--  
      if   (window   ==   top)top.location.href   =   "frames.htm";   //frames.htm为框架网页  
  //   --></script>  
   
  9.     防止被人frame  
  <SCRIPT   LANGUAGE=JAVASCRIPT><!--    
      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.   取得控件的绝对位置  
   
  //Javascript  
  <script   language="Javascript">  
  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="javascript">  
  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")  
   
  javascript:  
  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="Javascript"><!--  
  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=Javascript>  
  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=Javascript>  
  tim=1  
  setInterval("tim++",100)  
  b=1  
   
  var   autourl=new   Array()  
  autourl[1]="www.njcatv.net"  
  autourl[2]="javacool.3322.net"  
  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]+"/"+Math.random()+"   width=1   height=1   onerror=auto('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

posted @ 2010-03-17 11:23  大大的院，小小贝  阅读(400)  评论(0)  编辑  收藏  举报