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

月中水

1.oncontextmenu="window.event.returnvalue=false"将彻底屏蔽鼠标右键
<tableborderoncontextmenu=return(false)><td>no</table>可用于Table
2.<bodyonselectstart="returnfalse">取消选取、防止复制
8 |2 a. K2 D3 P
+ L$ J& O0 l7 t8 z/ s! g' Z0 h1 b3.onpaste="returnfalse"不准粘贴

; g3 i: M' _% P# t* [5 z6 m, o4.oncopy="returnfalse;"oncut="returnfalse;"防止复制

5 _6 B( Z0 N5 ]9 Y5.<linkrel="ShortcutIcon"href="favicon.ico">IE地址栏前换成自己的图标

6.<linkrel="Bookmark"href="favicon.ico">可以在收藏夹中显示出你的图标
( E* i5 ~, Q- c, W  M4 P5 T+ a. B5 f0 O
7.<inputstyle="ime-mode:disabled">关闭输入法

5 `" g/ F0 p  Q( V+ b8.永远都会带着框架
<scriptlanguage="javascript"><!--
if(window==top)top.location.href="frames.htm";//frames.htm为框架网页
" g: H* _* @: ~- g0 Y& R8 h//--></script>

9.防止被人frame
<SCRIPTLANGUAGE=javascript><!--
/ O( F+ O2 T/ n- Rif(top.location!=self.location)top.location=self.location;
: P1 D4 r; B0 l  s- s+ e; k; a* r//--></SCRIPT>

9 M3 x3 X) j0 x& P4 P; G10.<noscript><iframesrc=*.html></iframe></noscript>网页将不能被另存为
2 @2 F8 w! I$ E3 u8 n' q
11.<inputtype=buttonvalue=查看网页源代码
onclick="window.location='view-source:'+'<IMG src="pic/url.gif" align=absMiddle border=0>' target=_blank>http://www.csdn.net/">
* x* x9 A' v) Y7 g4 \3 {: \
12.怎样通过asp的手段来检查来访者是否用了代理
* R6 T, B' r  j4 ^9 ?+ o% J3 h<%ifRequest.ServerVariables("HTTP_X_FORWARDED_FOR")<>""then
3 u! L( L& N- i6 ?. s# L% y! ]response.write"<fontcolor=#FF0000>您通过了代理服务器，"&_
"真实的IP为"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")
endif
+ h3 S* V0 `/ t1 d; u%>

$ n' k% b/ ]6 w4 I* w3 Q% s13.取得控件的绝对位置
5 a: X4 d: Z% |* x
9 ]+ `; S. d1 `% f; o//javascript
<scriptlanguage="javascript">
/ q! j) N5 S( j5 @1 [functiongetIE(e){
- }+ r6 h) L4 L9 ?/ p5 Mvart=e.offsetTop;
varl=e.offsetLeft;
+ G( T! V$ F7 _8 Y+ C1 Pwhile(e=e.offsetParent){
! a. s  D0 `. ^, p% `t+=e.offsetTop;
) Y- }/ O, y; _/ e/ C/ _) l, Fl+=e.offsetLeft;
}
# y$ J5 T& S. v" s1 ~5 p/ b/ ]alert("top="+t+"\nleft="+l);
+ r% E# G3 _8 K/ S. B; m. i- w}
# ~7 o4 G) i; [+ C; \# b</script>
8 I% a; `: I# Z) C% f7 d
! y2 U1 S5 U0 q4 Q, x4 b//VBScript
<scriptlanguage="VBScript"><!--
functiongetIE()
9 |6 a/ [9 L+ Y2 o' sdimt,l,a,b
seta=document.all.img1
t=document.all.img1.offsetTop
( p: v6 y3 s1 c7 t- T) `2 cl=document.all.img1.offsetLeft
# |. o* X: o9 d7 kwhilea.tagName<>"BODY"
seta=a.offsetParent
t=t+a.offsetTop
/ ^1 J. ^1 Q! r4 j2 zl=l+a.offsetLeft
wend
msgbox"top="&t&chr(13)&"left="&l,64,"得到控件的位置"
endfunction
--></script>
0 V5 j0 m: a# g% I6 o/ h* y! }5 W
14.光标是停在文本框文字的最后
<scriptlanguage="javascript">
* G& F" H+ y; B% Mfunctioncc()
% i$ R8 j9 q/ o0 H' K{
$ ~$ S4 O1 r9 M7 L$ \$ L) Avare=event.srcElement;
varr=e.createTextRange();
r.moveStart('character',e.value.length);
r.collapse(true);
r.select();
}
5 K3 _' Q8 ?& _( T. S</script>
* _% d7 T+ E% e8 {9 n<inputtype=textname=text1value="123"onfocus="cc()">
' I. G; Z) E- h0 W
- f' J' ^+ B1 w* I# u/ X( B2 y9 ?15.判断上一页的来源
; F* o% x0 _5 {# rasp:
6 h  _/ M3 H$ J- P) [' L, B9 krequest.servervariables("HTTP_REFERER")

javascript:
document.referrer
( [+ O3 a1 X" P& ], z: V" w) u
" \$ v5 d/ v9 [/ z/ R9 H" N16.最小化、最大化、关闭窗口
<objectid=hh1classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">
6 N- I: L: O8 M5 ~$ E$ k<paramname="Command"value="Minimize"></object>
' k9 l( x" }+ p' _4 A<objectid=hh2classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">
<paramname="Command"value="Maximize"></object>
<OBJECTid=hh3classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">
9 t6 B7 l8 z7 @) F9 z/ a6 F! `<PARAMNAME="Command"value="Close"></OBJECT>

7 b& \6 g" a% Y+ c8 X! ]4 L1 B<inputtype=buttonvalue=最小化onclick=hh1.Click()>
# Z. S& i% t& F" w+ P<inputtype=buttonvalue=最大化onclick=hh2.Click()>
( S  g- I5 e6 w<inputtype=buttonvalue=关闭onclick=hh3.Click()>
) o8 t7 q' \, W* M$ R本例适用于IE
6 z, G7 A5 b0 p/ a
17.
<%
'定义数据库连接的一些常量
ConstadOpenForwardOnly=0'游标只向前浏览记录，不支持分页、Recordset、BookMark
% ^: V7 m7 P( u- n9 A) s* O- AConstadOpenKeyset=1'键集游标，其他用户对记录说做的修改将反映到记录集中，但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、BookMark
ConstadOpenDynamic=2'动态游标功能最强，但耗资源也最多。用户对记录说做的修改，增加或删除记录都将反映到记录集中。支持全功能浏览(ACCESS不支持)。
: y& v) g- e  y* k3 }ConstadOpenStatic=3'静态游标，只是数据的一个快照，用户对记录说做的修改，增加或删除记录都不会反映到记录集中。支持向前或向后移动

, S+ C$ `$ }5 M1 B! V& Y. PConstadLockReadOnly=1'锁定类型，默认的，只读，不能作任何修改
ConstadLockPessimistic=2'当编辑时立即锁定记录，最安全的方式
& W: x9 s: u  d  K3 ?+ W* wConstadLockOptimistic=3'只有在调用Update方法时才锁定记录集，而在此前的其他操作仍可对当前记录进行更改、插入和删除等
ConstadLockBatchOptimistic=4'当编辑时记录不会被锁定，而更改、插入和删除是在批处理方式下完成的
! f" {2 J. q. r1 F% n5 ?
ConstadCmdText=&H0001
* D8 @* g! l4 K: gConstadCmdTable=&H0002
3 \  k7 C" q0 [* q' W7 E, T) x%>
) ^) b1 ^, d( p- w& e! x" b* G1 O
5 q1 ?3 Z: d/ Y. w) q% Q: s' D' L+ }8 b18.网页不会被缓存
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
  y6 ^* Q, q* BResponse.ExpiresAbsolute=Now()-1
