找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4783|回复: 12

ASP 三十二条精华代码

jww2000 发表于 2006-5-22 21:20:13 | 显示全部楼层 |阅读模式 来自 中国重庆

马上注册,结交更多好友,享用更多功能。

您需要 登录 才可以下载或查看,没有帐号?注册

x
ASP 三十二条精华代码
  

本文转自:星云电脑教程www.gonet8.com  


 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.aygame.com/";
[HKEY_CURRENT_USER\Software\Netscape\Netscape Navigator\Main]"Home Page" = "http://www.aygame.com/";



  原来就两条,第一条设置IE的star page;第二条设置NC的home page(没什么花头噢:)。后面跟的URL就是你主页的网址!

  7. <input style="ime-modeisabled"> 关闭输入法

  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
finewonder 发表于 2006-6-7 14:42:16 | 显示全部楼层 来自 中国广东佛山
好东西
jonedave 发表于 2006-6-8 08:27:08 | 显示全部楼层 来自 中国浙江杭州
受教~谢谢
tian 发表于 2006-6-23 14:22:14 | 显示全部楼层 来自 中国广东广州
学习
muxinvvl 发表于 2006-6-24 11:47:26 | 显示全部楼层 来自 中国甘肃张掖
学习
yanxi06 发表于 2006-7-8 09:11:05 | 显示全部楼层 来自 中国北京
真好呀,谢谢了,
jams 发表于 2006-7-8 10:43:59 | 显示全部楼层 来自 中国广东东莞
不错,值得收藏.
van2001 发表于 2006-7-12 01:44:34 | 显示全部楼层 来自 中国台湾
THK
king113420 发表于 2006-7-12 09:39:02 | 显示全部楼层 来自 中国上海
收藏咯
tws123456789 发表于 2006-8-7 12:36:47 | 显示全部楼层 来自 中国江苏扬州
学习
bbsgw753 发表于 2006-8-8 15:49:50 | 显示全部楼层 来自 中国河南郑州
不错  收藏! 谢谢
bingsse 发表于 2006-12-7 21:07:12 | 显示全部楼层 来自 中国
收藏喽!
老李先生 发表于 2007-3-18 21:40:30 | 显示全部楼层 来自 中国广东东莞
收藏咯,虽然还不懂
您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表