分享
 
 
 

制作网页时的23个经典代码

王朝other·作者佚名  2006-01-09
窄屏简体版  字體: |||超大  

1.oncontextmenu="window.event.returnvalue=false"将彻底屏蔽鼠标右键

<tableborderoncontextmenu=return(false)><td>no</table>可用于Table

2.<bodyonselectstart="returnfalse">取消选取、防止复制

3.onpaste="returnfalse"不准粘贴

4.oncopy="returnfalse;"oncut="returnfalse;"防止复制

5.<linkrel="ShortcutIcon"href="favicon.ico">IE地址栏前换成自己的图标

6.<linkrel="Bookmark"href="favicon.ico">可以在收藏夹中显示出你的图标

7.<inputstyle="ime-mode:disabled">关闭输入法

8.永远都会带着框架

<scriptlanguage="javascript"><!--

if(window==top)top.location.href="frames.htm";//frames.htm为框架网页

//--></script>

9.防止被人frame

<SCRIPTLANGUAGE=javascript><!--

if(top.location!=self.location)top.location=self.location;

//--></SCRIPT>

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

11.<inputtype=buttonvalue=查看网页源代码

onclick="window.location='view-source:'+'<IMG src="pic/url.gif" align=absMiddle border=0>http://www.csdn.net/">

12.怎样通过asp的手段来检查来访者是否用了代理

<%ifRequest.ServerVariables("HTTP_X_FORWARDED_FOR")<>""then

response.write"<fontcolor=#FF0000>您通过了代理服务器,"&_

"真实的IP为"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")

endif

%>

13.取得控件的绝对位置

//javascript

<scriptlanguage="javascript">

functiongetIE(e){

vart=e.offsetTop;

varl=e.offsetLeft;

while(e=e.offsetParent){

t+=e.offsetTop;

l+=e.offsetLeft;

}

alert("top="+t+"\nleft="+l);

}

</script>

//VBScript

<scriptlanguage="VBScript"><!--

functiongetIE()

dimt,l,a,b

seta=document.all.img1

t=document.all.img1.offsetTop

l=document.all.img1.offsetLeft

whilea.tagName<>"BODY"

seta=a.offsetParent

t=t+a.offsetTop

l=l+a.offsetLeft

wend

msgbox"top="&t&chr(13)&"left="&l,64,"得到控件的位置"

endfunction

--></script>

14.光标是停在文本框文字的最后

<scriptlanguage="javascript">

functioncc()

{

vare=event.srcElement;

varr=e.createTextRange();

r.moveStart('character',e.value.length);

r.collapse(true);

r.select();

}

</script>

<inputtype=textname=text1value="123"onfocus="cc()">

15.判断上一页的来源

asp:

request.servervariables("HTTP_REFERER")

javascript:

document.referrer

16.最小化、最大化、关闭窗口

<objectid=hh1classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">

<paramname="Command"value="Minimize"></object>

<objectid=hh2classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">

<paramname="Command"value="Maximize"></object>

<OBJECTid=hh3classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">

<PARAMNAME="Command"value="Close"></OBJECT>

<inputtype=buttonvalue=最小化onclick=hh1.Click()>

<inputtype=buttonvalue=最大化onclick=hh2.Click()>

<inputtype=buttonvalue=关闭onclick=hh3.Click()>

本例适用于IE

17.

<%

'定义数据库连接的一些常量

ConstadOpenForwardOnly=0'游标只向前浏览记录,不支持分页、Recordset、BookMark

ConstadOpenKeyset=1'键集游标,其他用户对记录说做的修改将反映到记录集中,但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、BookMark

ConstadOpenDynamic=2'动态游标功能最强,但耗资源也最多。用户对记录说做的修改,增加或删除记录都将反映到记录集中。支持全功能浏览(ACCESS不支持)。

ConstadOpenStatic=3'静态游标,只是数据的一个快照,用户对记录说做的修改,增加或删除记录都不会反映到记录集中。支持向前或向后移动

ConstadLockReadOnly=1'锁定类型,默认的,只读,不能作任何修改

ConstadLockPessimistic=2'当编辑时立即锁定记录,最安全的方式

ConstadLockOptimistic=3'只有在调用Update方法时才锁定记录集,而在此前的其他操作仍可对当前记录进行更改、插入和删除等

ConstadLockBatchOptimistic=4'当编辑时记录不会被锁定,而更改、插入和删除是在批处理方式下完成的

ConstadCmdText=&H0001

ConstadCmdTable=&H0002

%>

18.网页不会被缓存

HTM网页

<METAHTTP-EQUIV="pragma"CONTENT="no-cache">

<METAHTTP-EQUIV="Cache-Control"CONTENT="no-cache,must-revalidate">

<METAHTTP-EQUIV="expires"CONTENT="Wed,26Feb199708:21:57GMT">

或者<METAHTTP-EQUIV="expires"CONTENT="0">

ASP网页

Response.Expires=-1

Response.ExpiresAbsolute=Now()-1

Response.cachecontrol="no-cache"

PHP网页

header("Expires:Mon,26Jul199705:00:00GMT");

header("Cache-Control:no-cache,must-revalidate");

header("Pragma:no-cache");

19.检查一段字符串是否全由数字组成

<scriptlanguage="javascript"><!--

functioncheckNum(str){returnstr.match(/\D/)==null}

alert(checkNum("1232142141"))

alert(checkNum("123214214a1"))

//--></script>

20.获得一个窗口的大小

document.body.clientWidth,document.body.clientHeight

