[教學]經典的網頁代碼2

11. ＜input type=button ＆#118alue=查看網頁源代碼

　　＆#111nclick="window.location = 'view-source:'+ 'http://www.csdn.net/'"＞

　　12. 怎樣通過asp的手段來檢查來訪者是否用了代理

　　＜% if Request.ServerVariables("HTTP_X_FORWARDED_FOR")＜＞"" then

　　response.write "＜font color=#FF0000＞您通過了代理服務器，"& _

　　"真實的IP為"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")

　　end if

　　%＞

　　13. 取得控件的絕對位置

　　//＆#106avascript

　　＜script language="＆#106avascript"＞

　　function getIE(e){

　　 var t=e.offsetTop;

　　 var l=e.offsetLeft;

　　 while(e=e.offsetParent){

　　 t+=e.offsetTop;

　　 l+=e.offsetLeft;

　　 }

　　 alert("top="+t+"\nleft="+l);

　　 }

　　＜/script＞

　　//VBScript

　　＜script language="VBScript"＞＜!--

　　function getIE()

　　 dim t,l,a,b

　　 set a=document.all.img1

　　 t=document.all.img1.offsetTop

　　 l=document.all.img1.offsetLeft

　　 while a.tagName＜＞"BODY"

　　 set a = a.offsetParent

　　 t=t+a.offsetTop

　　 l=l+a.offsetLeft

　　 wend

　　 msgbox "top="&t&chr(13)&"left="&l,64,"得到控件的位置"

　　end function

　　--＞＜/script＞

　　14. 光標是停在文本框文字的最後

　　＜script language="＆#106avascript"＞

　　function cc()

　　{

　　 var e = event.srcElement;

　　 var r =e.createTextRange();

　　 r.moveStart('character',e.＆#118alue.length);

　　 r.collapse(true);

　　 r.select();

　　}

　　＜/script＞

　　＜input type=text name=text1 ＆#118alue="123" onfocus="cc()"＞

　　15. 判斷上一頁的來源

　　asp:

　　request.servervariables("HTTP_REFERER")

　　＆#106avascript:

　　document.referrer

x0