[建站技术]制作网页时的几个经典代码

月中水

1.oncontextmenu="window.event.returnvalue=false"将彻底屏蔽鼠标右键
- ?$ k7 p$ h$ ]0 l7 g1 E<tableborderoncontextmenu=return(false)><td>no</table>可用于Table
2.<bodyonselectstart="returnfalse">取消选取、防止复制
3 G+ ]0 X5 y1 P4 b* |6 H
9 x3 _4 q* R9 i& g4 n3.onpaste="returnfalse"不准粘贴
: @' E) p: T! G/ n! j
4.oncopy="returnfalse;"oncut="returnfalse;"防止复制

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

6.<linkrel="Bookmark"href="favicon.ico">可以在收藏夹中显示出你的图标
1 i; ]* E0 n& m
7.<inputstyle="ime-mode:disabled">关闭输入法
  N" a+ D8 D$ `: D9 E
  ~. n/ z( M. w( u  [8.永远都会带着框架
9 f! a# R. s; l9 n' z) y) `<scriptlanguage="javascript"><!--
+ f* R$ H1 y# j2 z% ]& u5 T7 F: U8 @if(window==top)top.location.href="frames.htm";//frames.htm为框架网页
//--></script>

9.防止被人frame
, M8 u' g0 \7 d/ ]3 `8 f" F1 ]1 {<SCRIPTLANGUAGE=javascript><!--
. ?1 k; ^' J. x) [2 T* wif(top.location!=self.location)top.location=self.location;
//--></SCRIPT>

  ]* u$ T! c5 P& ]10.<noscript><iframesrc=*.html></iframe></noscript>网页将不能被另存为
3 e6 x2 d/ L( s% ^! R9 p
" Y9 v! z" i4 I; i+ `11.<inputtype=buttonvalue=查看网页源代码
6 Q" j0 |  c/ Y9 tonclick="window.location='view-source:'+'<IMG src="pic/url.gif" align=absMiddle border=0>' target=_blank>http://www.csdn.net/">

12.怎样通过asp的手段来检查来访者是否用了代理
<%ifRequest.ServerVariables("HTTP_X_FORWARDED_FOR")<>""then
/ I2 Z/ e. V+ h; T9 e- `response.write"<fontcolor=#FF0000>您通过了代理服务器，"&_
"真实的IP为"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")
" z& q! @/ n$ `+ ?endif
%>

13.取得控件的绝对位置
6 R  y3 D' d  @9 d. \
//javascript
<scriptlanguage="javascript">
; z: Q, j$ r, B3 bfunctiongetIE(e){
  V' d3 ]  \- P9 S' M* rvart=e.offsetTop;
varl=e.offsetLeft;
while(e=e.offsetParent){
: ^, {  `6 B5 i2 l( Ht+=e.offsetTop;
5 Z# g, Z+ R2 Vl+=e.offsetLeft;
}
alert("top="+t+"\nleft="+l);
}
7 T4 M3 \3 k$ K, V9 W</script>
, j& q' r" M4 G
$ n, P, Y& S5 P+ ?//VBScript
5 q# V. K3 C* l3 V$ b<scriptlanguage="VBScript"><!--
functiongetIE()
7 y- T4 b1 c* s; B& [dimt,l,a,b
seta=document.all.img1
  ~. R$ g6 j# K; o' Qt=document.all.img1.offsetTop
l=document.all.img1.offsetLeft
whilea.tagName<>"BODY"
seta=a.offsetParent
t=t+a.offsetTop
l=l+a.offsetLeft
wend
' j* f; S2 `7 S5 q4 A* Jmsgbox"top="&t&chr(13)&"left="&l,64,"得到控件的位置"
( e' L' E% y) aendfunction
--></script>

8 b  v% w. k9 R2 H14.光标是停在文本框文字的最后
/ J4 z8 g+ \& r1 c. X<scriptlanguage="javascript">
2 J* t) w! ^; T8 Ufunctioncc()
{
vare=event.srcElement;
varr=e.createTextRange();
r.moveStart('character',e.value.length);
r.collapse(true);
r.select();
, b3 j: t4 n0 \4 n3 ^/ O2 N4 Y}
</script>
. }$ n4 |1 [- d9 ], m' U<inputtype=textname=text1value="123"onfocus="cc()">
2 Z/ a4 f% p5 E4 ~: e0 z
15.判断上一页的来源
+ o) t3 H% O- C3 `- B" oasp:
3 f1 F* @1 J! i/ o; ~- _% n/ Y5 @5 irequest.servervariables("HTTP_REFERER")

' i7 ?, w# ?% k2 x; X1 A0 n$ wjavascript:
document.referrer
- f- V0 I# ~5 |1 G/ T6 a1 ]
16.最小化、最大化、关闭窗口
<objectid=hh1classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">
<paramname="Command"value="Minimize"></object>
) a$ S" C) p' t/ j<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>

; F0 t8 V( Z- ]<inputtype=buttonvalue=最小化onclick=hh1.Click()>
  D# H: r5 ^  g- j( D2 p<inputtype=buttonvalue=最大化onclick=hh2.Click()>
  X- E- \  ~- S3 A, r2 @0 C2 z<inputtype=buttonvalue=关闭onclick=hh3.Click()>
+ l! e/ X& [: b: P( r6 n) g3 i7 d本例适用于IE

* s8 L5 G6 v$ N. J4 o17.
/ y) X# p. T- x0 V. V<%
'定义数据库连接的一些常量
ConstadOpenForwardOnly=0'游标只向前浏览记录，不支持分页、Recordset、BookMark
ConstadOpenKeyset=1'键集游标，其他用户对记录说做的修改将反映到记录集中，但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、BookMark
ConstadOpenDynamic=2'动态游标功能最强，但耗资源也最多。用户对记录说做的修改，增加或删除记录都将反映到记录集中。支持全功能浏览(ACCESS不支持)。
1 r& B+ H1 Y- @! l% LConstadOpenStatic=3'静态游标，只是数据的一个快照，用户对记录说做的修改，增加或删除记录都不会反映到记录集中。支持向前或向后移动

ConstadLockReadOnly=1'锁定类型，默认的，只读，不能作任何修改
ConstadLockPessimistic=2'当编辑时立即锁定记录，最安全的方式
" {5 l" Y4 L  f5 A* aConstadLockOptimistic=3'只有在调用Update方法时才锁定记录集，而在此前的其他操作仍可对当前记录进行更改、插入和删除等
ConstadLockBatchOptimistic=4'当编辑时记录不会被锁定，而更改、插入和删除是在批处理方式下完成的
! ]: a% i8 v: A/ J: Y
% V! Y9 P  T' _8 d0 C& j! |1 UConstadCmdText=&H0001
ConstadCmdTable=&H0002
* r* B+ A, U- h+ w%>
2 ?) @: D0 _  A9 {
18.网页不会被缓存
HTM网页
<METAHTTP-EQUIV="pragma"CONTENT="no-cache">
1 M/ e* d% i7 N/ u* Q3 ^  N<METAHTTP-EQUIV="Cache-Control"CONTENT="no-cache,must-revalidate">
. v: X; a5 J) ~<METAHTTP-EQUIV="expires"CONTENT="Wed,26Feb199708:21:57GMT">
4 k  B, i. g- K. o* e5 G或者<METAHTTP-EQUIV="expires"CONTENT="0">
' h5 }, P8 f: z. q) ^" AASP网页
Response.Expires=-1
& _5 W' ^1 e, dResponse.ExpiresAbsolute=Now()-1
Response.cachecontrol="no-cache"
6 F" @0 p% i9 |+ U* a5 d, h/ KPHP网页
header("Expires:Mon,26Jul199705:00:00GMT");
header("Cache-Control:no-cache,must-revalidate");
9 ~. l. H+ d- Q+ R5 c3 V1 Kheader("Pragma:no-cache");
/ u. l/ v$ C$ z1 j3 D+ A, R1 r$ L& b' F

8 S0 s. y) r; @+ q19.检查一段字符串是否全由数字组成
/ ?9 Q5 n/ Y* `6 v& u" U<scriptlanguage="javascript"><!--
functioncheckNum(str){returnstr.match(/\D/)==null}
alert(checkNum("1232142141"))
/ o5 |* ?& M6 {9 ~9 v$ m# t3 \9 b8 xalert(checkNum("123214214a1"))
# d8 X3 X: v2 f2 p4 r2 T//--></script>
; M0 X  j/ ~0 d. M" w1 n20.获得一个窗口的大小
: w$ v! n5 E0 ?* Bdocument.body.clientWidth,document.body.clientHeight

21.怎么判断是否是字符
if(/[^\x00-\xff]/g.test(s))alert("含有汉字");
  U  Y! \6 h% f8 e( J( Felsealert("全是字符");
0 T9 q0 F) G/ l8 |$ l8 V$ t* m
22.TEXTAREA自适应文字行数的多少
0 j& _& K% F5 C. O! g2 {4 ]; X  c<textarearows=1 name=s1 cols=27>
</textarea>

5 o3 T8 m6 c5 L  R- D9 j/ S23.日期减去天数等于第二个日期
<scriptlanguage=javascript>
5 W7 F2 Z# ]$ @" e3 Mfunctioncc(dd,dadd)
{
- h7 E; \( g/ q//可以加上错误处理
vara=newDate(dd)
a=a.valueOf()
a=a-dadd*24*60*60*1000
a=newDate(a)
: t- w( B+ k* Y4 f! o! K% z3 aalert(a.getFullYear()+"年"+(a.getMonth()+1)+"月"+a.getDate()+"日")
* i- ^. F( g( g5 z3 `6 Z! i6 g}
6 T! w% N0 D: R* icc("12/23/2002",2)
</script>
1 c9 i- P6 v: l" E, X9 U
24.选择了哪一个Radio
<HTML><scriptlanguage="vbscript">
functioncheckme()
$ s8 F; p" y' P# X, \foreachobinradio1
# X  v( R3 ?& @& xifob.checkedthenwindow.alertob.value
next
endfunction
</script><BODY>
<INPUT name="radio1" type="radio" value="style" checked>style
' R3 o9 A& }; C" p9 F2 \<INPUT name="radio1" type="radio" value="barcode">Barcode
: q8 Q$ \- w9 s9 {  L7 E<INPUT type="button" value="check"onclick="checkme()">
</BODY></HTML>
3 F. i8 [; q8 x
2 h) t7 @% `% G& N5 r25.获得本页url的request.servervariables("")集合
6 d# R2 {- S$ P. r+ W2 K" GResponse.Write"<TABLEborder=1><!--TableHeader--><TR><TD><B>Variables</B></TD><TD><B>value</B></TD></TR>"
' a  z) _/ X* b, d4 X1 y! QforeachobinRequest.ServerVariables
' T. M8 }+ |" G& c6 x, WResponse.Write"<TR><TD>"&ob&"</TD><TD>"&Request.ServerVariables(ob)&"</TD></TR>"
2 Q: b/ ]" L7 G) h' y! Qnext
8 P% k: ^6 U4 j' b% a1 gResponse.Write"</TABLE>"
: W9 m; L/ C8 q
26.
本机ip<%=request.servervariables("remote_addr")%>
) j  ]! ]4 |, w/ Y- R" R服务器名<%=Request.ServerVariables("SERVER_NAME")%>
服务器IP<%=Request.ServerVariables("LOCAL_ADDR")%>
服务器端口<%=Request.ServerVariables("SERVER_PORT")%>
! }: H6 [7 h0 f/ F1 \( ?4 f" P& F服务器时间<%=now%>
; t* [" N) \# q! s( r7 }IIS版本<%=Request.ServerVariables"SERVER_SOFTWARE")%>
. j6 f. ]# [" |" ?2 w. r脚本超时时间<%=Server.ScriptTimeout%>
本文件路径<%=server.mappath(Request.ServerVariables("SCRIPT_NAME"))%>
服务器CPU数量<%=Request.ServerVariables("NUMBER_OF_PROCESSORS")%>
服务器解译引擎<%=ScriptEngine&"/" & ScriptEngineMajorVersion &"." & ScriptEngineMinorVersion & "." & ScriptEngineBuildVersion%>
, u* ~0 t7 w0 `, e7 w服务器操作系统<%=Request.ServerVariables("OS")%>
8 O9 Q8 j" Q  I. N6 E' B
27.ENTER键可以让光标移到下一个输入框
2 |$ x- V. b. Q, Z9 s- L# g) l5 P<input>
$ a, c/ T1 U* J1 {
28.检测某个网站的链接速度：
7 U* j$ U" L3 d( C3 M# Q把如下代码加入<body>区域中:
$ M& l& N& ?) _5 L0 B- ~<scriptlanguage=javascript>
6 [4 d, ~! o5 ]: Dtim=1
setInterval("tim++",100)
) ]5 {4 r( n% g- ?8 T6 j) `* ?b=1

2 D) N" b3 v/ J4 rvarautourl=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"
; I6 T. {3 `  }9 Mautourl[4]="www.nuaa.edu.cn"
* m$ `' `& N- i# }6 f8 gautourl[5]="< src="pic/url.gif" align=absMiddle border=0>www.cctv.com"
* F- G* K0 [. b& x) W! L, Z
; }& G. \/ h4 @8 D* K; y3 {functionbutt(){
  \; b) }8 q! \# j3 c. a+ cdocument.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>")
}
' Z% l' ~* F/ \butt()
- u7 u+ z9 s" R/ ]9 x9 {/ ]7 Xfunctionauto(url){
# c# n0 k2 c1 zdocument.forms[0]["url"+b].value=url
4 S  d! c) R2 S3 c: A1 ?* D5 H& F2 aif(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+"/"+Math.random()+"width=1height=1onerror=auto('< src="pic/url.gif" align=absMiddle border=0>http://";+autourl+"')>")}
run()</script>


2 j- B( w& W) ^7 l' E4 X29.各种样式的光标
auto：标准光标
default：标准箭头
hand：手形光标
wait：等待光标
text：I形光标
9 P8 x6 R' ]8 f0 Avertical-text：水平I形光标
no-drop：不可拖动光标
" N. C* \0 b9 o2 M0 l; L* g* qnot-allowed：无效光标
& ^7 I/ [: N3 V, i/ i8 Z0 thelp：?帮助光标
all-scroll：三角方向标
move：移动标
2 l( S) `1 {9 W& Ycrosshair：十字标
0 ]1 y) L  A8 J2 H; g9 x4 s5 we-resize
1 w# m& S7 n; a$ G( H2 [3 ~' Wn-resize
nw-resize
w-resize
* ?! G9 @" K% t+ as-resize
, S4 f" l9 \. s5 B5 B1 \8 t8 Nse-resize
sw-resize

1.本地无缓存，每次自动刷新
response.expires=0
response.addHeader"pragma","no-cache"
# F7 Q7 z2 C2 n" q2 lresponse.addHeader"cache-control","private"

2.修改contentType并下载gif等格式
<%
# b" Q3 P( r: x' |5 X- i1 Kfunctiondl(f,n)
onerrorresumenext
7 r" S5 G! o- @9 _) _
sets=CreateObject("Adodb.Stream")
S.Mode=3
S.Type=1
0 K% J, E2 T- s! yS.Open
, Z2 I* _7 P  D- ?4 c' i) Js.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
; J$ x3 R* }: @3 V5 o* Z! Iresponse.binarywrite(s.Read(s.size))
endif
2 a7 s2 D% o0 Tendfunction

: ?; G* k* P9 G( H( G  }2 Tcalldl("012922501.gif","t1.gif")
%>
. J* ^$ C* u8 Z# {" a' j" a
, \% {$ R( ?$ A1 P' `; b
" N: c4 Q+ c( r$ ~19.检查一段字符串是否全由数字组成
<scriptlanguage="javascript"><!--
# e- B" p# D1 ], `( s. ?4 RfunctioncheckNum(str){return!/\D/.test(str)}
  l) q" ]2 x) b) Oalert(checkNum("1232142141"))
  G% v1 y" {$ d" ^% _alert(checkNum("123214214a1"))
//--></script>
- _4 c5 A7 O4 X/ S6 n+ t
20.获得一个窗口的大小
$ @2 M0 D$ ~9 V3 G9 x  edocument.body.clientWidth,document.body.clientHeight
' }6 U, l5 p6 pdocument.body.offsetWidth,document.body.offsetHeight
有时还需要知道window.screenTop,window.screenLeft
0 x8 [5 i2 z! e( j6 c$ L
21.怎么判断是否含有汉字
if(escape(str).indexOf("%u")!=-1)alert("含有汉字");
elsealert("全是字符");
' g9 N# S' D  O- B$ _) V
% d3 z6 H9 h5 s3 g% E22.TEXTAREA自适应文字行数的多少
" {1 [" X  {5 Q* zIE5.5+可以用overflow-y:visible
: X4 p8 H$ n* }<textarearows=1name=s1cols=27style="overflow-y:visible">
: j) o' M  P' y/ m: A6 F</textarea>
, e8 d, f9 L" b: l* }, U
23.日期减去天数等于第二个日期
<scriptlanguage=javascript>
functioncc(dd,dadd)
8 c# V! s7 [& `4 R{
//可以加上错误处理
vard=newDate(dd.replace("-","/"))
d.setDate(d.getDate()+dadd)
alert(d.getFullYear()+"年"+(d.getMonth()+1)+"月"+d.getDate()+"日")
}
cc("2002-2-28",2)
</script>