ASP 精華源碼收集(五年總結(jié))第15/20頁
更新時間:2008年10月20日 22:58:16 作者:
在5年的開發(fā)中,總結(jié)出來的一些源碼
服務(wù)器端腳本:
<%………
set conn=server.CreateObject ("adodb.connection")
conn.Open "DSN=name;UID=XXXX;PWD=XXXX;"
set rs=server.CreateObject("adodb.recordset")
rs.Open(“select ……”),conn,1,1
……….%> //與數(shù)據(jù)庫進(jìn)行交互
HTML頁面編碼:
<HTML>
………
<FORM ID=printinfo NAME="printinfo" >
<INPUT type="button" value="打印>>" id=print name=print > //調(diào)用打印函數(shù)
<INPUT type=hidden id=text1 name=label value=<%=………%>> //保存服務(wù)器端傳來的數(shù)據(jù)
………
</HTML>
meizz(梅花雨)的百寶箱(一)(全部是好好東東喲)
1. oncontextmenu="window.event.returnValue=false" 將徹
底屏蔽鼠標(biāo)右鍵
<table border oncontextmenu=return(false)><td>no</table>
可用于Table
2. <body onselectstart="return false"> 取消
選取、防止復(fù)制
3. onpaste="return false"
不準(zhǔn)粘貼
4. oncopy="return false;" oncut="return false;"
防止復(fù)制
5. <link rel="Shortcut Icon" href="favicon.ico"> IE地址欄前
換成自己的圖標(biāo)
6. <link rel="Bookmark" href="favicon.ico"> 可以在收藏夾中
顯示出你的圖標(biāo)
7. <input style="ime-mode:disabled">
關(guān)閉輸入法
8. 永遠(yuǎn)都會帶著框架
<script language="JavaScript"><!--
if (window == top)top.location.href = "frames.htm";
//frames.htm為框架網(wǎng)頁
// --></script>
9. 防止被人frame
<SCRIPT LANGUAGE=JAVASCRIPT><!--
if (top.location !=
self.location)top.location=self.location;
// --></SCRIPT>
10. <noscript><iframe src=../../*.html></iframe></noscript> 網(wǎng)
頁將不能被另存為
11. <input type=button value=查看網(wǎng)頁源代碼
onclick="window.location = 'view-source:'+
'http://www.csdn.net/'">
12. 怎樣通過asp的手段來檢查來訪者是否用了代理
<% if Request.ServerVariables("HTTP_X_FORWARDED_FOR")<>""
then
response.write "<font color=#FF0000>您通過了代理服務(wù)器,"&
_
"真實的IP為
"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")
end if
%>
13. 取得控件的絕對位置
//Javascript
<script language="Javascript">
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. 光標(biāo)是停在文本框文字的最后
<script language="javascript">
function cc()
{
var e = event.srcElement;
var r =e.createTextRange();
r.moveStart('character',e.value.length);
r.collapse(true);
r.select();
}
</script>
<input type=text name=text1 value="123" onfocus="cc()">
15. 判斷上一頁的來源
asp:
request.servervariables("HTTP_REFERER")
javascript:
document.referrer
16. 最小化、最大化、關(guān)閉窗口
<object id=hh1
classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">
<param name="Command" value="Minimize"></object>
<object id=hh2
classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">
<param name="Command" value="Maximize"></object>
<OBJECT id=hh3
classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">
<PARAM NAME="Command" VALUE="Close"></OBJECT>
<input type=button value=最小化 onclick=hh1.Click()>
<input type=button value=最大化 onclick=hh2.Click()>
<input type=button value=關(guān)閉 onclick=hh3.Click()>
本例適用于IE
17.
<%
'定義數(shù)據(jù)庫連接的一些常量
Const adOpenForwardOnly = 0 '游標(biāo)只向前瀏覽記錄,不支持
分頁、Recordset、BookMark
Const adOpenKeyset = 1 '鍵集游標(biāo),其他用戶對記錄說
做的修改將反映到記錄集中,但其他用戶增加或刪除記錄不會反映到
記錄集中。支持分頁、Recordset、BookMark
Const adOpenDynamic = 2 '動態(tài)游標(biāo)功能最強(qiáng),但耗資源
也最多。用戶對記錄說做的修改,增加或刪除記錄都將反映到記錄集
中。支持全功能瀏覽(ACCESS不支持)。
Const adOpenStatic = 3 '靜態(tài)游標(biāo),只是數(shù)據(jù)的一個快
照,用戶對記錄說做的修改,增加或刪除記錄都不會反映到記錄集中
。支持向前或向后移動
Const adLockReadOnly = 1 '鎖定類型,默認(rèn)的,只讀,不
能作任何修改
Const adLockPessimistic = 2 '當(dāng)編輯時立即鎖定記錄,最安
全的方式
Const adLockOptimistic = 3 '只有在調(diào)用Update方法時才鎖
定記錄集,而在此前的其他操作仍可對當(dāng)前記錄進(jìn)行更改、插入和刪
除等
Const adLockBatchOptimistic = 4 '當(dāng)編輯時記錄不會被鎖定,而
更改、插入和刪除是在批處理方式下完成的
Const adCmdText = &H0001
Const adCmdTable = &H0002
%>
meizz(梅花雨)的百寶箱(二)
----------------------------
相關(guān)文章
asp連接SQL和Access數(shù)據(jù)代碼(asp里的隨機(jī)函數(shù))
asp連接SQL和Access數(shù)據(jù)代碼,asp里的隨機(jī)函數(shù),需要的朋友可以參考下2012-09-09asp下實現(xiàn)對HTML代碼進(jìn)行轉(zhuǎn)換的函數(shù)
asp下實現(xiàn)對HTML代碼進(jìn)行轉(zhuǎn)換的函數(shù)...2007-08-08循環(huán)取值Request.QueryString的用法
2008-01-01asp+Access通用的自動替換數(shù)據(jù)庫中的字符串
幾年前寫的一個腳本,可以自動進(jìn)行整庫的數(shù)據(jù)替換。2008-06-06asp下實現(xiàn) 重新排序數(shù)字?jǐn)?shù)組的代碼
asp下實現(xiàn) 重新排序數(shù)字?jǐn)?shù)組的代碼...2007-08-08