21.怎么判断是否是字符

if(/[^\x00-\xff]/g.test(s))alert("含有汉字");

elsealert("全是字符");

22.TEXTAREA自适应文字行数的多少

<textarearows=1 name=s1 cols=27 onpropertychange="this.style.posHeight=this.scrollHeight">

</textarea>

23.日期减去天数等于第二个日期

<scriptlanguage=javascript>

functioncc(dd,dadd)

{

//可以加上错误处理

vara=newDate(dd)

a=a.valueOf()

a=a-dadd*24*60*60*1000

a=newDate(a)

alert(a.getFullYear()+"年"+(a.getMonth()+1)+"月"+a.getDate()+"日")

}

cc("12/23/2002",2)

</script>

24.选择了哪一个Radio

<HTML><scriptlanguage="vbscript">

functioncheckme()

foreachobinradio1

ifob.checkedthenwindow.alertob.value

next

endfunction

</script><BODY>

<INPUT name="radio1" type="radio" value="style" checked>style

<INPUT name="radio1" type="radio" value="barcode">Barcode

<INPUT type="button" value="check"onclick="checkme()">

</BODY></HTML>

25.获得本页url的request.servervariables("")集合

Response.Write"<TABLEborder=1><!--TableHeader--><TR><TD><B>Variables</B></TD><TD><B>value</B></TD></TR>"

foreachobinRequest.ServerVariables

Response.Write"<TR><TD>"&ob&"</TD><TD>"&Request.ServerVariables(ob)&"</TD></TR>"

next

Response.Write"</TABLE>"

26.

本机ip<%=request.servervariables("remote_addr")%>

服务器名<%=Request.ServerVariables("SERVER_NAME")%>

服务器IP<%=Request.ServerVariables("LOCAL_ADDR")%>

服务器端口<%=Request.ServerVariables("SERVER_PORT")%>

服务器时间<%=now%>

IIS版本<%=Request.ServerVariables"SERVER_SOFTWARE")%>

脚本超时时间<%=Server.ScriptTimeout%>

本文件路径<%=server.mappath(Request.ServerVariables("SCRIPT_NAME"))%>

服务器CPU数量<%=Request.ServerVariables("NUMBER_OF_PROCESSORS")%>

服务器解译引擎<%=ScriptEngine&"/" & ScriptEngineMajorVersion &"." & ScriptEngineMinorVersion & "." & ScriptEngineBuildVersion%>

服务器操作系统<%=Request.ServerVariables("OS")%>

27.ENTER键可以让光标移到下一个输入框

<input onkeydown="if(event.keyCode==13)event.keyCode=9">

28.检测某个网站的链接速度:

把如下代码加入<body>区域中:

<scriptlanguage=javascript>

tim=1

setInterval("tim++",100)

b=1

varautourl=newArray()

autourl[1]="< src="pic/url.gif" align=absMiddle border=0>www.njcatv.net"

autourl[2]="javacool.3322.net"

autourl[3]="< src="pic/url.gif" align=absMiddle border=0>www.sina.com.cn"

autourl[4]="www.nuaa.edu.cn"

autourl[5]="< src="pic/url.gif" align=absMiddle border=0>www.cctv.com"

functionbutt(){

document.write("<formname=autof>")

for(vari=1;i<autourl.length;i++)

document.write("<inputtype=textname=txt"+i+"size=10value=测试中……>=》<inputtype=textname=url"+i+"size=40>=》<inputtype=buttonvalue=GOonclick=window.open(this.form.url"+i+".value)><br/>")

document.write("<inputtype=submitvalue=刷新></form>")

}

butt()

functionauto(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++

}

functionrun(){for(vari=1;i<autourl.length;i++)document.write("<imgsrc=http://"+autourl[i]+"/"+Math.random()+"width=1height=1onerror=auto('< src="pic/url.gif" align=absMiddle border=0>http://";+autourl[i]+"')>")}

run()</script>

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等格式

<%

functiondl(f,n)

onerrorresumenext

sets=CreateObject("Adodb.Stream")

S.Mode=3

S.Type=1

S.Open

s.LoadFromFile(server.mappath(f))

iferr.number>0then

response.writeerr.number&":"&err.description

else

response.contentType="application/x-gzip"

response.addheader"Content-Disposition:","attachment;filename="&n

response.binarywrite(s.Read(s.size))

endif

endfunction

calldl("012922501.gif","t1.gif")

%>

19.检查一段字符串是否全由数字组成

<scriptlanguage="javascript"><!--

functioncheckNum(str){return!/\D/.test(str)}

alert(checkNum("1232142141"))

alert(checkNum("123214214a1"))

//--></script>

20.获得一个窗口的大小

document.body.clientWidth,document.body.clientHeight

document.body.offsetWidth,document.body.offsetHeight

有时还需要知道window.screenTop,window.screenLeft

21.怎么判断是否含有汉字

if(escape(str).indexOf("%u")!=-1)alert("含有汉字");

elsealert("全是字符");

22.TEXTAREA自适应文字行数的多少

IE5.5+可以用overflow-y:visible

<textarearows=1name=s1cols=27style="overflow-y:visible">

</textarea>

23.日期减去天数等于第二个日期

<scriptlanguage=javascript>

functioncc(dd,dadd)

{

//可以加上错误处理

vard=newDate(dd.replace("-","/"))

d.setDate(d.getDate()+dadd)

alert(d.getFullYear()+"年"+(d.getMonth()+1)+"月"+d.getDate()+"日")

}

cc("2002-2-28",2)

</script>

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有