欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

asp数据库防下载处理

程序员文章站 2022-04-14 18:50:17
复制代码 代码如下:<% db="market.asp" '这里改成您的数据库地址 set conn=server.createobject("a...
复制代码 代码如下:

<%
db="market.asp" '这里改成您的数据库地址
set conn=server.createobject("adodb.connection")
connstr="provider=microsoft.jet.oledb.4.0;data source="&server.mappath(db)
conn.open connstr
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
%>