web（ASP）常用代码[2]

判断上一页的来源

request.servervariables("http_referer")  javascript: document.referrer

清除缓存，重新加载页面

<%response.expires = 0   response.expiresabsolute = now() - 1  response.addheader "pragma","no-cache"  response.addheader "cache-control","private"  response.cachecontrol = "no-cache"  %>

检索并删除数据库里的重复记录

conn.execute("delete from table where id not in (select distinct from table)")

文件删除函数

<%  '文件删除函数  function deletefile(filename)  if filename<>"" then  set fso=server.createobject("scripting.filesystemobject")  if fso.fileexists(filename) then  fso.deletefile filename  else  response.write "<script>alert(’该文件不存在’);</script>"  end if  end if  end function  strfile=server.mappath("filename")  deletefile(strfile)  %>

asp字数计算函数 

<%   function wordcount(strinput)  dim strtemp  strtemp = replace(strinput, vbtab, " ")  strtemp = replace(strtemp, vbcr, " ")  strtemp = replace(strtemp, vblf, " ")   ' 删除字首字尾空格  strtemp = trim(strtemp)   ' 替换为一个空格  do while instr(1, strtemp, " ", 1) <> 0  strtemp = replace(strtemp, " ", " ")  loop  wordcount = ubound(split(strtemp, " ", -1, 1)) +1  end function  %>

全正则的检测ip是否合法的函数

function checkip2(sipaddress) {     var exp=/^(\d{1,2}|1\d\d|2[0-4]\d|25[0-5])\.(\d{1,2}|1\d\d|2[0-4]\d|25[0-5])\.(\d{1,2}|1\d\d|2[0-4]\d|25[0-5])\.(\d{1,2}|1\d\d|2[0-4]\d|25[0-5])$/;     var reg = sipaddress.match(exp);     var errmsg="你输入的是一个非法的ip地址段！\nip段为：:xxx.xxx.xxx.xxx（xxx为0-255)！"         var msg="你输入的是一个合法的ip地址段！"         if(reg==null)     {         alert(errmsg);     }     else     {         alert(reg);     } }

关闭子窗口时刷新父窗口

在子窗口 <script language="javascript"> window.opener.location="父窗口页面" window.close() </script>

文本框输入限制：
<script> function reginput(obj, reg, inputstr) { var docsel = document.selection.createrange() if (docsel.parentelement().tagname != "input") return false osel = docsel.duplicate() osel.text = "" var srcrange = obj.createtextrange() osel.setendpoint("starttostart", srcrange) var str = osel.text + inputstr + srcrange.text.substr(osel.text.length) return reg.test(str) } </script> 小写英文：<xmp style= "display:inline"> </xmp> <input onkeypress = "return reginput(this, /^[a-z]*$/, string.fromcharcode(event.keycode))" onpaste = "return reginput(this, /^[a-z]*$/, window.clipboarddata.getdata('text'))" ondrop = "return reginput(this, /^[a-z]*$/, event.datatransfer.getdata('text'))" style="ime-mode:disabled" ><br> 大写英文：<xmp style= "display:inline"> </xmp> <input onkeypress = "return reginput(this, /^[a-z]*$/, string.fromcharcode(event.keycode))" onpaste = "return reginput(this, /^[a-z]*$/, window.clipboarddata.getdata('text'))" ondrop = "return reginput(this, /^[a-z]*$/, event.datatransfer.getdata('text'))" style="ime-mode:disabled"> <br> 任意数字：<xmp style="display:inline"> </xmp> <input onkeypress = "return reginput(this, /^[0-9]*$/, string.fromcharcode(event.keycode))" onpaste = "return reginput(this, /^[0-9]*$/, window.clipboarddata.getdata('text'))" ondrop = "return reginput(this, /^[0-9]*$/, event.datatransfer.getdata('text'))" style="ime-mode:disabled" ><br> 限2位小数：<xmp style="display:inline"> </xmp> <input onkeypress = "return reginput(this, /^\d*\.?\d{0,2}$/, string.fromcharcode(event.keycode))" onpaste = "return reginput(this, /^\d*\.?\d{0,2}$/, window.clipboarddata.getdata('text'))" ondrop = "return reginput(this, /^\d*\.?\d{0,2}$/, event.datatransfer.getdata('text'))" style="ime-mode:disabled" > 如: 123.12<br> 日　 期：<xmp style="display:inline"> </xmp> <input onkeypress = "return reginput(this, /^\d{1,4}([-\/](\d{1,2}([-\/](\d{1,2})?)?)?)?$/, string.fromcharcode(event.keycode))" onpaste = "return reginput(this, /^\d{1,4}([-\/](\d{1,2}([-\/](\d{1,2})?)?)?)?$/, window.clipboarddata.getdata('text'))" ondrop = "return reginput(this, /^\d{1,4}([-\/](\d{1,2}([-\/](\d{1,2})?)?)?)?$/, event.datatransfer.getdata('text'))" style="ime-mode:disabled" > 如: 2002-9-29<br> 任意中文：<xmp style="display:inline"> </xmp> <input onkeypress = "return reginput(this, /^$/, string.fromcharcode(event.keycode))" onpaste = "return reginput(this, /^[\u4e00-\u9fa5]*$/, window.clipboarddata.getdata('text'))" ondrop = "return reginput(this, /^[\u4e00-\u9fa5]*$/, event.datatransfer.getdata('text'))" ><br> 部分英文：<xmp style="display:inline"> </xmp> <input onkeypress = "return reginput(this, /^[a-e]*$/, string.fromcharcode(event.keycode))" onpaste = "return reginput(this, /^[a-e]*$/, window.clipboarddata.getdata('text'))" ondrop = "return reginput(this, /^[a-e]*$/, event.datatransfer.getdata('text'))" style="ime-mode:disabled" > 范围: a,b,c,d,e<br> 部分中文：<xmp style="display:inline"> </xmp> <script language=javascript> function checkchinese(oldlength, obj) { var otr = window.document.selection.createrange() var reg = /[^一二三四五六七八九十]/g otr.movestart("character", -1*(obj.value.length-oldlength)) otr.text = otr.text.replace(reg, "") } </script> <input onkeypress="return false" onkeydown="settimeout('checkchinese('+this.value.length+','+this.uniqueid+')', 1)" onpaste = "return reginput(this, /^[一二三四五六七八九十]*$/, window.clipboarddata.getdata('text'))" ondrop = "return reginput(this, /^[一二三四五六七八九十]*$/, event.datatransfer.getdata('text'))" > 范围: 一二三四五六七八九十<br>
[ctrl+a 全选 ctrl+c 复制]

不能点右键，不用ctrl+a，不能复制作!

<body oncontextmenu="window.event.returnvalue=false"  onkeypress="window.event.returnvalue=false"  onkeydown="window.event.returnvalue=false"  onkeyup="window.event.returnvalue=false"  ondragstart="window.event.returnvalue=false"  onselectstart="event.returnvalue=false"> </body>