设为首页

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

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

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

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

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

    [LV.1]初来乍到

    跳转到指定楼层
    楼主
    发表于 2009-10-16 01:04:42 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
    1. 将彻底屏蔽鼠标右键
    - \+ S8 G( ]7 Y# K3 C6 _<table border oncontextmenu=return(false)><td>no</table> 可用于Table
    : r7 W$ K0 b4 a4 t2 p& [6 }
    ; ^0 t& P. ~% {" l/ Z7 N4 q2. <body> 取消选取、防止复制
    ' f" h/ \/ T' X& v& Y; s! h+ p% m
    2 l' P( t0 d6 K" a# W( W; ?3. 不准粘贴
      B9 J, [. H, o& l# X$ o; @( H& E" Z
    ; r6 }4 \  H* f& O4. 防止复制! ^' e) G& I; `: g; q( _
    5 y0 V; c2 X# S" f0 m/ e% e
    5. <link rel="Shortcut Icon" href="favicon.ico"> IE地址栏前换成自己的图标
    5 E2 \1 ?- X& E0 W0 U+ k: M
    9 F( W- u5 u; ^; \5 H2 d6. <link rel="Bookmark" href="favicon.ico"> 可以在收藏夹中显示出你的图标
    # O4 r2 T( Y! f- d) w
    ! A( _3 L* C5 J8 B) a0 C. @( S7. <input style="ime-mode:disabled"> 关闭输入法
    * a# g# U" Z& ^5 i. Y  g
    ' g% `9 K- E0 w, E- ^8. 永远都会带着框架
    ' C/ B- C* R0 q! i% U* m6 E<script language="javascript"><!--$ }# {  f; b* U3 `% d
    if (window == top)top.location.href = "frames.htm"; //frames.htm为框架网页
    # c5 p  q5 s7 K# o& F1 m// --></script>. s/ t- A: b1 G. H/ ?

      s; g2 D! y' B$ r9. 防止被人frame) U+ {" n# u" r4 }* G
    <SCRIPT LANGUAGE=javascript><!--
    ) d: y4 A$ i1 |* P& F1 Dif (top.location != self.location)top.location=self.location;/ N+ {: d8 T/ i- x0 h" m- |
    // --></SCRIPT>" _& J: ~$ X- j

    # e. ]  G7 {2 j+ F1 \) I  D- ~10. <noscript><iframe src=*.html></iframe></noscript> 网页将不能被另存为
    : K. @; I" F' F( M; ~+ D# T2 d2 r7 @+ G/ x& w. G, D
    11. <input type=button value=查看网页源代码
    8 u' \& n) @0 J( Y' i9 x, T* p5 honclick="window.location = 'view-source:'+ 'http://www.csdn.net/'">
    0 i1 y5 [6 O6 h% E9 {# [! [8 o) l+ ^: d% W2 I; x% s
    12. 怎样通过asp的手段来检查来访者是否用了代理
      {, e; I, A' Y! i) m- E0 [<% if Request.ServerVariables("HTTP_X_FORWARDED_FOR")<>"" then
    . w5 H( K& S$ g7 c' P& aresponse.write "<font color=#FF0000>您通过了代理服务器,"& _
    + @0 ?1 k4 i7 _6 w, L/ I( u"真实的IP为"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")
    : ]& z+ s1 y. g$ v6 ~1 a8 u4 {0 j) Fend if
    2 u6 h/ Q& c2 W& a2 I- C%>, L1 o$ ?) {5 m) g* t3 x0 o" b

    ( N; t8 \% L0 p/ u  U13. 取得控件的绝对位置( W8 U# X$ T, z! d/ s: F2 H
    + ]- r% w9 `" e; l8 k
    //javascript
    7 W3 i# h/ o2 o% y2 I2 Y1 _8 o<script language="javascript">2 m8 i! _  {, w2 [5 |" p
    function getIE(e){' [; p) [0 {5 Z
    var t=e.offsetTop;
    ! ^' E$ P  N  x) s  m% H- m1 D( lvar l=e.offsetLeft;
    * i3 `% t6 R9 j; Q. ]5 I  |while(e=e.offsetParent){4 W6 t: T+ \  k6 Y4 _" V
    t+=e.offsetTop;+ C) @$ j8 |2 A$ r& G/ v) v  v& ]
    l+=e.offsetLeft;
    . O  v: b, g4 n. v3 w2 S9 [}9 z( _1 d) l, r
    alert("top="+t+"\nleft="+l);& L! C4 r1 O0 l% `7 J9 s( w
    }* e0 k% }  o7 X+ z0 J/ _
    </script>
    0 x/ [9 ?4 J, R, i( L2 N1 n* z
    ; C1 ~& ?8 K+ s' l! l! o//VBScript
    / v! Y0 G4 {% B<script language="VBScript"><!--0 ]1 q( o/ z# A! a
    function getIE(); p+ \: M/ p7 p0 W
    dim t,l,a,b
    # v8 f$ r& q8 x* \) aset a=document.all.img1
    # d- C) @) r# l/ ?, h: Ct=document.all.img1.offsetTop: x/ @: _6 R1 u4 F
    l=document.all.img1.offsetLeft
    $ W1 d* I" d% a2 h. O) @6 ~5 t' ?while a.tagName<>"BODY") h& m! I+ d8 H2 ]  @
    set a = a.offsetParent
    , e* ?9 G8 X. @) ]" X( @2 ~t=t+a.offsetTop0 A( T8 f8 ^4 q3 r# Z& h' K) P
    l=l+a.offsetLeft
    - }4 W% i. a7 n. N7 }wend  y0 x) M* L" R+ \7 a7 V
    msgbox "top="&t&chr(13)&"left="&l,64,"得到控件的位置"
    9 X5 K0 U2 x( U$ M; v! bend function, o/ ~1 C! J1 `
    --></script>
    ' B6 Z1 m5 o! Z: c9 @; ]
    1 L* ?+ R. b6 J1 O, Z! V8 U5 x+ i0 j14. 光标是停在文本框文字的最后
    . A7 t, ~4 h% v) g& |<script language="javascript">
    6 p& Z' _/ m9 s! C4 wfunction cc()  b* n5 \* T+ A! t1 N3 Z! W
    {
    & P- F5 S2 [! m$ e2 Z3 qvar e = event.srcElement;
    3 I% C  O: x* T) F( E6 w: j% {! avar r =e.createTextRange();1 R0 e, _$ [7 I4 m" A
    r.moveStart('character',e.value.length);
    # b  {- d6 D- D$ Yr.collapse(true);2 ]% y1 p! h" x3 s
    r.select();. u& H& Y( I. a7 _+ s4 [
    }
    0 b# n4 i" y; W, S$ I, O</script>1 u# @6 ]6 [2 u6 s# `
    <input type=text name=text1 value="123">! S- X  A  G. l4 Q' S. W; @# P6 b
    $ p) k( o. {" h0 W' o) a6 _
    15. 判断上一页的来源
    7 N6 z# q3 P' D0 d/ G. Oasp:5 [, B  {5 N$ K5 r  T% [* I6 l
    request.servervariables("HTTP_REFERER")0 B5 q1 i7 F+ G' g6 t

    # T* T& s6 ^4 n! ^" I$ w) [% t8 n2 Kjavascript :
    & Z- _( m  ]8 W9 H3 T+ J2 O7 `. Idocument.referrer
    7 b, K( M: `# R+ d4 i3 o) l* |2 h2 ?, U% g6 Q
    16. 最小化、最大化、关闭窗口& T4 G6 u2 ?4 T3 h  K2 k
    <object id=hh1 classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11"> 9 h/ p5 J; w/ d& t
    <param name="Command" value="Minimize"></object>& I5 k! I4 r5 I
    <object id=hh2 classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11"> 0 ]( f1 c7 D% W; S. _$ C
    <param name="Command" value="Maximize"></object>
    % i& a$ H7 I7 ~1 O4 t; S; j<OBJECT id=hh3 classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">
    . s/ `2 v9 X9 C6 i  C% W<PARAM NAME="Command" value="Close"></OBJECT>; E* b: X/ R) |. v( w
    1 Z  ?1 s% d& b) g7 w: c
    <input type=button value=最小化 onclick=hh1.Click()>
    # j0 P5 J8 |1 \4 {<input type=button value=最大化 onclick=hh2.Click()>1 g' x( g7 j4 \" G" P
    <input type=button value=关闭 onclick=hh3.Click()>
    ; K: ]8 T! H" i- V  r) G本例适用于IE
    ; t7 u- ]5 ^" L8 x9 z) S) A8 S, D% y9 T8 l. Y: |4 [9 i
    17.
    6 L* m* H, j/ [* _) w: y( q<%
      s" u. n  [7 b7 L' M- {'定义数据库连接的一些常量0 r4 u" Q, |2 X/ [2 }2 p% @
    Const adOpenForwardOnly = 0 '游标只向前浏览记录,不支持分页、Recordset、BookMark* Q8 H8 D& ?/ D' T
    Const adOpenKeyset = 1 '键集游标,其他用户对记录说做的修改将反映到记录集中,但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、BookMark5 j) S& D5 M* T" b
    Const adOpenDynamic = 2 '动态游标功能最强,但耗资源也最多。用户对记录说做的修改,增加或删除记录都将反映到记录集中。支持全功能浏览(ACCESS不支持)。
    1 k# \1 l5 d& a. w. K; ]5 r( f; k- tConst adOpenStatic = 3 '静态游标,只是数据的一个快照,用户对记录说做的修改,增加或删除记录都不会反映到记录集中。支持向前或向后移动
    / b" o" N( V8 O
    ) b) x" V" T3 B. P9 EConst adLockReadOnly = 1 '锁定类型,默认的,只读,不能作任何修改. p! M4 T! Q9 v# Q# t
    Const adLockPessimistic = 2 '当编辑时立即锁定记录,最安全的方式6 M; f8 M8 `% t. A$ d' h. o
    Const adLockOptimistic = 3 '只有在调用Update方法时才锁定记录集,而在此前的其他操作仍可对当前记录进行更改、插入和删除等$ x: z5 a& M3 o  d' m
    Const adLockBatchOptimistic = 4 '当编辑时记录不会被锁定,而更改、插入和删除是在批处理方式下完成的
    , a- B& c: I( e+ u3 j; s9 f  o% |" h* N0 i) z9 v" W  X
    Const adCmdText = &H0001
    0 h# Z, o- j0 TConst adCmdTable = &H0002
    * \3 X" R7 G" i6 f! u2 [" A2 n%>; h. p4 A  a, B+ o0 M7 Z0 `' M+ \

    - ]- k9 t0 D6 r9 X8 R/ X18. 网页不会被缓存! Y& |! a3 p$ }# A- N) r$ I
    HTM网页
    : M! T% R& g: S<META HTTP-EQUIV="pragma" CONTENT="no-cache">
    * j- k: w3 J* o% C- G6 h<META HTTP-EQUIV="Cache-Control" CONTENT="no-cache, must-revalidate">7 G$ G% d, P: d; ]" u7 D* B+ O
    <META HTTP-EQUIV="expires" CONTENT="Wed, 26 Feb 1997 08:21:57 GMT">! u0 `* H/ F$ z& n2 O
    或者<META HTTP-EQUIV="expires" CONTENT="0">- I7 F9 H) ~2 G$ M! U7 g# H* H
    ASP网页
    8 S5 G, s( L; v/ RResponse.Expires = -1* p  M% ?  R9 X+ f2 l
    Response.ExpiresAbsolute = Now() - 1( k: I# v( w+ p! F3 h  g: W
    Response.cachecontrol = "no-cache"
    1 q$ D% V$ p8 f+ ?PHP网页
    ) A6 `) ~4 S  Z2 z, {, c1 Bheader("Expires: Mon, 26 Jul 1997 05:00:00 GMT");, l; ~# z8 ^, I1 W' {1 Z! h
    header("Cache-Control: no-cache, must-revalidate");
    4 E" q2 T: J) n  kheader("Pragma: no-cache");
    7 ^  P) _( s1 W9 v
    ' A, Z4 ?: |8 Z* Z) S+ j19. 检查一段字符串是否全由数字组成
    1 i: h& K) q2 C2 e4 C<script language="javascript"><!--
    3 c8 G; p0 z! a/ U% Lfunction checkNum(str){return str.match(/\D/)==null}( E) I$ o3 y( N9 g' S( A- c
    alert(checkNum("1232142141"))
    8 `7 |. ^: `9 Oalert(checkNum("123214214a1"))
    ! o9 Z$ n- x5 a% M4 m1 ^1 q% A// --></script>
    ; s8 B9 J$ `3 F2 V1 y6 B+ w* D+ y6 J; v
    20. 获得一个窗口的大小
    , U6 G' }; P3 O- v5 C6 W4 ]document.body.clientWidth,document.body.clientHeight
    ; I) N3 [. [; ]1 Z  t( t6 j1 t0 M, t1 p6 m- W
    21. 怎么判断是否是字符
    7 \% w3 J& ]4 U- dif (/[^\x00-\xff]/g.test(s)) alert("含有汉字");
    - Z& d! u8 g9 z) Qelse alert("全是字符");
    9 k& W8 Y$ r) j0 X) [% {1 ]  z2 x& w* [$ h2 X* I" o
    22.TEXTAREA自适应文字行数的多少
    2 Z9 z9 u3 h! V' I1 b+ g<textarea rows=1 name=s1 cols=27># e0 t  ?& S' d5 z1 `! @( s7 N
    </textarea>, S4 H! `$ ~4 q+ f! k7 U6 Z

    - d( d; f2 a" o, K. r: P9 N23. 日期减去天数等于第二个日期1 J1 s4 ?6 h; i: l7 n! j
    <script language=javascript>
    ; t3 [# A. H. Z4 p( J, x$ B& Dfunction cc(dd,dadd)& g8 k8 y/ P3 A  g$ e' }$ p
    {2 G) O: H4 q' K7 z# l7 U' U" f
    //可以加上错误处理3 H0 Q: u& l. u
    var a = new Date(dd)) E2 b, k$ r7 B( |  o: `: p
    a = a.valueOf()! @. b) c) K: W
    a = a - dadd * 24 * 60 * 60 * 1000
    ' C: f+ L7 W# E: O/ W3 Z: D/ Fa = new Date(a)8 K8 ]7 K! m: R' _) e& N8 G6 J5 U
    alert(a.getFullYear() + "年" + (a.getMonth() + 1) + "月" + a.getDate() + "日")! V& J3 |( q7 ^! Q9 D
    }
    $ i# T! `2 t" s/ ^  a# s7 vcc("12/23/2002",2)
    8 ]1 c, m3 F4 {7 x</script>) Q: k+ h  Y) m4 P) O( n1 e6 k2 q
    ; o% i1 ^- c7 k& v7 t% R* F
    24. 选择了哪一个Radio, E( G9 \3 I: n( m1 f2 g; a
    <HTML><script language="vbscript">( J$ `1 F1 G* D/ D! j
    function checkme()) u8 v6 K, F6 Z. F
    for each ob in radio1
    6 Y6 y2 V2 s' O) X, \( X: o! U  ~5 qif ob.checked then window.alert ob.value
    3 s4 N. [' H% F/ c2 ^1 _! W$ Jnext
    * T; _9 Z2 E, h: s6 e, Y. dend function/ |/ W: F" ?" m* P2 L% a
    </script><BODY># R( `( P4 x1 q% Z
    <INPUT name="radio1" type="radio" value="style" checked>Style* s: r  i* U% ^* `
    <INPUT name="radio1" type="radio" value="barcode">Barcode! x" N+ }7 C( |- W! l  a5 N
    <INPUT type="button" value="check">, J; K) i+ v5 s
    </BODY></HTML>* i' c; x. A. C9 l  I
    # U2 A8 w3 e- \
    25.获得本页url的request.servervariables("")集合
    3 A* |; N  f! S! LResponse.Write "<TABLE border=1><!-- Table Header --><TR><TD><B>Variables</B></TD><TD><B>value</B></TD></TR>"
    $ P) H: {* W7 x1 O# d* X8 F3 Z1 dfor each ob in Request.ServerVariables
    - _4 q: Z, h% h/ R1 ^2 o: E$ q1 qResponse.Write "<TR><TD>"&ob&"</TD><TD>"&Request.ServerVariables(ob)&"</TD></TR>"
    - h, L/ H1 k5 S! Bnext
    $ |$ W) V' ?8 i3 v3 a3 wResponse.Write "</TABLE>"  B2 ?( T; y) k4 t4 ?# k7 ]

    6 T) k' R& A( F9 g; O8 @, ]# w/ T5 _26.
    0 g5 c8 a, ^" [+ ]本机ip<%=request.servervariables("remote_addr")%>
    5 s+ l3 c, P4 N# }. Z7 ?1 F" U服务器名<%=Request.ServerVariables("SERVER_NAME")%>5 T6 _: ~0 E4 f1 A3 _; n8 }! f+ e! _+ z
    服务器IP<%=Request.ServerVariables("LOCAL_ADDR")%>4 P3 o# ~, _- g( S0 Z4 g; K
    服务器端口<%=Request.ServerVariables("SERVER_PORT")%>
    & y' @; Q) y% u5 Q2 o7 X服务器时间<%=now%>
    , s' O1 F6 H4 `5 z3 yIIS版本<%=Request.ServerVariables"SERVER_SOFTWARE")%>
    & e; H4 e) F% Z" h  Z0 i8 A脚本超时时间<%=Server.ScriptTimeout%>7 s' R5 T( _9 X( ?8 l% U
    本文件路径<%=server.mappath(Request.ServerVariables("SCRIPT_NAME"))%>
    7 u" u$ O+ W# z/ P8 C# k. i服务器CPU数量<%=Request.ServerVariables("NUMBER_OF_PROCESSORS")%>
    2 x+ W! d! f7 u; F( _9 g服务器解译引擎<%=ScriptEngine & "/"& ScriptEngineMajorVersion &"."&ScriptEngineMinorVersion&"."& ScriptEngineBuildVersion %># i) |4 T3 N' X
    服务器操作系统<%=Request.ServerVariables("OS")%>
    ( a( d; `$ I! l4 ?2 z2 `5 t, O! Q  A" m2 {0 G
    27.ENTER键可以让光标移到下一个输入框
    $ ?0 w& h1 T, M" j- Y- w<input>+ o4 I1 b6 z* `! u0 w7 X
    3 \3 i8 W% C" }; s
    28. 检测某个网站的链接速度:' k& K% Z  I7 Z  s
    把如下代码加入<body>区域中:) {9 Z8 X# v# U) M, U& z5 R
    <script language=javascript>
    4 e3 K+ H0 u. qtim=1
    0 D- s* r! i5 p( A  CsetInterval("tim++",100)4 e) o1 X6 u  Y, G$ m. C
    b=1" z. h. |9 R9 Q+ D1 m$ I
    - ~# i) |, z, o+ B% f2 w
    var autourl=new Array()
    # j1 Y4 U% c+ y/ H; P+ Kautourl[1]="www.njcatv.net"
    # B, z% n- T6 B6 v5 tautourl[2]="javacool.3322.net", R1 U2 Q% R; p/ k# @& m6 \* s9 G" T
    autourl[3]="www.sina.com.cn"
    0 q9 n5 k& a1 D: r1 ?& uautourl[4]="www.nuaa.edu.cn"
    * K7 F0 H  v- \autourl[5]="www.cctv.com"8 W: K( k% H) J) d2 O- _

    ( _  e; |# G$ ^: p5 o* kfunction butt(){7 U4 B7 H- p, U/ R( A' O
    document.write("<form name=autof>")
    3 H0 W/ H" G3 a" H0 Vfor(var i=1;i<autourl.length;i++), Q! J2 D: _$ ]0 X3 ], i
    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/>")
    % I- x2 y$ L" q: A; X4 `& Fdocument.write("<input type=submit value=刷新></form>")
      a: p9 W+ I6 Q7 E  I}( T, U" j5 k. n: B& K- N' V
    butt()
    8 J/ p4 ?% I$ W( Tfunction auto(url){
    " b5 n: D  [6 h. m& ~- Wdocument.forms[0]["url"+b].value=url
    # ~4 `1 H4 E: G# A" Q7 yif(tim>200)4 d( ^& D0 I; \* z* x; O4 [
    {document.forms[0]["txt"+b].value="链接超时"}
    , ]& l5 d+ t/ I# N- Zelse
    2 k1 L& w, b- F1 h{document.forms[0]["txt"+b].value="时间"+tim/10+"秒"}
    ) m9 u- {) p1 j5 e2 P: K3 O$ @b++7 m/ A4 W2 k1 [
    }- z# C" }* ^# `; T6 r
    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+"')>")}
    $ E( R* m/ `- T8 T# urun()</script>; G9 U! Z9 u/ j8 o9 V

    + E/ C( F6 W! V% G1 N) Y29. 各种样式的光标- D& D3 @8 P, k( a+ R- |
    auto :标准光标0 G" U% G& s9 n% \2 [  L
    default :标准箭头1 j: c& v7 I4 t4 g$ J3 b6 Q, T
    hand :手形光标
    9 V1 p9 J( `# q" M$ A# N4 qwait :等待光标
    ; K9 Z" c( J1 s1 T' E: Htext :I形光标
    ) f/ ^: a  |% b2 H" Uvertical-text :水平I形光标
    , X2 z/ a8 `; Q8 o/ I# kno-drop :不可拖动光标
    . \6 B* W5 @( ^, Y4 j5 N- c: M: Qnot-allowed :无效光标
    8 T; \5 d, z# ?$ m! k2 phelp :?帮助光标
    - j' t0 [. s. @; C# B) B# r0 S1 Nall-scroll :三角方向标2 E+ c, X+ x/ s) g, a
    move :移动标7 L. W) a: d0 J% B' h8 p
    crosshair :十字标
    . g! \- h  t4 [0 T7 |. ee-resize
    7 P, ^$ x1 ?; k7 R7 @n-resize
    - _& Z! z4 _  R0 o5 ^9 h/ @6 I5 ~nw-resize  q. b8 l, _" N
    w-resize- ~- ~- o1 T, E& K* }
    s-resize" y" |8 [( _8 ~  r5 a5 o8 X4 A$ U
    se-resize! i( r  y/ s" S& X+ q( [# b
    sw-resize 转$ J4 i  \2 i! v- `" a8 N3 d
    常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~
    您需要登录后才可以回帖 登录 | 免费注册

    本版积分规则

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

    GMT+8, 2025-5-5 06:01

    Powered by Discuz! X3.2

    © 2001-2013 Comsenz Inc.

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