UC知道下载的数据库有个加密文件是什么
来源：百度知道 编辑：UC知道 时间：2024/06/07 10:42:55
我下载了个整站程序里面有个“加密”文件夹，文件的后缀是.asp,改成.mdb后用access2003打不开，提示“不可识别的数据库格式”，代码如下：
<%
on error resume next
dim conn
dim connstr
dim db
db="datacnmai_xp\datacnmai_xp\%297456123894cnmaidatazhaobaoshengcnmaicom.mdb" '数据库文件的位置
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.Open connstr
set rs=server.createobject("adodb.recordset")
for i=1 to 2500
sql="select password from user where id="&i
rs.open sql,conn,1,1
response.Write sql &"<br>"
if rs.bof and rs.eof then
response.Write "用户"&i&"没有找到<br>"
end if
' pwd=rs(password)
response.Write "找到用户"&i&"的密码为"&rs("password") &"正在进行修改----"
rs("password")=md5(rs("password"))
rsspons
<%
on error resume next
dim conn
dim connstr
dim db
db="datacnmai_xp\datacnmai_xp\%297456123894cnmaidatazhaobaoshengcnmaicom.mdb" '数据库文件的位置
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.Open connstr
set rs=server.createobject("adodb.recordset")
for i=1 to 2500
sql="select password from user where id="&i
rs.open sql,conn,1,1
response.Write sql &"<br>"
if rs.bof and rs.eof then
response.Write "用户"&i&"没有找到<br>"
end if
' pwd=rs(password)
response.Write "找到用户"&i&"的密码为"&rs("password") &"正在进行修改----"
rs("password")=md5(rs("password"))
rsspons
下载的数据库文件错误，主扩展应为.mdf，你如果有数据库软件 比如 sqlServer 附件进数据库看一下能不能运行，如果不行，其实，把数据库删除了 自己建一个都行，你的这个程序 就是判断账号和密码是否和数据库中的账号密码一致，如果一致 登陆成功，否则失败，建一个简单的库就能判断了
%297456123894cnmaidatazhaobaoshengcnmaicom.mdb
这个才是数据库。怎么会是ASP的？