6 }0 t; ~( z" b# ^$ PResponse.cachecontrol="no-cache"
5 b) g5 k& Y5 @+ j) YPHP网页
header("Expires:Mon,26Jul199705:00:00GMT");
& r, e; f# Z" Gheader("Cache-Control:no-cache,must-revalidate");
header("Pragma:no-cache");
3 ~$ s/ V! a" @% i1 k
. q/ r5 m6 [- ]. H1 |' {5 l3 B: q
6 [, c& }2 l: \5 u# v" Z( r19.检查一段字符串是否全由数字组成
! G2 v' B+ g) w3 X4 q# P5 v' Q" |! y  T<scriptlanguage="javascript"><!--
& k; z( ^4 @; d: L; ^' z2 K  t, _functioncheckNum(str){returnstr.match(/\D/)==null}
alert(checkNum("1232142141"))
* O: N  v# V2 ~  h4 c- O; J3 z! Talert(checkNum("123214214a1"))
5 S) g5 e: s6 B. _( a) f5 i//--></script>
  b- g% m6 R: n! u% l3 J' W3 Q20.获得一个窗口的大小
document.body.clientWidth,document.body.clientHeight

2 j2 w" X, x2 w$ N* d21.怎么判断是否是字符
8 R: Z% \8 D  P) kif(/[^\x00-\xff]/g.test(s))alert("含有汉字");
, S0 ?( ?0 \/ t" Xelsealert("全是字符");
( i1 A' m3 ]/ w; a7 F: c, {5 u4 E  E
22.TEXTAREA自适应文字行数的多少
<textarearows=1 name=s1 cols=27>
4 n4 Q# A  x0 k/ k/ F</textarea>

23.日期减去天数等于第二个日期
$ [& j7 d7 \' b<scriptlanguage=javascript>
$ J7 U8 m" m& E) _functioncc(dd,dadd)
) I, [. T! g6 s+ F9 Y7 d{
//可以加上错误处理
vara=newDate(dd)
" i) [* z6 c9 S; v' T) O9 Ra=a.valueOf()
a=a-dadd*24*60*60*1000
4 n1 U8 ]% j2 x, \1 ha=newDate(a)
alert(a.getFullYear()+"年"+(a.getMonth()+1)+"月"+a.getDate()+"日")
}
cc("12/23/2002",2)
& U7 B3 x  s# q+ d7 v+ }</script>
* n3 Z$ _0 D& a  ?" d/ R& i
& S: w% o, i4 X, d24.选择了哪一个Radio
! U# \$ l+ K) e8 _<HTML><scriptlanguage="vbscript">
functioncheckme()
foreachobinradio1
ifob.checkedthenwindow.alertob.value
next
& J  G' a2 P+ Aendfunction
</script><BODY>
4 E. h% c( H) e7 X% h) @. O$ o<INPUT name="radio1" type="radio" value="style" checked>style
1 u/ N& {  o6 Z+ G1 |# g( ~<INPUT name="radio1" type="radio" value="barcode">Barcode
% i8 A; h6 o( K<INPUT type="button" value="check"onclick="checkme()">
: j- S" v7 Q$ \/ T6 q% b</BODY></HTML>
+ ^$ x2 u* ]! k2 [8 H" R' p9 o
& M4 F* |' s3 l' G& D& F25.获得本页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
! J2 o+ h8 g  gResponse.Write"</TABLE>"

0 ?- G0 T6 @5 a  u% V26.
本机ip<%=request.servervariables("remote_addr")%>
服务器名<%=Request.ServerVariables("SERVER_NAME")%>
服务器IP<%=Request.ServerVariables("LOCAL_ADDR")%>
服务器端口<%=Request.ServerVariables("SERVER_PORT")%>
服务器时间<%=now%>
1 F/ ^6 X5 @+ e7 V* YIIS版本<%=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")%>
9 A. }* |3 h* P  Z* Y
27.ENTER键可以让光标移到下一个输入框
% |" n. K. s) q2 j0 G# A<input>

. Q* l; l5 |$ U1 `! H9 [1 Y28.检测某个网站的链接速度：
5 O/ }2 {9 s$ O把如下代码加入<body>区域中:
<scriptlanguage=javascript>
0 L9 B# Y2 _4 I  R* mtim=1
3 W7 D% A$ a+ D+ R9 J$ T! w6 e/ {setInterval("tim++",100)
b=1
; n$ n" v& x% T: U! d
varautourl=newArray()
( L' M; B, R" v+ C0 j7 w; T7 uautourl[1]="< src="pic/url.gif" align=absMiddle border=0>www.njcatv.net"
autourl[2]="javacool.3322.net"
' l+ u) \  O, c* h* tautourl[3]="< src="pic/url.gif" align=absMiddle border=0>www.sina.com.cn"
autourl[4]="www.nuaa.edu.cn"
5 ]" [1 q2 a% l3 i) Cautourl[5]="< src="pic/url.gif" align=absMiddle border=0>www.cctv.com"
) v) I3 c4 h8 S2 ~$ S' J
functionbutt(){
document.write("<formname=autof>")
+ {% E3 \  m2 |7 w2 a) S8 Jfor(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>")
7 c) S. [( ~( |7 k$ w. F  \}
4 J' E% z* I$ B0 O/ }$ rbutt()
functionauto(url){
& E; z1 }6 V2 @3 `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+"秒"}
) O! n9 G1 d# w5 wb++
}
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+"')>")}
) r0 ]' h9 Y$ P8 l0 l# Hrun()</script>

