網頁實用代碼
[重要通告]如您遇疑難雜癥,本站支持知識付費業務,掃右邊二維碼加博主微信,可節省您寶貴時間哦!
1.自動跳轉
2. 不準網頁被另存為
網頁將不能被另存為
3. 獲得一個窗口的大小
document.body.clientWidth,document.body.clientHeight
document.body.offsetWidth,document.body.offsetHeight
有時還需要知道window.screenTop,window.screenLeft
4. 關閉輸入法
5. 將徹底屏蔽鼠標右鍵
oncontextmenu="window.event.returnvalue=false"
no |
可用于Table
6. 不準粘貼
onpaste="return false"
7. 取消選取、防止復制
8. 防止復制
oncopy="return false;" oncut="return false;"
9. IE地址欄前換成自己的圖標
10. 在收藏夾中顯示出你的圖標
11. 永遠都會帶著框架
12. 防止被人frame
13.
14. 怎樣通過asp的手段來檢查來訪者是否用了代理
<% if Request.ServerVariables("HTTP_X_FORWARDED_FOR")<>"" then
response.write "您通過了代理服務器,"& _
"真實的IP為"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")
end if
%>
15. 取得控件的絕對位置
file://javascript
file://VBScript
16. 光標是停在文本框文字的最后
17.收藏本站
收藏本站
18. 設為主頁
設為主頁
19. 改變網頁字體大小
在要縮放字體的表前加
表內加:
[大字體
中字體
小字體]
注意:
id=zoom的位置
20. 判斷上一頁的來源
asp:
request.servervariables("HTTP_REFERER")
javascript:
document.referrer
21. 最小化、最大化、關閉窗口
本例適用于IE
22.
<%
'定義數據庫連接的一些常量
Const adOpenForwardOnly = 0 '游標只向前瀏覽記錄,不支持分頁、Recordset、BookMark
Const adOpenKeyset = 1 '鍵集游標,其他用戶對記錄說做的修改將反映到記錄集中,但其他用戶增加或刪除記錄不會反映到記錄集中。支持分頁、Recordset、BookMark
Const adOpenDynamic = 2 '動態游標功能最強,但耗資源也最多。用戶對記錄說做的修改,增加或刪除記錄都將反映到記錄集中。支持全功能瀏覽(ACCESS不支持)。
Const adOpenStatic = 3 '靜態游標,只是數據的一個快照,用戶對記錄說做的修改,增加或刪除記錄都不會反映到記錄集中。支持向前或向后移動 Const adLockReadOnly = 1 '鎖定類型,默認的,只讀,不能作任何修改
Const adLockPessimistic = 2 '當編輯時立即鎖定記錄,最安全的方式
Const adLockOptimistic = 3 '只有在調用Update方法時才鎖定記錄集,而在此前的其他操作仍可對當前記錄進行更改、插入和刪除等
Const adLockBatchOptimistic = 4 '當編輯時記錄不會被鎖定,而更改、插入和刪除是在批處理方式下完成的
Const adCmdText = &H0001
Const adCmdTable = &H0002
%>
23. 網頁不會被緩存
HTM網頁
或者
ASP網頁
Response.Expires = -1
Response.ExpiresAbsolute = Now() - 1
Response.cachecontrol = "no-cache"
PHP網頁
header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
header("Cache-Control: no-cache, must-revalidate");
header("Pragma: no-cache");
24. 檢查一段字符串是否全由數字組成
25. 怎么判斷是否是字符
if (/[^\x00-\xff]/g.test(s)) alert("含有漢字");
else alert("全是字符");
26. 檢查一段字符串是否全由數字組成
27.TEXTAREA自適應文字行數的多少
28. 日期減去天數等于第二個日期
29. 選擇了哪一個Radio
Style
Barcode
30.獲得本頁url的request.servervariables("")集合
Response.Write "
Variables | value |
"&ob&" | "&Request.ServerVariables(ob)&" |
"
31.
客戶機ip <%=request.servervariables("remote_addr")%>
服務器名 <%=Request.ServerVariables("SERVER_NAME")%>
服務器IP <%=Request.ServerVariables("LOCAL_ADDR")%>
服務器端口<%=Request.ServerVariables("SERVER_PORT")%>
服務器時間<%=now%>
IIS版本<%=Request.ServerVariables"SERVER_SOFTWARE")%>
腳本超時時間<%=Server.ScriptTimeout%>
本文件路徑<%=server.mappath(Request.ServerVariables("SCRIPT_NAME"))%>
服務器CPU數量<%=Request.ServerVariables("NUMBER_OF_PROCESSORS")%>
服務器解譯引擎<%=ScriptEngine & "/"& ScriptEngineMajorVersion &"."&ScriptEngineMinorVersion&"."& ScriptEngineBuildVersion %>
服務器操作系統<%=Request.ServerVariables("OS")%>
32.ENTER鍵可以讓光標移到下一個輸入框
33. 檢測某個網站的鏈接速度:
把如下代碼加入
34. 各種樣式的光標
auto :標準光標
default :標準箭頭
hand :手形光標
wait :等待光標
text :I形光標
vertical-text :水平I形光標
no-drop :不可拖動光標
not-allowed :無效光標
help :?幫助光標
all-scroll :三角方向標
move :移動標
crosshair :十字標
e-resize
n-resize
nw-resize
w-resize
s-resize
se-resize
sw-resize
35.本地無緩存,每次自動刷新
response.expires=0
response.addHeader "pragma" , "no-cache"
response.addHeader "cache-control" , "private"
36.修改contentType并下載gif等格式
<%
function dl(f,n)
on error resume next
set s=CreateObject("Adodb.Stream")
S.Mode=3
S.Type=1
S.Open
s.LoadFromFile(server.mappath(f))
if err.number>0 then
response.write err.number & ":" & err.description
else
response.contentType="application/x-gzip"
response.addheader "Content-Disposition:","attachment; filename=" & n
response.binarywrite(s.Read(s.size))
end if
end function
call dl("012922501.gif","t1.gif")
%>
問題未解決?付費解決問題加Q或微信 2589053300 (即Q號又微信號)右上方掃一掃可加博主微信
所寫所說,是心之所感,思之所悟,行之所得;文當無敷衍,落筆求簡潔。 以所舍,求所獲;有所依,方所成!
免責聲明,若由于商用引起版權糾紛,一切責任均由使用者承擔。
您必須遵守我們的協議,如您下載該資源,行為將被視為對《免責聲明》全部內容的認可->聯系老梁投訴資源發表回復
要發表評論,您必須先登錄。