DNF每日簽到送豪
lol7月神秘商店
LOL黑市亂斗怎么
LOL英雄成就標志相關資訊
本類常用軟件
-
福建農村信用社手機銀行客戶端下載下載量：584204
-
Windows優化大師下載量：416896
-
90美女秀(視頻聊天軟件)下載量：366961
-
廣西農村信用社手機銀行客戶端下載下載量：365699
-
快播手機版下載量：325855
騎自行車的正確
在校大學生該如
微信朋友圈怎么這篇文章主要提供了幾組實用的ASP程序和JS腳本代碼給大家分享，希望能夠幫助到大家。
ASP與access數據庫連接：
<%@ language=VBscript%>
<%
dim conn,mdbfile
mdbfile=server.mappath("數據庫名稱.mdb")
set conn=server.createobject("adodb.connection")
conn.open "driver={ microsoft access driver (*.mdb) };uid=admin;pwd=數據庫密碼;dbq="&mdbfile
%>
基本的分頁代碼：
<%
Response.write "<b>>> 全部 - "
Response.write "共</font> " & "<font color=#FF0000>" & Cstr(Rs.RecordCount) & "</font>" & " 條信息</b> "
Response.write "<b>第 " & "<font color=#FF0000>" & Cstr(CurrentPage) & "</font>" & "/" & Cstr(rs.pagecount) & "</b> "
If currentpage > 1 Then
response.write "<b><a href='?&page="+cstr(1)+"'>首頁</a></b> "
Response.write "<b><a href="/?page="+Cstr(currentpage-1)+"'>上一頁</a></b> "
Else
Response.write "<b>上一頁</b> "
End if
If currentpage < Rs.PageCount Then
Response.write "<b><a href="/?page="+Cstr(currentPage+1)+"'>下一頁</a> "
Response.write "<a href="/?page="+Cstr(Rs.PageCount)+"'>尾頁</a></b> "
Else
Response.write ""
Response.write "<b>下一頁</b> "
End if
%>
簡單的ASP程序密碼鎖，即瀏覽需身份驗證的頁面：
使用ASP程序來給網頁進行加密，一般來說利用程序來進行密碼驗證的方法比較通用，現在大多數網站都使用ASP程序，它對Web服務器沒有具體要求，而其加密就是借助數據庫及ASP程序進行設計，來實現一種通用網頁加密。
1. 打開 Microsoft Access，建立一個"用戶名及密碼"的數據表，假設將這個表取名為User，數據庫名為db.mdb
數據表的結構如下：
字段說明 字段名稱 數據類型 數據長度
用戶名稱 ID 文本 15
用戶密碼 PWD 文本 15
2. 編輯一個 Pass.asp 的驗證文件，源代碼如下：
<%
Function Check( ID, Pwd )
Dim conn, par, rs
Set conn = Server.createObject("ADODB.Connection")
par = "driver={ Microsoft Access Driver (*.mdb) } "
conn.Open par && ";dbq=" && Server.MapPath("db.mdb ")
sql = "select ? From users where ID='" && ID && "' And Pwd = '" && Pwd &&"'"
Set rs = conn.Execute( sql )
If rs.EOF Then
Check= False
Else
Check= True
End If
End Function
%>
<%
If IsEmpty(Session("Passed")) Then Session("Passed") = False
Head = "請輸入用戶名和密碼"
ID = Request("ID")
Pwd = Request("Pwd")
If ID = "" Or Pwd = "" Then
Head = "請輸入用戶名和密碼"
Else If Not Check( ID, Pwd ) Then
Head = "用戶名稱或密碼有錯"
Else
Session("Passed") = True
End If
If Not Session("Passed") Then
%>
<html>
<head>
<title></title>
</head>
<body BGCOLOR="#FFFFFF">
<h2 ALIGN="CENTER"><%=Head%></h2>
<hr WIDTH="100%">
<form Action="<%=Request.ServerVariables("PATH_INFO")%>" Method="POST">
<table BORDER="1" CELLSPACING="0">
<tr>
<td ALIGN="RIGHT">用戶名稱:</td>
<td><input Type="Text" Name="ID" Size="12" Value="<%=ID%>"></td>
</tr>
<tr> <td ALIGN="RIGHT">密碼：</td>
<td><input Type="Password" Name="Pwd" Size="12" Value="<%=Pwd%>"></td></tr>
</table>
<p><input Type="Submit" Value="確定"></p></form>
<hr WIDTH="100%" align="center">
</body>
</html>
<%Response.End
End If %>
3. 在需要加密網頁的HTML代碼最前面加上 <! --＃i nclude file="pass.asp"--> 就可以了。由于這個驗證合法性的頁面具有通用性，所以非常方便使用。
禁止復制和右鍵菜單的腳本及代碼：
1、<body oncontextmenu='return false' ondragstart='return false' onselectstart ='return false' onselect='document.selection.empty()' oncopy='document.selection.empty()' onbeforecopy='return false' onmouseup='document.selection.empty()'>
2、<body oncontextmenu="return false" ondragstart="return false" onselectstart ="return false" onselect="document.selection.empty()" oncopy="document.selection.empty()" onbeforecopy="return false">
3、<script type="text/java script">
document.body.oncut=function(){ return false; };
document.body.onselectstart=function(){ return false; };
var printBody=document.getElementById("printBody");
if (printBody!=undefined){
printBody.oncopy=function(){ return false; };
}
</script>
4、<body oncontextmenu="return false" ondragstart="return false" onselectstart="return false" onMouseOver="window.status='狀態欄';return true">
5、<body oncontextmenu="return false" onselectstart ="return false">
最簡單的是第五種，最原始的代碼就是：oncontextmenu="return false" 禁右鍵，onselectstart ="return false" 禁選中，用在<body>屬性里，以前一直很管用，包括現在放IE里瀏覽也很靈，但隨著第三方功能強大的瀏覽器的出現，及各種實用插件的發明，象EnableRightClick這個插件就把禁選中和鼠標的鎖右鍵輕松破解了，歸根結底是防菜鳥和懶人的，真的要破除限制，即使沒有插件幫忙，一樣能搞定。其它的幾個增加了一些額外的參數，如第4個加入了狀態欄信息。 第3個不同于其它四個(算是嵌入HTML代碼)，是加入的腳本，還有以前那些擊右鍵就彈出收藏夾或是"禁止復制"的提示，現在來看都是弱智型的了。
浮動的圖片層，位置固定的：
<SCRIPT>
var sgImg="圖片URL"
var sgWidth=63
var sgHeight=300
var sgLink="鏈接URL"
var sgNS=(document.layers)?true:false
if(sgNS){ document.write('<LAYER ID="Corner" WIDTH='+sgWidth+' HEIGHT='+sgHeight+'><A href="'+sgLink+'" target=_blank><IMG src="'+sgImg+'" BORDER=0 WIDTH="'+sgWidth+'" HEIGHT="'+sgHeight+'"></A></LAYER>'); }else{ document.write('<DIV ID="Corner" STYLE="position:absolute; width:'+sgWidth+'; height:'+sgHeight+'; z-index:9; filter: Alpha(Opacity=70)"><A href="'+sgLink+'" target=_blank><IMG src="'+sgImg+'" BORDER=0 WIDTH="'+sgWidth+'" HEIGHT="'+sgHeight+'"></A></DIV>'); }
function StayCorner(){ var sgTop;var sgLeft
if(sgNS){ sgTop = pageYOffset+window.innerHeight-document.Corner.document.height-10;sgLeft = pageXOffset+window.innerWidth-document.Corner.document.width-10;document.Corner.top = sgTop;document.Corner.left = sgLeft; }else{
sgTop = document.body.scrollTop+document.body.clientHeight-document.all.Corner.offsetHeight-30;sgLeft = document.body.scrollLeft+document.body.clientWidth-document.all.Corner.offsetWidth-5;Corner.style.top = sgTop;Corner.style.left = sgLeft; }
setTimeout('StayCorner()', 50) }
sgDump = StayCorner()
</SCRIPT>
返回上一步
以下兩種都可以：
<a href="/java script:history.back"()>返回</a>
<a href="/java script:history.go"(-1)>返回</a>
額外參數(ASP)：返回上一步時強制瀏覽器重新訪問服務器下載頁面，非從緩存讀取頁面，實際上等于返回到上一步再刷新一次，以確保頁面信息的時效性：
<%
Response.Buffer = True
Response.Expires = 1000
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
Response.CacheControl = "no-cache"
%>
去掉點擊圖片鏈接后圖片周圍的虛線：
1、調用方式：
<public:attach event="onfocus" onevent="example()" />
<script language="java script">
function example(){
this.blur();
}
</script>
//將以上代碼存為以.htc為擴展名的文件，然后再編寫一個普通的HTML頁。
<html>
<head>
<style>
A { behavior:url(HTC文件所在的路徑地址，完整URL) }
</style>
<body>網頁內容……
</body>
</html>
2、單獨的圖片文件：
圖片屬性里的語法為：onFocus="this.blur()" ，比如：
<a href="#" onFocus="this.blur()"><img src="圖片URL" border=0></a>
禁止提示腳本的錯誤信息的小腳本：
<SCRIPT LANGUAGE="java script">
<!-- Hide
function killErrors() {
return true;
}
window.onerror = killErrors;
// -->
</SCRIPT>
頁面上腳本語法搞錯，有錯誤提示，卻又搞不定，而頁面功能無礙的情況下，可以這樣偷個懶，把錯誤提示隱藏掉