5 t% q1 q  O* h& ]- n
29.各种样式的光标
  ~0 J# G9 @+ M( W* [auto：标准光标
default：标准箭头
hand：手形光标
wait：等待光标
text：I形光标
: L! P' ~6 }6 D! ~vertical-text：水平I形光标
+ R7 j% a; r5 v$ a6 Z; Bno-drop：不可拖动光标
not-allowed：无效光标
* d5 d, R- p, q: [+ [help：?帮助光标
8 K8 o# @: T4 f. `  Nall-scroll：三角方向标
move：移动标
crosshair：十字标
0 Z/ Y4 C- U7 e, A% |e-resize
n-resize
nw-resize
w-resize
s-resize
se-resize
sw-resize
& A1 X* F, _. f( m/ E
1.本地无缓存，每次自动刷新
/ X0 F0 t) P# l& B$ W' t# kresponse.expires=0
' j- `1 v$ s* m4 e) A# nresponse.addHeader"pragma","no-cache"
response.addHeader"cache-control","private"
" n+ }1 u. @1 a. ~$ C- E
2.修改contentType并下载gif等格式
% _) U% |- u4 H: T: K, m<%
functiondl(f,n)
onerrorresumenext
% l5 z. J  ^% s2 ^) x: B
sets=CreateObject("Adodb.Stream")
S.Mode=3
3 G! J" i0 L6 G: I$ F/ O! D% {& TS.Type=1
! K. F4 b$ N+ S" s/ w% p* ES.Open
. s8 U* m  [& p* T* Y. Ys.LoadFromFile(server.mappath(f))
iferr.number>0then
+ e  k. ^0 @4 oresponse.writeerr.number&":"&err.description
else
' _7 j7 b- G7 @& C- Nresponse.contentType="application/x-gzip"
response.addheader"Content-Disposition:","attachment;filename="&n
response.binarywrite(s.Read(s.size))
endif
9 S- M3 Y! Z  @, {endfunction

calldl("012922501.gif","t1.gif")
%>
( \& a1 m1 K  n4 p5 f
3 z1 p/ ?/ n8 E
19.检查一段字符串是否全由数字组成
! ^, E6 G" o6 Y5 x<scriptlanguage="javascript"><!--
3 F) X6 j' m# ~$ W& pfunctioncheckNum(str){return!/\D/.test(str)}
0 a4 d2 R0 K7 t8 ~1 c( s. nalert(checkNum("1232142141"))
alert(checkNum("123214214a1"))
//--></script>
% U# m; y4 r+ A4 [0 x7 R/ _# G# \
+ O9 C' C$ n. f- p! j0 T( o# t20.获得一个窗口的大小
document.body.clientWidth,document.body.clientHeight
document.body.offsetWidth,document.body.offsetHeight
# }) i. g  i6 A有时还需要知道window.screenTop,window.screenLeft

21.怎么判断是否含有汉字
) E9 H" F! Q2 r5 j. Z/ Aif(escape(str).indexOf("%u")!=-1)alert("含有汉字");
elsealert("全是字符");
2 P& F/ K' p( F( l! n% x. s
22.TEXTAREA自适应文字行数的多少
( x% H7 [+ N7 P5 AIE5.5+可以用overflow-y:visible
<textarearows=1name=s1cols=27style="overflow-y:visible">
</textarea>

23.日期减去天数等于第二个日期
( e% g; [# k3 c<scriptlanguage=javascript>
functioncc(dd,dadd)
{
//可以加上错误处理
vard=newDate(dd.replace("-","/"))
d.setDate(d.getDate()+dadd)
alert(d.getFullYear()+"年"+(d.getMonth()+1)+"月"+d.getDate()+"日")
6 |2 u( P; f  B}
# t1 U( F4 }( F) @4 D( acc("2002-2-28",2)
</script>