国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 數據庫 > Access > 正文

如何防止access數據庫被下載的代碼_ASP教程

2024-09-07 19:04:32
字體:
來源:轉載
供稿:網友

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

首先,如果只是直接將access數據庫的后綴名改為.asp是無法防止下載的,正確的做法是,建立一個表,為這個表中寫入二進制文件,即OLE對象。具體代碼如下:

<%  
Dim DB,RS,SQL  
DB = "DB.asp"  ’這里改成你的數據庫,后綴一定要是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 "數據庫防下載處理完成,請確認您的Access數據庫已經改為ASP后綴"  
%>

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

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 万源市| 安溪县| 昌乐县| 宜章县| 泗水县| 德昌县| 宁南县| 梁山县| 蓝田县| 荥阳市| 尼勒克县| 西林县| 海原县| 滨海县| 黑山县| 曲沃县| 闵行区| 铅山县| 抚顺市| 铁岭县| 炉霍县| 马山县| 光山县| 专栏| 大竹县| 方正县| 永城市| 合水县| 通州区| 新巴尔虎左旗| 南郑县| 黄浦区| 周口市| 福州市| 饶平县| 缙云县| 囊谦县| 铁岭县| 澎湖县| 石棉县| 隆昌县|