设为首页

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

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

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

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

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

    [LV.1]初来乍到

    跳转到指定楼层
    楼主
    发表于 2009-10-16 01:04:42 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
    1. 将彻底屏蔽鼠标右键$ I3 ^$ U5 J. o/ Z4 x: C5 g5 p
    <table border oncontextmenu=return(false)><td>no</table> 可用于Table
    : z. b7 U. w* l$ n7 k$ ?# Z4 C1 H! @8 d) t7 T: g. j* k/ b
    2. <body> 取消选取、防止复制
    2 X: }# v& v  y. ~6 b2 M* ]6 c
    2 `) p( A+ m) k" B' h3 l3. 不准粘贴7 Z+ z5 @. h! ~9 T) l3 }

    5 S/ u" _, ~2 n8 w6 r" f4. 防止复制
    : F- b6 v  f) P8 [, R+ D
    7 ]" B  W1 t$ G4 d, v! x& B5. <link rel="Shortcut Icon" href="favicon.ico"> IE地址栏前换成自己的图标/ h# H9 C& y1 f+ k3 ]
    , B3 n1 C% u! i% i( A( I
    6. <link rel="Bookmark" href="favicon.ico"> 可以在收藏夹中显示出你的图标
    0 S2 ]" s8 c+ D# M; S2 D( R# V, f5 e+ q: i3 k+ I% h
    7. <input style="ime-mode:disabled"> 关闭输入法
    6 G; }- _: B' ?& U
    7 a. u$ p+ L/ N4 b8. 永远都会带着框架  g- Z$ h3 C7 p2 v# b: n
    <script language="javascript"><!--
    , e. O! ^1 b4 F! O; {if (window == top)top.location.href = "frames.htm"; //frames.htm为框架网页
    ' J) f# j; d& m* V9 d+ c% {+ t' }// --></script>
    * e4 c2 V7 U8 G: E, a( X5 n2 R" h2 E% g, f% n2 l; |
    9. 防止被人frame
    8 N. Q1 e. E9 g# t8 T<SCRIPT LANGUAGE=javascript><!-- 9 }1 U+ u! [$ P2 g& K
    if (top.location != self.location)top.location=self.location;
    , t4 D2 X4 h. S' ]9 k  B1 X9 m// --></SCRIPT>* q  X, }" L* h1 D1 J5 `9 m+ j/ `# x2 C# O

    * z' N) D, S# x3 h10. <noscript><iframe src=*.html></iframe></noscript> 网页将不能被另存为: ?% y5 n4 p2 j0 ]2 O% v

    * Z, b% ^2 l; U11. <input type=button value=查看网页源代码
    ( s8 Z0 z1 c+ |- |5 m# ~) ^onclick="window.location = 'view-source:'+ 'http://www.csdn.net/'">
    0 @6 ^. ?  @8 e0 O0 q! ]5 L
    9 m# r7 f" v# I+ H" O* i2 }4 |12. 怎样通过asp的手段来检查来访者是否用了代理
    4 @1 a  X3 @  h2 }$ U  a* o<% if Request.ServerVariables("HTTP_X_FORWARDED_FOR")<>"" then
    1 U7 P- o  [* l5 R4 Aresponse.write "<font color=#FF0000>您通过了代理服务器,"& _
    " d0 k* w- Y: y) H* Y% m" A. {"真实的IP为"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")/ V* j% p1 l! s" E
    end if
    " E% |  P% ^9 ^1 w/ U5 u%>6 H8 t, I3 {  X3 }) y+ @. E

    ) m6 |. w3 N9 _13. 取得控件的绝对位置
    / h' v* W* C# ]7 Z5 Z0 Y& [9 G! X
    ; w. K6 F. T. `- O4 G, d7 r% j0 L//javascript
    1 s- G4 ^: o& F$ W2 r6 `( L" p/ C1 d<script language="javascript">2 V2 r$ p  A9 O( g5 V
    function getIE(e){
    6 n6 N; t5 G+ n  ^var t=e.offsetTop;
    3 A1 }1 w% }, \5 M* S+ m$ }2 k; d0 X# ivar l=e.offsetLeft;
    8 c$ x1 l! g) b" O& A9 h! J; qwhile(e=e.offsetParent){" ^! a. k+ }% {9 ^$ u
    t+=e.offsetTop;
    , ?" ^4 Z1 {. `2 \% l4 E: S9 |4 `l+=e.offsetLeft;
    ! K* p& _5 Z& \}
    . C+ G3 N( V/ ^9 r: O/ Lalert("top="+t+"\nleft="+l);8 w" N4 K; n& Y
    }
    2 t0 V) m' C$ i- g5 C) D. W</script>- o+ o" ?3 N) r6 g" J! n9 M8 K
    " D2 ~, H6 w! C, Z
    //VBScript) x. e9 Y' Z1 C' T" c/ v
    <script language="VBScript"><!--* }  e* C8 ?  J  y3 f  x
    function getIE()5 S$ z4 a" a$ `: g" m1 {
    dim t,l,a,b
    7 C$ c& ^0 e* I( F1 T7 t, m8 g& wset a=document.all.img10 \3 C/ c  s$ @6 M3 `; W: `
    t=document.all.img1.offsetTop
    0 K, b& o" O# `$ H/ p2 ~5 C) zl=document.all.img1.offsetLeft
    8 D. M3 @6 ^5 V0 K/ jwhile a.tagName<>"BODY", U; `: b9 B  i& k* u
    set a = a.offsetParent9 e+ S9 d/ a3 A. `1 i7 K- c
    t=t+a.offsetTop
    " \7 q, }  w, ql=l+a.offsetLeft
    , W/ U$ a- u8 e0 K% F/ ywend( v* r. G* z/ v* x8 O4 O! r' F
    msgbox "top="&t&chr(13)&"left="&l,64,"得到控件的位置"
    , `0 c, i9 _4 Y( s( H8 H+ rend function5 ^5 b1 u7 ^; r. v) q  j
    --></script>7 ^3 t1 u% p7 a1 V; J$ W
    0 ~& J" m, X% P6 d
    14. 光标是停在文本框文字的最后
    9 c; z7 ]  k- I1 |; O; _- _. W( B# M. w<script language="javascript">+ a9 F( S4 y# `+ K
    function cc()4 Z* \/ P6 }: U) H9 ^5 N
    {
    ! M5 _4 ]* b2 A$ P  Nvar e = event.srcElement;* S  U$ c0 k& p
    var r =e.createTextRange();2 |- ]& g- w; O8 S% L
    r.moveStart('character',e.value.length);6 y. U2 D3 e; b/ a. ^
    r.collapse(true);0 I+ l/ @+ q, r2 B3 b: I
    r.select();
    * z$ f* m/ Q7 p8 _5 ]}
    ) C% q1 V1 A; o' @</script>
    1 O# {% U0 P4 t<input type=text name=text1 value="123">9 J% f$ ~- B4 a; q/ J  b

    , B% _) q4 K  P' O15. 判断上一页的来源
    9 T" w( k- U/ J+ ?1 x" e& }asp:* P. O; r0 {3 B+ O
    request.servervariables("HTTP_REFERER")
    ! R* a( p7 Q: e. t* ~* F, f8 z9 \# I5 k
    javascript :. S9 w/ n8 x, z9 K: @, y! f. H
    document.referrer
    # L5 O5 b( C4 x2 q% L3 P
    ( J# a9 M: c, y" V: k16. 最小化、最大化、关闭窗口; H& J% J; ?4 h; P+ `6 A4 Y3 d
    <object id=hh1 classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">
    # `. g4 `- T1 u  A/ b6 Y<param name="Command" value="Minimize"></object>
    ) K! @' r% S3 x; R( W/ V0 i<object id=hh2 classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11"> & n/ @3 I2 P( @
    <param name="Command" value="Maximize"></object>+ _  x2 \7 m7 }. d3 Q
    <OBJECT id=hh3 classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">
    % x' Z) L1 J: ], T( h& y<PARAM NAME="Command" value="Close"></OBJECT>' z2 C2 h* L+ K4 l! A: U( N8 x: |) l
    : n: \  k3 `7 G
    <input type=button value=最小化 onclick=hh1.Click()>6 i, G( f; \* ]  i" y) S
    <input type=button value=最大化 onclick=hh2.Click()>8 W0 U3 H8 K  ]2 v8 A, m
    <input type=button value=关闭 onclick=hh3.Click()>
    8 n0 N5 a' L' t) l# @  _2 x本例适用于IE3 {, h; I  E# a* d

    6 F: c0 Q2 {7 v$ Z( @17.
    3 D$ p8 _, O3 y  M3 T: L* q5 e! Y<%7 {- C- S2 A6 ^* K
    '定义数据库连接的一些常量/ E% B( Z4 [6 S0 u7 \
    Const adOpenForwardOnly = 0 '游标只向前浏览记录,不支持分页、Recordset、BookMark* f+ [# R/ \  O' d- Y. W  u7 n5 J- U0 s
    Const adOpenKeyset = 1 '键集游标,其他用户对记录说做的修改将反映到记录集中,但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、BookMark  e" ^8 b. E; {6 ~. t
    Const adOpenDynamic = 2 '动态游标功能最强,但耗资源也最多。用户对记录说做的修改,增加或删除记录都将反映到记录集中。支持全功能浏览(ACCESS不支持)。
    7 t$ x" G" E4 t' X. OConst adOpenStatic = 3 '静态游标,只是数据的一个快照,用户对记录说做的修改,增加或删除记录都不会反映到记录集中。支持向前或向后移动
    ! _! r/ e/ X" M/ n+ f3 x1 E: H& Y8 x) d0 g! [2 k3 E% G5 A
    Const adLockReadOnly = 1 '锁定类型,默认的,只读,不能作任何修改& L6 d8 X8 U/ ^0 Z# E& A# H! F, o2 u
    Const adLockPessimistic = 2 '当编辑时立即锁定记录,最安全的方式
    : Q3 m% |% ]4 ?+ Z1 @7 ZConst adLockOptimistic = 3 '只有在调用Update方法时才锁定记录集,而在此前的其他操作仍可对当前记录进行更改、插入和删除等
    1 N; n" B% _$ q% f2 f6 dConst adLockBatchOptimistic = 4 '当编辑时记录不会被锁定,而更改、插入和删除是在批处理方式下完成的. S0 n; Q7 Z0 E0 P- T0 T
    ) A4 V! b' x* B5 P0 k. ?4 g) k
    Const adCmdText = &H0001
    , f, A- w: s0 v" f3 t  a* w1 iConst adCmdTable = &H00024 ~" `6 M0 L1 k/ D  T2 O0 x/ g$ }: k
    %>% s" m$ j" B; h# [1 Z% ~

    , E0 O9 K9 R. u) T5 b18. 网页不会被缓存1 o; D4 _" z. W' b, Q
    HTM网页
    ' P, `  Z* I% f<META HTTP-EQUIV="pragma" CONTENT="no-cache">
    " Z& i7 t% o& I$ Y<META HTTP-EQUIV="Cache-Control" CONTENT="no-cache, must-revalidate">4 l# B, A! b- j2 U0 `! L
    <META HTTP-EQUIV="expires" CONTENT="Wed, 26 Feb 1997 08:21:57 GMT">
    % L; _9 Y9 C( X2 I+ V或者<META HTTP-EQUIV="expires" CONTENT="0">
    5 ~) Z5 j8 k6 o9 m- J: ~' hASP网页! Z  \, l' Y! p
    Response.Expires = -1
    - @$ f5 k+ U/ L9 bResponse.ExpiresAbsolute = Now() - 1# q: @1 V4 G  i. S. ~. L2 m
    Response.cachecontrol = "no-cache"
    ) O6 h, c$ T$ R2 A( gPHP网页8 M3 v% a$ K) Q6 s3 d* @9 c
    header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");6 g  Z; }( F+ K6 }
    header("Cache-Control: no-cache, must-revalidate");
    4 T' C' C' X4 qheader("Pragma: no-cache");& X$ C/ w5 h! e( Y0 f% q

    ' `# ?8 H6 y( \; T$ e0 _: J2 r) b19. 检查一段字符串是否全由数字组成
    . M3 g( d8 i% Z7 S4 N. o. N<script language="javascript"><!--7 ], z: F7 Q/ ?
    function checkNum(str){return str.match(/\D/)==null}) f4 C( Q( l! T
    alert(checkNum("1232142141"))
    ! W1 l3 t( |1 x! }# K/ w0 V) I$ Yalert(checkNum("123214214a1"))" }' z! g3 d0 _' ]4 j( h8 ^
    // --></script>
    5 I- A: O$ M4 s* |% ]$ a; v
    # ]: M# |2 Y9 v9 Z5 e! Y0 H' `20. 获得一个窗口的大小
    ( @1 S/ x  J3 L* g2 n, cdocument.body.clientWidth,document.body.clientHeight: i8 u8 S/ Y  z0 R4 B: P6 p. T$ o

    : @( [) C5 s; x8 E2 O7 Y8 s8 z- @21. 怎么判断是否是字符
    % x- E3 H+ l9 Q' V: Mif (/[^\x00-\xff]/g.test(s)) alert("含有汉字");( S" q2 Y0 ?6 E$ E0 G0 R
    else alert("全是字符");* }+ T* X! R* ^# K: V3 p

    - }. L% x1 u# Y8 S: w- }22.TEXTAREA自适应文字行数的多少* i5 B; Z7 k4 y' W* f6 t/ w* v/ V
    <textarea rows=1 name=s1 cols=27>
    1 b1 z4 ?% D( _</textarea>
    & _! v& z0 _+ u! t+ Q9 S2 o
    # w' X1 @) h3 }23. 日期减去天数等于第二个日期8 }  `, B  }! O% ^" q2 ~
    <script language=javascript>
      X7 {+ b/ Q1 u6 d( ~: v* D. Ofunction cc(dd,dadd)
    + c9 H! I% y& K{
    & F- v3 |% |; b$ {//可以加上错误处理
    : C; p" f6 G# b+ {6 Cvar a = new Date(dd)0 n4 i  _. a' x
    a = a.valueOf()9 j" c0 P3 ?- p/ p
    a = a - dadd * 24 * 60 * 60 * 1000- x( \  _' `9 p) c3 B4 Y7 a: `' P
    a = new Date(a)
    4 K& m8 U6 z) Z2 V! Halert(a.getFullYear() + "年" + (a.getMonth() + 1) + "月" + a.getDate() + "日")
    % l# l& }8 \8 X! @6 }1 ~}* B& ?) w' k/ ?% _: F6 K1 h- C
    cc("12/23/2002",2)% a0 V, |% I. F4 z
    </script>4 h2 v5 R' e# |, Z7 c* I

    ; D8 e& O) F9 X  e7 a# K  |9 ?24. 选择了哪一个Radio, I0 V4 Y$ l% ]1 j* a
    <HTML><script language="vbscript">1 b( v3 _2 `7 v- N( `
    function checkme()7 V7 ~1 J* b% Z% ^; P9 H
    for each ob in radio14 r- h; ^1 ]8 R  ]: m% y, D9 b
    if ob.checked then window.alert ob.value
    5 y) W: k8 o4 {- R( ~* S8 enext" `& J5 C* Y. D5 {$ w. c
    end function
    + |2 |' U. R$ m* N</script><BODY>) s3 f/ L  J% ]
    <INPUT name="radio1" type="radio" value="style" checked>Style
    ! E8 o6 J4 \7 `4 Q0 f& v<INPUT name="radio1" type="radio" value="barcode">Barcode: v; r  T3 ~. w  W+ O% l
    <INPUT type="button" value="check">
    - [) m6 _5 a- a( e</BODY></HTML>
    , @$ @8 t# v* Q0 r% _1 F8 y' R( c2 ?( m' J
    25.获得本页url的request.servervariables("")集合
    5 p  D( N, m% N& _Response.Write "<TABLE border=1><!-- Table Header --><TR><TD><B>Variables</B></TD><TD><B>value</B></TD></TR>"" b, O+ f% o( L1 h* ~' W! L- R" o
    for each ob in Request.ServerVariables/ ?7 f) V/ }( [9 b  p* G
    Response.Write "<TR><TD>"&ob&"</TD><TD>"&Request.ServerVariables(ob)&"</TD></TR>". d3 A0 B6 J: ^0 k: K5 X
    next
    / ]- Z; r5 M+ P" z3 Y2 l; OResponse.Write "</TABLE>"
    1 d, A6 R6 j5 ?- @! p
    . R) A$ r& ?3 i- l4 ?' [26.
    7 m9 b7 [4 f, M8 Z7 k1 ~9 g' y! u本机ip<%=request.servervariables("remote_addr")%>
    ' {8 [" @! f; @8 M服务器名<%=Request.ServerVariables("SERVER_NAME")%>
    0 x4 n& }3 M3 F' Q# V服务器IP<%=Request.ServerVariables("LOCAL_ADDR")%>1 J1 g7 a8 n! l; X7 h0 }9 G
    服务器端口<%=Request.ServerVariables("SERVER_PORT")%>' {7 \4 q8 J& t# o! n9 a0 h0 ^' [
    服务器时间<%=now%>4 G% M# G9 i) r
    IIS版本<%=Request.ServerVariables"SERVER_SOFTWARE")%>+ G# k# x6 @, c9 O( X* a2 |
    脚本超时时间<%=Server.ScriptTimeout%>
    9 [, J3 W" j+ T, L% i2 U本文件路径<%=server.mappath(Request.ServerVariables("SCRIPT_NAME"))%>& \& e0 r/ T! W& J4 Y+ W, @1 l( T
    服务器CPU数量<%=Request.ServerVariables("NUMBER_OF_PROCESSORS")%>
    + k5 B- j2 _, @服务器解译引擎<%=ScriptEngine & "/"& ScriptEngineMajorVersion &"."&ScriptEngineMinorVersion&"."& ScriptEngineBuildVersion %>  G7 f! f% N5 f7 ^# m
    服务器操作系统<%=Request.ServerVariables("OS")%>' t* a9 t+ s; W& M$ i6 N5 |% C
    9 ^. }" z$ W! U
    27.ENTER键可以让光标移到下一个输入框8 S, m5 h( r- Y7 `2 W. Y
    <input>% P- f, d7 H2 W, H

    2 Z/ O3 r& W2 H5 r# ~' A5 ?1 R( J28. 检测某个网站的链接速度:
    , R, \' o$ o* g1 B1 C# f+ m1 {# m把如下代码加入<body>区域中:# e" y" Q7 N1 N# w' S. ]9 \
    <script language=javascript>" H+ t1 I: H1 e
    tim=14 q/ G5 G" f$ P5 t: c, Z
    setInterval("tim++",100)
    , h- o) ~+ i0 f0 Ub=14 L. e. R! d. |4 z' Z/ O& |. z
    1 b; ?1 X4 V1 f; o& [& ^: p/ B
    var autourl=new Array()- B" I% e6 t2 K3 E9 N0 F5 z- G9 J
    autourl[1]="www.njcatv.net"" p$ @/ D& K5 f6 S3 S7 l5 M+ k
    autourl[2]="javacool.3322.net"
    * v  q) d7 X3 @8 @6 Uautourl[3]="www.sina.com.cn"& E$ k' U) f* P  u
    autourl[4]="www.nuaa.edu.cn"
    8 x# {6 @6 p+ ~: W% Q' Hautourl[5]="www.cctv.com"
    # z4 @' ~' l2 M& {% E" F0 {
    3 q8 X) Y8 }/ v% V9 d1 afunction butt(){* o7 P/ i! u" F
    document.write("<form name=autof>")
    . @) y! r% \9 y+ ]; d: }for(var i=1;i<autourl.length;i++)5 ~7 t: q! q: A. Q: `
    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/>")& |0 a8 y/ F& B# R
    document.write("<input type=submit value=刷新></form>")' [* X; V% A- O7 B: N+ o% v
    }
    # d& H6 `0 N( ~6 T2 Qbutt()
    0 h- G2 s* U0 q! t/ m# ffunction auto(url){+ q9 w) ?4 k# [  w' k1 T7 |
    document.forms[0]["url"+b].value=url
    2 E- P% R1 A, b5 h+ E1 q) F' Kif(tim>200)( \$ n" r$ _- l+ U( Q
    {document.forms[0]["txt"+b].value="链接超时"}
    7 O) Z( E- D, ?) S' g: h7 relse. e: {( j) T) r$ N
    {document.forms[0]["txt"+b].value="时间"+tim/10+"秒"}, k% C6 H  M1 o
    b++
    8 M; [: y. v2 u& y; z9 O& ^7 V' @& c}9 I( H1 v5 q/ b; i6 x" O
    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 U  p6 d1 w& c5 _
    run()</script>
    + a5 S' Z" Y+ s; G, m/ O2 l7 b- Y) V
    29. 各种样式的光标- W" ]# H2 @8 X3 \, n
    auto :标准光标- K+ J# S0 U0 x, D# C$ _6 S
    default :标准箭头: q- y4 d4 S6 f) `. _% r" v
    hand :手形光标( `# C" k. ]- W# F' u! M
    wait :等待光标
    : l6 [$ y" \7 `0 y& K/ z8 `# Ytext :I形光标
    0 m' I- ?& F2 N* e) Tvertical-text :水平I形光标
    * T8 L6 q- R% o& yno-drop :不可拖动光标# n: Y7 F+ |' M0 B1 F5 n
    not-allowed :无效光标
      q1 B! m' P7 d& q( h* K2 Y+ r5 Jhelp :?帮助光标
    3 M; X. E9 }0 b2 A2 a8 j) iall-scroll :三角方向标9 {; H/ }6 j0 H% k* W8 r( t/ @+ X
    move :移动标
    * v) T& b4 V- \$ ~) \/ P: `. m. {crosshair :十字标& @5 G+ I- o4 V& s. a0 t3 f  K
    e-resize# o1 G2 p/ t0 S8 r
    n-resize
    * i+ g: ]% a3 H0 J3 [nw-resize) a1 B# x# a7 ]' o4 Z
    w-resize
    ! e. M! U; \- V( U. p3 |s-resize$ D  Q5 ]. J$ r
    se-resize$ S) B) B! X1 i, D. B3 P( t+ a
    sw-resize 转
    8 [. g7 A( `/ r  {
    常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~
    您需要登录后才可以回帖 登录 | 免费注册

    本版积分规则

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

    GMT+8, 2025-8-8 05:07

    Powered by Discuz! X3.2

    © 2001-2013 Comsenz Inc.

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