Access数据库防下载工具

风流才子

<>　　这应该算是一个比较热门的东东了，常有人讨论防下载的问题，用这东东试试看吧。<BR>处理后将数据库改成ASP后缀，才子测试通过了，确实下载不了。</P>
<>　　<a href="http://54caizi.com/down/accessnotdown.rar" target="_blank" >下载</A></P>
<>　　另外附上ASP处理ACCESS数据库防下载的方法，才子原创，感谢支持！！！<BR>将以下代码存成.asp文件，放在数据库所在目录下执行一次即可。<BR>&lt;%<BR>Dim DB,RS,SQL<BR>DB = "DB.asp"    '这里改成您的数据库，一定要是asp后缀<BR>Set Conn = Server.CreateObject("Adodb.Connection")<BR>Conn.Open "rovider=Microsoft.Jet.OLEDB.4.0;Data Source="&amp;Server.MapPath(db)<BR>Conn.Execute("CREATE Table NotDownload(NotDown OLEObject)")<BR>Set RS = Server.CreateObject("ADODB.RecordSet")<BR>SQL = "SELECT * FROM NotDownload"<BR>RS.Open SQL,Conn,1,3<BR>RS.Addnew<BR>RS("NotDown").appendchunk(chrB(Asc("&lt;")) &amp; chrB(Asc("%")))<BR>RS.Update<BR>RS.Close<BR>Set RS = Nothing<BR>Conn.Close<BR>Set Conn = Nothing<BR>Response.Write "数据库防下载处理完成，请确认您的Access数据库已经改为ASP后缀"<BR>%&gt;<BR><BR></P>

特卓

不错，好东西，象这样的好东西就得大家一起分享