日韩天天综合网_野战两个奶头被亲到高潮_亚洲日韩欧美精品综合_av女人天堂污污污_视频一区**字幕无弹窗_国产亚洲欧美小视频_国内性爱精品在线免费视频_国产一级电影在线播放_日韩欧美内地福利_亚洲一二三不卡片区

如何防止access數(shù)據(jù)庫(kù)被下載的代碼_ASP教程

編輯Tag賺U幣
教程Tag:暫無(wú)Tag,歡迎添加,賺取U幣!

推薦:淺析js返回字符串中某個(gè)字符的出現(xiàn)次數(shù)
使用此函數(shù)能返回字符串中某個(gè)字符或字符串出現(xiàn)的次數(shù)其中mainStr為要查找的字符串,subStr為要檢查的字符串或字符 function countInstances(mainStr, subStr) { var count = 0; var offset = 0; do { offset = mainStr.indexOf(subStr, offset); if(offset !=

首先,如果只是直接將access數(shù)據(jù)庫(kù)的后綴名改為.asp是無(wú)法防止下載的,正確的做法是,建立一個(gè)表,為這個(gè)表中寫(xiě)入二進(jìn)制文件,即OLE對(duì)象。具體代碼如下:

<%  
Dim DB,RS,SQL  
DB = "DB.asp"  ’這里改成你的數(shù)據(jù)庫(kù),后綴一定要是asp  
Set Conn = Server.CreateObject("Adodb.Connection")  
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(db)  
Conn.Execute("Create Table NotDownload(NotDown OLEObject)")  
Set RS = Server.CreateObject("ADODB.RecordSet")  
SQL = "Select * FROM NotDownload"  
RS.Open SQL,Conn,1,3  
RS.Addnew  
RS("NotDown").appendchunk(chrB(Asc("<")) & chrB(Asc("%")))  
RS.Update  
RS.Close  
Set RS = Nothing  
Conn.Close  
Set Conn = Nothing  
Response.Write "數(shù)據(jù)庫(kù)防下載處理完成,請(qǐng)確認(rèn)您的Access數(shù)據(jù)庫(kù)已經(jīng)改為ASP后綴"  
%>

分享:解析asp編程中function和sub的區(qū)別
以function定義的函數(shù)或過(guò)程可以有返回值,以sub定義的函數(shù)或過(guò)程沒(méi)有返回值。 例如: functiontestvalue() testvalue=餓了就要吃飯,hoho’函數(shù)名為返回值 endfunction subtestsub() Response.Write(餓了就要吃飯,hoho) endsub 在程序中調(diào)用這兩個(gè)函數(shù)

來(lái)源:模板無(wú)憂//所屬分類:ASP教程/更新時(shí)間:2010-02-26
相關(guān)ASP教程