精华asp代码

szhlwl

精华asp代码
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的手段来检查来访者是否用了代理
"" then
response.write "您通过了代理服务器，"& _
"真实的IP为"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")
end if
%>
13. 取得控件的绝对位置
//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);
  }
//VBScript
"BODY"
    set a = a.offsetParent
    t=t+a.offsetTop
    l=l+a.offsetLeft
  wend
  msgbox "top="&t&chr(13)&"left="&l,64,"得到控件的位置"
end function
-->
14. 光标是停在文本框文字的最后
function cc()
{
  var e = event.srcElement;
  var r =e.createTextRange();
  r.moveStart('character',e.value.length);
  r.collapse(true);
  r.select();
}
15. 判断上一页的来源
asp:
request.servervariables("HTTP_REFERER")
javascript:
document.referrer
16. 最小化、最大化、关闭窗口


本例适用于IE
17.
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. 日期减去天数等于第二个日期
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)
24. 选择了哪一个Radio
function checkme()
  for each ob in radio1
    if ob.checked then window.alert ob.value
  next
end function
Style
Barcode
25.获得本页url的request.servervariables("")集合
Response.Write "Variablesvalue"
for each ob in Request.ServerVariables
Response.Write ""&ob&""&Request.ServerVariables(ob)&""
next
Response.Write ""
26.
本机ip
服务器名
服务器IP
服务器端口
服务器时间
IIS版本
脚本超时时间
本文件路径
服务器CPU数量
服务器解译引擎
服务器操作系统
27.ENTER键可以让光标移到下一个输入框
28. 检测某个网站的链接速度：
把如下代码加入区域中:
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("")
for(var i=1;i =》 =》")
document.write("")
}
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")}
run()
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
1.本地无缓存，每次自动刷新
response.expires=0
response.addHeader "pragma" , "no-cache"
response.addHeader "cache-control" , "private"
2.修改contentType并下载gif等格式
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")
%>
19. 检查一段字符串是否全由数字组成
20. 获得一个窗口的大小
document.body.clientWidth,document.body.clientHeight
document.body.offsetWidth,document.body.offsetHeight
有时还需要知道window.screenTop,window.screenLeft

本文来自ChinaUnix博客，如果查看原文请点：http://blog.chinaunix.net/u/20047/showart_137246.html