编程开发 > ASP > 文章内容

百宝箱(一)

2011-2-14编辑:lily
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
%>
VBScript编码约定

热点推荐

登录注册
触屏版电脑版网站地图