向大家请教一个问题。
myoffice.mdb有密码。为什么连接代码中没有显示出密码来。
如何知道库的密码?请告知。多谢!为盼。
opendb.asp文件内容
<%
session.abandon
function opendb(DBPath,sessionname,dbsort)
dim conn
if not isobject(session(sessionname)) then
Set conn=Server.CreateObject("ADODB.Connection")
DBPath1=server.MapPath("myoffice.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath1
set session(sessionname)=conn
end if
set opendb=session(sessionname)
end function
%>
其中页面连接数据库为
<!--#include file="opendb.asp"-->
<%
username=request("username")
password=request("password")
if username<>"" and password<>"" then
'打开数据库查找是否有此用户
set conn=opendb("oabusy","conn","accessdsn")
set rs=server.createobject("adodb.recordset")
sql="select * from userinf where username=" & sqlstr(username) & " and password=" & sqlstr(password) & " and forbid='no'"
rs.open sql,conn,1
'如果有此用户就进入系统