设为首页

广西经贸职业技术学院论坛

 忘记密码
 免费注册
查看: 1991|回复: 0
打印 上一主题 下一主题

[建站技术]值得收藏的一些代码

[复制链接]
  • TA的每日心情

    2019-8-18 09:37
  • 签到天数: 2 天

    [LV.1]初来乍到

    跳转到指定楼层
    楼主
    发表于 2009-10-16 01:04:42 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
    1. 将彻底屏蔽鼠标右键3 F9 S2 W) e; w" s
    <table border oncontextmenu=return(false)><td>no</table> 可用于Table! i5 O9 I$ B, Q/ p( u7 K- R
    $ ?6 c9 G0 [6 M- Q% ?
    2. <body> 取消选取、防止复制
    1 T+ [5 P; y% ?) v1 `% D1 S6 F* t2 r1 X
    3. 不准粘贴
    ' B: W) S" E: ~1 a
    5 x+ E9 l4 ~4 F5 z4 i4. 防止复制$ e" G4 o7 t/ k8 n$ Q

    ! ~: M$ Y' i6 d2 N( |; S5. <link rel="Shortcut Icon" href="favicon.ico"> IE地址栏前换成自己的图标8 K0 I7 W! R3 W& n7 n0 K
    4 h# H( p7 x0 ]
    6. <link rel="Bookmark" href="favicon.ico"> 可以在收藏夹中显示出你的图标) D, O. X& j7 t7 _2 q7 l

    7 D. B8 v% K; l; F; s2 j+ }7. <input style="ime-mode:disabled"> 关闭输入法# x' Q4 J. x# y- I/ `
    $ ^; ?# W" S. g7 |6 U
    8. 永远都会带着框架
    7 v( W9 e2 w. r# i! h1 T" d<script language="javascript"><!--
    2 q' z" v2 q5 b3 K2 Vif (window == top)top.location.href = "frames.htm"; //frames.htm为框架网页; J, S+ h, X2 z9 U( R! j$ ?% r% K0 f
    // --></script>1 z8 ~! f5 S) X/ [, T$ M+ n# p- N

    7 Z  V$ n3 b" x$ c% s9. 防止被人frame
    % a- Q" T% y, i% R<SCRIPT LANGUAGE=javascript><!--
    , l6 t5 H1 o( E: i* H) M9 rif (top.location != self.location)top.location=self.location;8 U+ e( R* r$ I% M( k$ o0 Q
    // --></SCRIPT>
    % o& ~' {+ x2 r0 O3 [: W  c% q
    2 M% d5 y5 O' a' P10. <noscript><iframe src=*.html></iframe></noscript> 网页将不能被另存为
    4 j' o: T3 O& I/ t) e; Z$ f1 W8 p8 U: X! ?; }
    11. <input type=button value=查看网页源代码 - \9 i" K3 ]  W% t
    onclick="window.location = 'view-source:'+ 'http://www.csdn.net/'">* b' l! K+ ~- w$ w! H8 @! `$ V

    & m, y) K! ?  ^7 f! W! `12. 怎样通过asp的手段来检查来访者是否用了代理4 |! d, X! u2 f3 _# _% O2 Q5 N  f; \
    <% if Request.ServerVariables("HTTP_X_FORWARDED_FOR")<>"" then6 M0 F. A3 R# A- i$ H1 m2 _) i
    response.write "<font color=#FF0000>您通过了代理服务器,"& _
    8 `8 m9 O9 ^! A) ]"真实的IP为"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")
    ) P, G# _7 v, X0 w) N! _8 `end if
    % k1 j$ ^4 V4 z%>7 x) j' g' c# z$ G" I
    + Z$ s* t% h4 J0 y! S
    13. 取得控件的绝对位置. I( B% F% ?# f% Y
    " P' i0 F3 F# i& U/ V3 P( H, p
    //javascript
    8 J7 K- u$ p- [# H, Y/ ]<script language="javascript">4 t3 o! g# b. i# Q- o
    function getIE(e){6 K* [4 H9 {( `% X$ R9 w1 Z
    var t=e.offsetTop;
    # c5 B/ s# E; H! }var l=e.offsetLeft;
    5 o" P) P* W. n. p+ u) H9 o7 s3 Lwhile(e=e.offsetParent){/ x' O5 Y/ x) W' @$ `
    t+=e.offsetTop;; h3 `; c8 a! i3 t" b+ u
    l+=e.offsetLeft;+ O5 O1 j4 `" U: h
    }
    ( L. X8 t, c7 s4 e! G2 q+ e! B! x6 zalert("top="+t+"\nleft="+l);% k! r* D, ~: o/ S6 l2 H
    }0 q) Y" h/ ]6 r. k6 F4 M  O8 R) F
    </script>
    " d; ^; d9 J6 X: |3 |# d. h3 ?
    6 R3 K5 `. C1 _! Q" o//VBScript/ H, I& C6 x8 J( a% D# U
    <script language="VBScript"><!--
    : N. G. |" C* cfunction getIE(), J& z1 m$ V7 T& C! f* q2 m* e
    dim t,l,a,b0 r0 Z6 n5 ~5 I7 Z; h" t+ [
    set a=document.all.img1
    8 ~. l4 e6 P9 _1 @, ot=document.all.img1.offsetTop
    : v5 J5 g5 i# x4 b0 ll=document.all.img1.offsetLeft. _- p4 Q; ^  }
    while a.tagName<>"BODY", f- I$ ^, w' a6 l1 K( F
    set a = a.offsetParent
    ; H6 a8 s9 {0 u3 St=t+a.offsetTop
    7 o8 |  S* ~' l1 y7 P) y) P" hl=l+a.offsetLeft
    9 K  Z9 b2 Q2 Gwend3 i: `3 {# K! y( Y
    msgbox "top="&t&chr(13)&"left="&l,64,"得到控件的位置"4 y* J) C# `" t& {- b
    end function$ a1 w% \5 X' M3 T7 N# z
    --></script>
    6 ]$ u+ g; Z3 _1 {/ k( h$ C" K
    ; D  H* t  u  _8 K" P% w+ J+ m/ s14. 光标是停在文本框文字的最后
    - n' I: P2 M% {7 R# W<script language="javascript">, k0 }, o4 a* K! S
    function cc()2 v  l' R& }3 t! X' n- Q0 u; G( y
    {) I0 B4 l  U* V/ t) F
    var e = event.srcElement;' T# D. g6 }# i9 G. t0 y2 [5 ?
    var r =e.createTextRange();2 y% q' U8 d( I9 Q6 f6 R
    r.moveStart('character',e.value.length);
    1 R, f% |6 t" e3 p6 Qr.collapse(true);5 u) {- f% I2 c* W0 @
    r.select();
      n6 [& l2 s. a% Q( S}$ {1 M3 K# H$ y# ~& T1 \- T! n- G
    </script>) x0 i# `, K8 V+ k: U0 `
    <input type=text name=text1 value="123">
    ' M' e2 S5 _# H$ H& ?
    5 h! ]  }# e) G. n* n15. 判断上一页的来源
      S( p, L8 g) F. T" f4 casp:
    : U6 g' F# n7 prequest.servervariables("HTTP_REFERER")0 \+ v: i, a8 F' @+ t+ Q$ b* a: D
    . g  k4 |7 @" U. V# C# H9 q) E) v
    javascript :2 ~5 d4 h4 T8 `0 q
    document.referrer
    8 j8 `: q! B$ f; i4 |" M' M" @: K
    $ \1 J6 G. Q5 |5 a# O" U16. 最小化、最大化、关闭窗口
    8 @+ a$ }& Y$ x, h<object id=hh1 classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11"> ' i6 r5 A( O  w0 c. ~0 u6 c8 W$ U
    <param name="Command" value="Minimize"></object>
    0 j3 f" W: W, l& m; k<object id=hh2 classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">
    ! f& E; s6 J1 j5 P, n<param name="Command" value="Maximize"></object>2 Y) s6 ]4 @2 O, M) S
    <OBJECT id=hh3 classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">
    - `! n5 {# o: K<PARAM NAME="Command" value="Close"></OBJECT>  T7 o) C' x5 a8 ~8 u9 T

    9 {$ _9 m3 x- d! M<input type=button value=最小化 onclick=hh1.Click()>% C7 ]2 x9 {$ x. l, @! u8 g+ s
    <input type=button value=最大化 onclick=hh2.Click()>
    6 l& ~  C/ |5 b2 H) z: e<input type=button value=关闭 onclick=hh3.Click()>$ s" o" E2 x1 ]; |8 K6 I$ r
    本例适用于IE; m& m* e% S9 l
    ) M& n. W! L+ l7 T8 t8 j5 c, b, E
    17. * ~. O! j& i% O. X; L
    <%
    " t* U0 c7 l' @4 B" r'定义数据库连接的一些常量
    9 t; ^5 U& e5 {Const adOpenForwardOnly = 0 '游标只向前浏览记录,不支持分页、Recordset、BookMark- z6 n! l$ v8 S$ [" Q
    Const adOpenKeyset = 1 '键集游标,其他用户对记录说做的修改将反映到记录集中,但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、BookMark
    3 m! K( F- E; z' ?( M3 s+ g/ G- hConst adOpenDynamic = 2 '动态游标功能最强,但耗资源也最多。用户对记录说做的修改,增加或删除记录都将反映到记录集中。支持全功能浏览(ACCESS不支持)。
    $ v/ q- y( u, eConst adOpenStatic = 3 '静态游标,只是数据的一个快照,用户对记录说做的修改,增加或删除记录都不会反映到记录集中。支持向前或向后移动, j* n8 l4 c; N

    " g) [: ]4 X3 u4 I! n3 _9 VConst adLockReadOnly = 1 '锁定类型,默认的,只读,不能作任何修改! o  {( _, \6 m0 f
    Const adLockPessimistic = 2 '当编辑时立即锁定记录,最安全的方式1 i# x$ _7 A: k) W. n
    Const adLockOptimistic = 3 '只有在调用Update方法时才锁定记录集,而在此前的其他操作仍可对当前记录进行更改、插入和删除等" v3 u% K+ J) R  j5 S# s( ]5 q+ k
    Const adLockBatchOptimistic = 4 '当编辑时记录不会被锁定,而更改、插入和删除是在批处理方式下完成的
    - d# _, k, n/ M7 J4 O
    # E+ h* Z" q* a2 D3 a: c* k+ rConst adCmdText = &H0001
    " n0 x$ w2 x# M2 ?% c8 UConst adCmdTable = &H0002
    7 H* m) o  {, b' L. E# o9 X%>
    8 k# m6 a  ~; m, I* C4 d& G# Z- l3 W: K
    18. 网页不会被缓存! I" _& z& F, H/ Z8 b5 E2 O
    HTM网页3 N$ {4 }& e9 J/ `
    <META HTTP-EQUIV="pragma" CONTENT="no-cache">, p4 `1 b$ l1 y5 O1 F% S
    <META HTTP-EQUIV="Cache-Control" CONTENT="no-cache, must-revalidate">- [3 b! }6 s, T5 u+ _. o# c; s6 [/ Q
    <META HTTP-EQUIV="expires" CONTENT="Wed, 26 Feb 1997 08:21:57 GMT">
    9 \( I$ q$ y5 d+ J$ u或者<META HTTP-EQUIV="expires" CONTENT="0"># A2 F" m2 P9 g. x9 X7 N# A5 U
    ASP网页& C! U' ?1 n: C) j  A) Y
    Response.Expires = -1; m/ W. _8 p; E3 ?$ @
    Response.ExpiresAbsolute = Now() - 1
    2 q  x9 B0 D0 P" v# T* M1 n/ DResponse.cachecontrol = "no-cache") b5 j4 \* A! n' j% d2 r# u" w! q
    PHP网页$ S, K) s6 R- E; {! _6 K2 J. Q
    header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");. P; D( c0 F8 l( |. T5 S
    header("Cache-Control: no-cache, must-revalidate");) n0 I' Q$ s* {
    header("Pragma: no-cache");
    / f1 [0 ]  \2 E$ s2 l4 Q( `  v
    ( J  R5 Y' V% G/ K7 y9 M19. 检查一段字符串是否全由数字组成! \+ }' w, j4 z1 K, ]+ U
    <script language="javascript"><!--
    3 D  g1 [0 [# p, Bfunction checkNum(str){return str.match(/\D/)==null}
    ' v$ T1 w  N4 p/ {& [alert(checkNum("1232142141"))
    & _) D" X" G" Y: [1 w' walert(checkNum("123214214a1"))
    $ [* R# p% j$ Z// --></script>
    4 \8 u5 r' R  N: _. g, ?( ?9 }# M9 b' u5 K% T2 e  t
    20. 获得一个窗口的大小( l8 X* [" k2 X, Z* I! D& Q
    document.body.clientWidth,document.body.clientHeight- r2 M' c: ?/ T# ]/ S
    + ?  r. K2 K. I5 K; ^7 C9 Q% e$ |' Y
    21. 怎么判断是否是字符
    1 W2 y+ K% z, }& {if (/[^\x00-\xff]/g.test(s)) alert("含有汉字");, @8 H% i* p, T, z
    else alert("全是字符");
    & H) y. V' h3 ?, f, x1 l6 d0 Z% v) \- C6 ^) e  {. g$ ~
    22.TEXTAREA自适应文字行数的多少
    . f: L% y8 C+ n; q6 p; _& l<textarea rows=1 name=s1 cols=27>; N2 u5 V( a' b' D2 {+ p' \+ n
    </textarea>
    5 u( b) X3 f/ i3 j. O5 ^
    ) m, n! ~: B6 I! @8 v# Z& g23. 日期减去天数等于第二个日期- v; [6 Q& [# h" `
    <script language=javascript>0 M5 C/ {# }0 L* S6 N
    function cc(dd,dadd)7 L3 h1 h: h# s1 T) {
    {
    & L( E; W* j; |3 V+ R//可以加上错误处理
    + S# ]9 m( f& A8 ^0 H. Y( y8 i: b4 jvar a = new Date(dd)
    % b. {  s1 p# c' B! y: v; ]- Qa = a.valueOf()
    8 t7 _, N& Q7 p+ @5 {& X% D$ ga = a - dadd * 24 * 60 * 60 * 1000
    + D% H7 {+ Y+ E0 r7 qa = new Date(a)7 |, m3 p) o4 D6 ~" H# V1 Y' [9 G
    alert(a.getFullYear() + "年" + (a.getMonth() + 1) + "月" + a.getDate() + "日")) c$ E/ g% ~# j5 ?3 ^
    }
    9 F9 {5 f8 @( q/ R6 }0 hcc("12/23/2002",2)
    ! T; }: U/ I, X* X</script>
    & \# C$ p& ]  d, U1 V+ B9 ]" h% [  R3 w) I: Q5 I& i. R* L
    24. 选择了哪一个Radio
    : B/ C2 _/ T- }( b) O5 l<HTML><script language="vbscript">
    & d" C- f1 k5 Q  @( Vfunction checkme()
    ) F' Q2 [8 A3 Z9 [6 x% L  J# _for each ob in radio1
    7 N; z7 o) J0 D+ n  |3 B% x! a1 Sif ob.checked then window.alert ob.value
    & r. P/ E; M( _2 Inext4 [3 q- m+ c, {0 t6 [+ [' K0 e
    end function
    ( y/ g/ K/ M# ]</script><BODY>
    1 t! X) M7 z: ]' @<INPUT name="radio1" type="radio" value="style" checked>Style
    & d7 y( i8 W8 Y3 H$ r<INPUT name="radio1" type="radio" value="barcode">Barcode
    6 ?% l% S* Q5 }9 I<INPUT type="button" value="check">8 h& l* K5 E4 m3 R  P
    </BODY></HTML>3 b- u) F2 R( ~8 z' w. }6 f

    * a5 ?1 {, x9 E4 S5 B2 h2 a25.获得本页url的request.servervariables("")集合
    & F, I2 C5 S* `0 U+ cResponse.Write "<TABLE border=1><!-- Table Header --><TR><TD><B>Variables</B></TD><TD><B>value</B></TD></TR>"
    % s% j& ^, w9 O, B: K3 C) X, rfor each ob in Request.ServerVariables1 B8 q0 J. g: H2 _- A' p% T! R: M: _
    Response.Write "<TR><TD>"&ob&"</TD><TD>"&Request.ServerVariables(ob)&"</TD></TR>"$ |0 C8 Z) m& s) l( ~& o
    next
    , V. x# w+ q  Q  v, A7 N- K% EResponse.Write "</TABLE>"( n8 v# K$ X. F8 \+ J$ c  W

    # D- Q! x$ A0 X5 V% w- e26.
    : ~! y  E+ n( L5 L& B+ @本机ip<%=request.servervariables("remote_addr")%>
    / m; W% y- j. D/ a- G1 B6 Z" D服务器名<%=Request.ServerVariables("SERVER_NAME")%>
    7 y5 z; x1 l! i# F" w服务器IP<%=Request.ServerVariables("LOCAL_ADDR")%>, C( y9 e7 [, l9 n) e) R! Y- _
    服务器端口<%=Request.ServerVariables("SERVER_PORT")%>) B- }7 O. F8 ]% b# F# ^- ~: m
    服务器时间<%=now%>
    4 |3 q$ ]1 r2 t  JIIS版本<%=Request.ServerVariables"SERVER_SOFTWARE")%>" q" q/ w, t2 F, A; W( a4 n
    脚本超时时间<%=Server.ScriptTimeout%>( q, C# V$ U2 S. \* y
    本文件路径<%=server.mappath(Request.ServerVariables("SCRIPT_NAME"))%>5 E- N- o! E* v9 g2 ]; t5 Q# W3 t8 r( q
    服务器CPU数量<%=Request.ServerVariables("NUMBER_OF_PROCESSORS")%>, W  @3 q  ?0 g" `1 m# l3 L9 k  n
    服务器解译引擎<%=ScriptEngine & "/"& ScriptEngineMajorVersion &"."&ScriptEngineMinorVersion&"."& ScriptEngineBuildVersion %>
    0 z; g# P9 x  A& ?8 T2 G服务器操作系统<%=Request.ServerVariables("OS")%>
    % M  E, ^; B. ^" d  F
    3 R: m: `/ j6 [27.ENTER键可以让光标移到下一个输入框
    ; Y% [, {' N1 M<input>
    . @9 ^7 }) c! Y' P2 r# F+ R% s. z( V3 n7 w6 n, V: g! G
    28. 检测某个网站的链接速度:9 X$ r, O' ]- Z( O
    把如下代码加入<body>区域中:
    + ?4 L1 H; l; j! w  b5 e<script language=javascript>
    1 `: U; k; {, e! z$ atim=14 h$ Q8 H- h1 I. E. N6 J1 J0 j4 G
    setInterval("tim++",100)
    # V! |3 M7 K  Z; Kb=1
    5 H* w6 t& I8 {, \7 L/ N- I
    / ~/ b1 r  f% Qvar autourl=new Array()7 n8 E, p! S2 V% n& `+ \& P
    autourl[1]="www.njcatv.net"2 S! j. i; [! \6 ~8 o3 G: Y
    autourl[2]="javacool.3322.net"
    , d$ y9 {3 D( e% r+ G" _8 `autourl[3]="www.sina.com.cn"
    " \9 V) j5 K# R/ R) D' Dautourl[4]="www.nuaa.edu.cn"
    . @/ ^1 C8 I2 rautourl[5]="www.cctv.com": @+ Q4 i2 `* |% P2 E; u  [

    6 ]7 G/ y; f. e% D8 k; Yfunction butt(){
    + V- _0 q6 i8 W" U4 Udocument.write("<form name=autof>")+ x$ W* D: A8 W5 f! ~4 Q1 ~, Y
    for(var i=1;i<autourl.length;i++)$ G! Y/ q( R1 J$ A  F; R
    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/>")8 r2 {3 a$ W& j/ r9 e& ]
    document.write("<input type=submit value=刷新></form>")
    $ L- d. E- v, |/ O$ p- ]}
    3 Q( z) @$ w9 x; E: g0 D  N* Gbutt()
    ) [# R( |- m$ E! |# efunction auto(url){+ U: ?; F5 i1 h" q, N% L# ]& @
    document.forms[0]["url"+b].value=url
    + o  O4 r6 O( Y. k; U( rif(tim>200)5 b) V* u, x+ A. r5 w! a) V8 {  [
    {document.forms[0]["txt"+b].value="链接超时"}! B, @. g( b; u' T% j$ N8 H1 g
    else: A$ t* p: I3 o; j
    {document.forms[0]["txt"+b].value="时间"+tim/10+"秒"}
    ( A# Y. {1 a' a7 C& Eb++2 C1 V2 [0 B) w8 I' }6 Y3 Q
    }
    3 m+ S7 a4 K+ E. r- \9 Lfunction 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+"')>")}1 v/ \+ c* w( r. x2 c* _) }8 G
    run()</script>
    4 C  V- h& |8 m7 f- A: y
      q4 I& `4 H6 Z9 v& a29. 各种样式的光标
    2 {! a4 ?! p4 Iauto :标准光标
    0 C5 B% P4 U" w# d+ E5 ?+ C" Odefault :标准箭头
    5 k) H$ T# ?& K( t* r. ?/ hhand :手形光标
    ; [/ Z0 y% R4 g3 Vwait :等待光标4 c  o' V$ V6 ]% M
    text :I形光标
    % O2 |( T# M3 }/ W! D- P' b9 |% I% Mvertical-text :水平I形光标
    # _5 |7 Y8 L7 ^1 I5 ~; n0 |6 N5 bno-drop :不可拖动光标
    # H: L4 ?; ^+ ]. I8 f- w& Qnot-allowed :无效光标
    7 b$ [8 o; \- M) o( ehelp :?帮助光标! i) l% w9 X+ e0 |2 o$ J) i
    all-scroll :三角方向标
    5 w/ s& ~  S! b3 p( o' Rmove :移动标
    8 a' s% I/ J- l! ncrosshair :十字标
    2 }. p. |" q5 r2 l* G/ ~' q, u# Ke-resize" A& d# ]! p1 [
    n-resize
    + h# l" |& t) i$ M; f+ Enw-resize* u# |. }& @4 p" ?# h% G$ y
    w-resize/ W0 g) k/ X$ D2 w6 M8 v- C
    s-resize
    ' T+ p. g8 h2 L# x0 D/ kse-resize2 C5 ]8 o2 ?/ ~
    sw-resize 转
    7 a' F& s/ |% x5 v8 m
    常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~
    您需要登录后才可以回帖 登录 | 免费注册

    本版积分规则

    QQ|版主考核中心|飞翔无限『经贸在线』 ( 桂ICP备15001539号-2  

    GMT+8, 2025-10-12 14:14

    Powered by Discuz! X3.2

    © 2001-2013 Comsenz Inc.

    快速回复 返回顶部 返回列表