Microsoft Office Access是由微軟發(fā)布的關(guān)系數(shù)據(jù)庫管理系統(tǒng)。它結(jié)合了 MicrosoftJet Database Engine 和 圖形用戶界面兩項(xiàng)特點(diǎn),是 Microsoft Office 的系統(tǒng)程序之一。Microsoft Office Access是微軟把數(shù)據(jù)庫引擎的圖形用戶界面和軟件開發(fā)工具結(jié)合在一起的一個(gè)數(shù)據(jù)庫管理系統(tǒng)。它是微軟OFFICE的一個(gè)成員, 在包括專業(yè)版和更高版本的office版本里面被單獨(dú)出售。2018年9月25日,最新的微軟Office Access 2019在微軟Office 2019里發(fā)布。 首先,如果只是直接將access數(shù)據(jù)庫的后綴名改為.asp是無法防止下載的,正確的做法是,建立一個(gè)表,為這個(gè)表中寫入二進(jìn)制文件,即OLE對象。具體代碼如下:
<%
Dim DB,RS,SQL
DB = "DB.asp" ’這里改成你的數(shù)據(jù)庫,后綴一定要是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ù)庫防下載處理完成,請確認(rèn)您的Access數(shù)據(jù)庫已經(jīng)改為ASP后綴"
%> |
Microsoft Access在很多地方得到廣泛使用,例如小型企業(yè),大公司的部門。
|