六月婷婷综合激情-六月婷婷综合-六月婷婷在线观看-六月婷婷在线-亚洲黄色在线网站-亚洲黄色在线观看网站

明輝手游網(wǎng)中心:是一個(gè)免費(fèi)提供流行視頻軟件教程、在線學(xué)習(xí)分享的學(xué)習(xí)平臺(tái)!

防范access數(shù)據(jù)庫(kù)被下載的代碼_ASP圖文說(shuō)明教程

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

首先,如果只是直接將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后綴"  
%>

Microsoft Access在很多地方得到廣泛使用,例如小型企業(yè),大公司的部門(mén)。




主站蜘蛛池模板: 七月丁香八月婷婷综合激情 | 色宅男中文字幕亚洲专区 | 五月激情六月丁香 | 伊人高清视频 | 色综合久久六月婷婷中文字幕 | 伊人精品视频在线观看 | 亚洲影视天堂 | 天天狠狠干 | 亚洲黄色影视 | 日韩日韩日韩手机看片自拍 | 青春草在线视频免费 | 欧洲一级视频 | 色狠狠成人综合色 | 欧美性色一级在线观看 | 亚洲综合图片 | 天天综合天天综合色在线 | 在线观看91香蕉国产免费 | 中文字幕亚洲无线码在一区 | 日本免费高清视频 | 亚洲免费网站观看视频 | 日日夜夜免费精品视频 | 青青国产成人久久91网站站 | 天天躁夜夜躁很很躁 | 亚欧日韩毛片在线看免费网站 | 亚洲男人天堂视频 | 日日拍夜夜拍 | 中文字幕精品亚洲无线码二区 | 午夜在线观看免费观看大全 | 日韩一区精品 | 亚洲五香丁香 | 色天使在线视频 | 日本男人的天堂 | 性欧美高清精品video | 亚洲高清免费在线观看 | 亚洲欧美日韩国产色另类 | 日韩成年人视频 | 天天狠天天透天干天天怕处 | 日韩免费黄色片 | 日日摸夜夜爽人人添 | 青青草原1769久久免费播放 | 在线国产网站 |