[分享]网页建设时常用的代码

12 下一页

返回列表回复发帖

yeego

管理员

Rank: 14

1^#

发表于 2005-12-12 14:01 | 只看该作者

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\"></script>

9.　防止被人frame
<SCRIPT LANGUAGE=javascript></SCRIPT>

10.网页将不能被另存为
<noscript><iframe src=*.html></iframe></noscript>

11. <input type=button value=查看网页源代码
onclick=\"window.location = \'view-source:\'+ \'http://hk.westxj.com/\'\">

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. 取得控件的绝对位置
file://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>
file://VBScript
<script language=\"VBScript\"></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\")
java script:
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\");

一些初学者常用代码引用:
1.获得系统时间:
<%=now()%>

2.取得来访用的IP:
<%=request.serverVariables(\"remote_host\")%>

3.获得系统,浏览器版本:
<script>
window.document.write(\"版本：\"+navigator.appName+navigator.appVersion+\" browser.\")
</script>

4.去除IE混动条:
<body scroll=\"no\">
<body style=\"overflow-y:hidden\">

5.进入网站,跳出广告:
<script language=\"javascript\">

window.open(\'\'http://www.******.com\'\',\'\'\'\',\'\'height=200,width=300,top=0,left=30\'\');
// -->
</script>

6.随机数:
<%randomize%>
<%=(int(rnd()*n)+1)%>
N为可改变数

7.向上混动代码:
<marquee direction=\"up\" scrolldelay=\"200\" style=\"font-size: 9pt; color: #FF0000; line-height: 150%; font-style:italic; font-weight:bold\" scrollamount=\"2\" width=\"206\" height=\"207\" bgcolor=\"#FFFF00\">hhhhhhhhhhhhhhhhhhh</marquee>

8.自动关闭网页:
<script LANGUAGE=\"javascript\">

</script>
<p align=\"center\">本页10秒后自动关闭,请注意刷新页面</p>

9.随机背景音乐:
<%randomize%>
<bgsound src=\"mids/<%=(int(rnd()*60)+1)%>.mid\" loop=\"-1\">
　

可以修改数字，限制调用个数，我这里是６０个．

10.自动刷新本页面:
<script>

</script>

11.ACCESS数据库连接:
<%
option explicit
dim startime,endtime,conn,connstr,db
startime=timer()
\'更改数据库名字
db=\"data/dvBBS5.mdb\"
Set conn = Server.CreateObject(\"ADODB.Connection\")
connstr=\"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\" & Server.MapPath(db)
\'如果你的服务器采用较老版本Access驱动，请用下面连接方法
\'connstr=\"driver={Microsoft Access Driver (*.mdb)};dbq=\" & Server.MapPath(db)
conn.Open connstr
function CloseDatabase
Conn.close
Set conn = Nothing
End Function
%>

12.SQL数据库连接:
<%
option explicit
dim startime,endtime,conn,connstr,db
startime=timer()
connstr=\"driver={SQL Server};server=HUDENQ-N11T33NB;uid=sa;pwd=xsfeihu;database=dvbbs\"
Set conn = Server.CreateObject(\"ADODB.Connection\")
conn.Open connstr
function CloseDatabase
Conn.close
Set conn = Nothing
End Function
%>

13.用键盘打开网页代码:
<script language=\"javascript\">
function ctlent(eventobject)
{
if((event.ctrlKey && window.event.keyCode==13)||(event.altKey && window.event.keyCode==83))
{
window.open(\'网址\',\'\',\'\')
}
}
</script>