广西经贸职业技术学院论坛
标题:
[建站技术]值得收藏的一些代码
[打印本页]
作者:
月中水
时间:
2009-10-16 01:04
标题:
[建站技术]值得收藏的一些代码
1. 将彻底屏蔽鼠标右键
% Q0 ^' e6 t$ N) v9 Y6 ?- w2 b
<table border oncontextmenu=return(false)><td>no</table> 可用于Table
. M3 s d; I( N9 d
! e/ [) ]- {8 \
2. <body> 取消选取、防止复制
) r- J% F* {5 s- |
+ s. G1 O9 J4 M1 `+ Y# t
3. 不准粘贴
5 Z" f- s( Z/ F9 x
: s6 _$ v4 J: G" B* H3 J' [, q
4. 防止复制
6 L5 x& |$ D$ v% ?3 u b/ J+ x7 T
1 u- a0 c4 f, q" }
5. <link rel="Shortcut Icon" href="favicon.ico"> IE地址栏前换成自己的图标
}( t' d- D$ a4 g4 ~
6 k3 l& a% m! k" w
6. <link rel="Bookmark" href="favicon.ico"> 可以在收藏夹中显示出你的图标
1 N T" h d' ~% o+ J
& q1 f8 u9 p+ p3 ~8 C5 Y# ^
7. <input style="ime-mode:disabled"> 关闭输入法
. m6 h9 y2 k3 ~7 E2 |8 N: T0 c
' c0 K+ A# M" B. J
8. 永远都会带着框架
; M% y6 l7 E( `1 N8 S8 h
<script language="javascript"><!--
) I, {$ ~/ G. w0 C A3 ]6 d
if (window == top)top.location.href = "frames.htm"; //frames.htm为框架网页
2 }) V4 O1 o, p- m& T: [; j
// --></script>
+ r" k8 D! n d( l0 N9 H# f# f
" u, @; z) q5 P2 G2 a" J2 k
9. 防止被人frame
% x: ]: m; o4 F" z
<SCRIPT LANGUAGE=javascript><!--
: z- B6 J( {( H/ x: r
if (top.location != self.location)top.location=self.location;
/ o4 R: v* y5 V4 X
// --></SCRIPT>
5 p0 ^0 @9 Q& W1 F- L- ^
+ n, `1 K. D$ b; q2 A: d
10. <noscript><iframe src=*.html></iframe></noscript> 网页将不能被另存为
. U! [% a3 g8 a8 `; |
( Z$ x$ @5 [6 [3 E' H
11. <input type=button value=查看网页源代码
4 I0 U, X# \* q
onclick="window.location = 'view-source:'+ 'http://www.csdn.net/'">
" S; z; E [! B$ I9 f3 e) s- A! w0 u
6 h0 g" |1 U( \) |3 F, W
12. 怎样通过asp的手段来检查来访者是否用了代理
# [# f% e: \# t4 N
<% if Request.ServerVariables("HTTP_X_FORWARDED_FOR")<>"" then
1 n. v; L8 Z5 o$ @) D' r% v
response.write "<font color=#FF0000>您通过了代理服务器,"& _
. T! S8 l) b! P" {7 w, N
"真实的IP为"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")
' S2 g y3 x2 P; S# p% F
end if
- y& D& a8 r7 P
%>
. p1 h1 H% S: q/ j P
# x" L1 `7 ~6 h
13. 取得控件的绝对位置
$ N2 z( P8 B0 ^7 O" z$ E- c
' i, O+ t- g- X0 s1 h; u/ G" W1 N7 }
//javascript
8 N0 J/ }! w+ X1 J" }
<script language="javascript">
% n! d" Y. d4 z! D7 W$ @# |
function getIE(e){
3 b) f% D- R, \( q3 w% J' z
var t=e.offsetTop;
. V N/ a$ c& z& D/ t
var l=e.offsetLeft;
: u# q: l2 C* q# v% p
while(e=e.offsetParent){
/ p' d8 L' e% ^% D4 I# c7 k, |
t+=e.offsetTop;
( S( C, E. b5 p
l+=e.offsetLeft;
/ m$ F. ?8 r3 X/ H8 m
}
) U3 @. L U* v) y! U2 @
alert("top="+t+"\nleft="+l);
1 h( j, t A6 N+ _4 i/ V
}
$ X5 w7 {( ~1 U9 W
</script>
: F6 a0 F+ l5 x/ g! y2 Y
" F) J) Q2 l M; b9 q) H. m
//VBScript
! L2 w4 b5 @$ E9 }, [
<script language="VBScript"><!--
: R9 p8 s7 g4 ]
function getIE()
3 R' S$ {* W- l- x3 a7 O
dim t,l,a,b
/ N( I& a( \ p: k
set a=document.all.img1
) }" X9 o V' q9 E
t=document.all.img1.offsetTop
% }8 y. j7 d5 z7 y% t
l=document.all.img1.offsetLeft
7 L! Y6 C3 M8 c1 b
while a.tagName<>"BODY"
0 G7 Z; s/ R7 K4 u6 ~* `% x
set a = a.offsetParent
) w: j! U% F( `6 C% O ]
t=t+a.offsetTop
7 V% J0 P; P; f2 u) S6 W* ~
l=l+a.offsetLeft
# Z7 H2 x$ e2 ?8 v( f% p
wend
" }0 F0 L# x' |$ L* W; q! `
msgbox "top="&t&chr(13)&"left="&l,64,"得到控件的位置"
8 \% l! v( B: l j! p3 Q. F( I B$ |
end function
1 \+ { {7 C' l) r7 n
--></script>
8 ?: \( j7 x8 o3 L! K( z7 _
, {/ M4 @* c% z
14. 光标是停在文本框文字的最后
" @* f2 \: P7 L! M4 ?0 @ y/ Y0 _1 Y0 O4 L
<script language="javascript">
0 g/ [8 M+ B# V" s! G8 |
function cc()
5 K# i1 `( M8 f
{
- ~2 W5 L2 i' ]) u! a5 F
var e = event.srcElement;
! k! J: U( P2 T$ N' e
var r =e.createTextRange();
* r: Q* B0 s( h5 f' F
r.moveStart('character',e.value.length);
8 e5 P+ _0 f) D& ^# {/ A5 G
r.collapse(true);
* r g* @) r7 F- @
r.select();
- w/ U8 \; g% j4 t- P2 X4 P& k. j
}
" B3 y% g" a, l% ~+ l3 q
</script>
* r- S; G7 \( V7 ]
<input type=text name=text1 value="123">
( I* R5 V) P; @# T
; I. Q6 ?5 t2 q: ~
15. 判断上一页的来源
" V5 Q: m1 }% o6 x/ A
asp:
" y# @% ^& `8 V, J9 Q
request.servervariables("HTTP_REFERER")
, [% r- n8 J- o' ?% R
r7 T2 [2 M7 q/ l
javascript :
* q) M. D' F$ F1 r& x" ^! f
document.referrer
7 R0 a) L; O) q& q& P
3 h1 D9 @# C$ w# D
16. 最小化、最大化、关闭窗口
( H6 Y& L0 I2 t) ^6 q
<object id=hh1 classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">
1 [; u$ I4 a+ t+ \
<param name="Command" value="Minimize"></object>
, ^; Q( n* V+ x7 S, a
<object id=hh2 classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">
6 t6 b6 I3 l* a+ g6 P
<param name="Command" value="Maximize"></object>
7 `4 u! x7 n+ d$ e' o+ Q8 F# e) ?; x
<OBJECT id=hh3 classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">
( y6 ], e! u; B) u) j
<PARAM NAME="Command" value="Close"></OBJECT>
, Q: C# v8 l; S3 s/ a3 ? z
2 T) f9 G) ?3 J
<input type=button value=最小化 onclick=hh1.Click()>
& Q: U* J7 w$ i& h0 E& [
<input type=button value=最大化 onclick=hh2.Click()>
* e' p% q+ X6 P$ e
<input type=button value=关闭 onclick=hh3.Click()>
$ ]/ [% F2 j- q0 R- D+ C" ^
本例适用于IE
' h6 @5 |+ x" |, z
( T5 h. Z! c+ v1 l, a% @3 W
17.
. z0 H0 M8 s# h6 N( B! B' d( G! K
<%
0 ?3 _1 M! E- i3 {
'定义数据库连接的一些常量
5 _' G k7 b- z( O
Const adOpenForwardOnly = 0 '游标只向前浏览记录,不支持分页、Recordset、BookMark
/ G0 h$ t8 z& e/ X; n3 m' W2 F
Const adOpenKeyset = 1 '键集游标,其他用户对记录说做的修改将反映到记录集中,但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、BookMark
- N/ t o1 q$ e2 h; s! }
Const adOpenDynamic = 2 '动态游标功能最强,但耗资源也最多。用户对记录说做的修改,增加或删除记录都将反映到记录集中。支持全功能浏览(ACCESS不支持)。
1 _/ j" K6 H* C9 {- k
Const adOpenStatic = 3 '静态游标,只是数据的一个快照,用户对记录说做的修改,增加或删除记录都不会反映到记录集中。支持向前或向后移动
8 }. q- p- m: o, ?4 M- i
5 _6 W( l4 G9 G! j
Const adLockReadOnly = 1 '锁定类型,默认的,只读,不能作任何修改
e% @0 ~; f% v) r
Const adLockPessimistic = 2 '当编辑时立即锁定记录,最安全的方式
% u. C( e& }6 ]) A" K: ~
Const adLockOptimistic = 3 '只有在调用Update方法时才锁定记录集,而在此前的其他操作仍可对当前记录进行更改、插入和删除等
' b& ?( {+ l' D, D. g8 ^
Const adLockBatchOptimistic = 4 '当编辑时记录不会被锁定,而更改、插入和删除是在批处理方式下完成的
E% F4 m4 k4 C! W5 X% ?$ ]9 ?
2 K1 m) V7 v( ^
Const adCmdText = &H0001
/ |6 V4 d- y" A, ] @9 y5 A
Const adCmdTable = &H0002
+ O' k8 |7 E8 y( l# y
%>
7 ~$ _2 d* r7 k0 M
5 K& \# I: ]6 X% ?) a3 V
18. 网页不会被缓存
5 x* s& }% T5 K. d9 \' _
HTM网页
& T. I7 c [ T: l
<META HTTP-EQUIV="pragma" CONTENT="no-cache">
0 d" C- V+ I' E1 d% f
<META HTTP-EQUIV="Cache-Control" CONTENT="no-cache, must-revalidate">
, P* k7 {9 g3 }( s5 _, G0 }
<META HTTP-EQUIV="expires" CONTENT="Wed, 26 Feb 1997 08:21:57 GMT">
+ s' i' I- o* h# \" b2 R
或者<META HTTP-EQUIV="expires" CONTENT="0">
, y& `: z1 f1 q( Y- T. m
ASP网页
" v& f& O$ a/ ~4 L# H; x" s
Response.Expires = -1
" b4 ?+ _( c, ]" S, R) q
Response.ExpiresAbsolute = Now() - 1
( h$ {/ w& E F! G- R7 j- q
Response.cachecontrol = "no-cache"
; L) y' T! G8 d& I( |# H
PHP网页
. \9 T+ E0 g. [5 Z' H$ h( r/ h0 P
header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
0 }# q4 z% e8 n
header("Cache-Control: no-cache, must-revalidate");
! Z* C4 T* B+ s7 b
header("Pragma: no-cache");
* v4 n' H) f- U( X A
) D S: i5 X) Z1 ~+ j
19. 检查一段字符串是否全由数字组成
" [0 z; J7 w( O2 U
<script language="javascript"><!--
' M5 C2 F; K) n7 c1 f8 u0 T
function checkNum(str){return str.match(/\D/)==null}
( M0 p% y( N6 \5 K
alert(checkNum("1232142141"))
* L! ^& k1 D: x& ^0 L8 R$ y
alert(checkNum("123214214a1"))
, m6 w; H, W0 z; I' ^
// --></script>
& `. U9 e' Z T! }* r
; S: z1 O% k A" W7 R
20. 获得一个窗口的大小
/ [5 c/ C! X) B4 p% H- L
document.body.clientWidth,document.body.clientHeight
9 r' P. `0 }6 F$ e0 J. q ?! w- `) L
5 }9 R$ ^; Q) r
21. 怎么判断是否是字符
1 R: a& @- d2 T+ ^
if (/[^\x00-\xff]/g.test(s)) alert("含有汉字");
7 R% f7 |. H% D& p$ b r8 b, n
else alert("全是字符");
+ x! {" D6 J P/ F1 _
, G+ V8 R$ |8 o( l3 h
22.TEXTAREA自适应文字行数的多少
1 r/ [% S) u6 d' s
<textarea rows=1 name=s1 cols=27>
! s0 I7 [; [" ] S( p" V
</textarea>
$ O/ ~! d- m0 U# Q
' h/ G, U' [/ B* K, ~2 X
23. 日期减去天数等于第二个日期
/ k; B4 l+ L4 u$ A* E) X
<script language=javascript>
6 z1 L/ ^- x) V" ]8 L
function cc(dd,dadd)
0 X* x8 T9 h- e! h6 ^
{
; S9 u& {7 R7 E( m- Y7 @6 Q
//可以加上错误处理
3 k- L! {! l1 n" i# V
var a = new Date(dd)
% I6 k, L! o* ~
a = a.valueOf()
8 O d M/ q- M- E4 x; H
a = a - dadd * 24 * 60 * 60 * 1000
$ ~0 ^; X$ c8 y5 q3 e$ H
a = new Date(a)
* f& P; N5 g" O! g! s0 ~" D' ]- t
alert(a.getFullYear() + "年" + (a.getMonth() + 1) + "月" + a.getDate() + "日")
, t# A5 l) t, e7 T" Q3 }% K5 a6 y" r
}
& u- M* {4 |) N4 c
cc("12/23/2002",2)
5 ^& v& S" Z2 d0 ? e
</script>
3 x3 l& i1 t8 ~6 a
( w! d1 \( k! v' J5 j3 B/ A
24. 选择了哪一个Radio
1 L# q& B6 G3 p+ W* o
<HTML><script language="vbscript">
6 ]- m/ ^+ P- Y6 L2 q c. g+ W
function checkme()
3 y$ g. s) V. s- h; S5 A
for each ob in radio1
; h7 e$ x9 { X4 m$ Z2 |' H
if ob.checked then window.alert ob.value
( K% b* ?( s# e+ W3 {: ]* J$ D
next
( E! q% F$ `* j6 d& v
end function
5 H8 @# z, I. D) A3 P
</script><BODY>
0 y( s ~5 |& I' v$ }6 n$ ~- h
<INPUT name="radio1" type="radio" value="style" checked>Style
, ]8 E2 i* m! r3 N
<INPUT name="radio1" type="radio" value="barcode">Barcode
* Q% T# o" ~2 Z
<INPUT type="button" value="check">
Q( A3 }- u. w
</BODY></HTML>
( i8 N; A7 d5 Y1 e' T5 }
5 G+ }! {6 x9 f1 B9 t) s5 _" ^
25.获得本页url的request.servervariables("")集合
: J/ W. t" W, O
Response.Write "<TABLE border=1><!-- Table Header --><TR><TD><B>Variables</B></TD><TD><B>value</B></TD></TR>"
' v/ Q! O$ h/ E
for each ob in Request.ServerVariables
: H: b) z3 k5 e1 f* c! _; r
Response.Write "<TR><TD>"&ob&"</TD><TD>"&Request.ServerVariables(ob)&"</TD></TR>"
" { c! Q, a+ M! ^. v
next
$ s) A6 u. D, b$ h5 K$ S0 D" }
Response.Write "</TABLE>"
3 u* `8 f+ B5 I1 \* o% f. j* ^0 z
& N) K8 [# G- @8 H7 R: W
26.
% J* ^" O/ S! O) F, a' M* w
本机ip<%=request.servervariables("remote_addr")%>
; q6 s R9 [5 f8 m4 B, o8 w: m
服务器名<%=Request.ServerVariables("SERVER_NAME")%>
4 {, z9 D2 U* @' h
服务器IP<%=Request.ServerVariables("LOCAL_ADDR")%>
5 X) D! A& v) j( V1 p& C6 u" q
服务器端口<%=Request.ServerVariables("SERVER_PORT")%>
4 ?* x9 }0 l4 |4 v) R, R: m" @5 I
服务器时间<%=now%>
$ B& Z' c a7 S6 l3 n; z% C
IIS版本<%=Request.ServerVariables"SERVER_SOFTWARE")%>
_/ y" f) h) \, J, f9 G: a
脚本超时时间<%=Server.ScriptTimeout%>
, k {' u2 a" |) c0 a/ `- [3 {2 c* H
本文件路径<%=server.mappath(Request.ServerVariables("SCRIPT_NAME"))%>
4 i! I) ~9 g# V/ H9 e: L
服务器CPU数量<%=Request.ServerVariables("NUMBER_OF_PROCESSORS")%>
% g: g8 b( Q: {. q& o. m
服务器解译引擎<%=ScriptEngine & "/"& ScriptEngineMajorVersion &"."&ScriptEngineMinorVersion&"."& ScriptEngineBuildVersion %>
1 f3 o, o( u1 e) F" R/ {$ x
服务器操作系统<%=Request.ServerVariables("OS")%>
+ t& s( f. k7 h
/ w H: P/ }/ C9 @
27.ENTER键可以让光标移到下一个输入框
6 {3 L7 [/ a0 y
<input>
* @" n, }& u$ h' u. T& B
5 E; H7 ]/ W a* `/ l, n7 g
28. 检测某个网站的链接速度:
& }4 y- H- Z: |& ^" S
把如下代码加入<body>区域中:
5 g) o+ p' f1 P' K; f+ D. \' ?
<script language=javascript>
% N- c( g1 ^* v" E
tim=1
! F# C$ b% J' h7 X
setInterval("tim++",100)
; ]( c: G& X. y" i6 j2 N
b=1
& G: g# v/ c& X+ v, _8 N! v+ |4 s- C
w4 n( x7 _1 q
var autourl=new Array()
( |3 _" y6 g4 I/ D: J
autourl[1]="www.njcatv.net"
/ H. v; {" ]; p0 G5 P v
autourl[2]="javacool.3322.net"
8 l3 o l+ e$ t
autourl[3]="www.sina.com.cn"
% n1 v& O; ~; b5 i
autourl[4]="www.nuaa.edu.cn"
$ q6 f$ M5 X. r4 C8 }3 B
autourl[5]="www.cctv.com"
( T& Z, u; |, N
" A3 a9 t' G5 r6 V v$ ]' [5 y2 o
function butt(){
% Y; {) h2 s0 Q$ X- j& L
document.write("<form name=autof>")
: Z% ]% e. b& F+ d7 N; g6 h# ?
for(var i=1;i<autourl.length;i++)
% Z9 m: M( q7 s7 c, L1 B
document.write("<input type=text name=txt"+i+" size=10 value=测试中……> =》<input type=text name=url"+i+" size=40> =》<input type=button value=GO onclick=window.open(this.form.url"+i+".value)><br/>")
7 A" Q0 n6 i3 q) q5 }$ D5 C
document.write("<input type=submit value=刷新></form>")
; G, Z3 C2 ^! v
}
~, t2 m6 V' S0 P; U# |& |
butt()
9 H l! ?/ \& r% e' W" e" B
function auto(url){
! V8 J6 s1 B3 q O
document.forms[0]["url"+b].value=url
. |! g1 k F) h, M: I" |
if(tim>200)
# t) [& N3 d4 _! u) h& N
{document.forms[0]["txt"+b].value="链接超时"}
' I1 C9 B+ f& i- k
else
8 U3 `1 d* U- }; _+ ~& R1 x
{document.forms[0]["txt"+b].value="时间"+tim/10+"秒"}
9 L& d, O6 k" M9 i- w* P. W
b++
/ |1 X5 V# Z- k
}
5 z- P* v* ~ e7 D& a7 P
function run(){for(var i=1;i<autourl.length;i++)document.write("<img src=http://"+autourl
+"/"+Math.random()+" width=1 height=1 onerror=auto('http://";;+autourl
+"')>")}
7 D* M: D1 a% J- l( C
run()</script>
/ Z. G. m' x. [! I- R* `8 I
1 R3 F7 h0 _7 J' Z$ o
29. 各种样式的光标
( O/ p9 G$ `6 N* A0 `+ b, O+ l
auto :标准光标
X% {. U' w4 z0 }; Q# G
default :标准箭头
+ t$ s( o6 `. t* ~) g
hand :手形光标
0 i' F. h" T0 O# k+ _0 H8 Q
wait :等待光标
1 W! k4 v& \8 q3 M
text :I形光标
0 e) j8 s) ?8 T: l1 K3 R2 B
vertical-text :水平I形光标
4 ^" g( a+ J3 J/ a8 E# ?" Q3 i
no-drop :不可拖动光标
3 l; s% f2 i7 Z
not-allowed :无效光标
7 f2 Y; d! a+ _! S; P
help :?帮助光标
- ^$ w2 o. Z# X6 `1 R# W3 o/ S2 y- o
all-scroll :三角方向标
# ~) Y, Q+ C7 V! C
move :移动标
" V" z& n7 y r2 r0 P
crosshair :十字标
! T- i4 v5 ^, c r
e-resize
. G- o4 h2 E- d5 C
n-resize
5 Z* K& Z& t- {" K9 i
nw-resize
! S: u6 a1 a$ T. ~1 c7 n
w-resize
9 T2 [8 H m! n5 ?
s-resize
2 i: f$ r% Z6 G, c/ p2 ~
se-resize
t9 y" q* z/ d
sw-resize 转
- X6 F" u0 ?; X# D3 E" @
欢迎光临 广西经贸职业技术学院论坛 (http://www.gxjmbbs.com/)
Powered by Discuz! X3.2