首页 > 编程 > ASP > 正文

asp数据库防下载处理

2024-05-04 11:02:59
字体:
来源:转载
供稿:网友
复制代码 代码如下:
<%
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
%> 
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表