连接带密码的ACCESS数据库写法

dim conn
dim connstr
dim db
dim dbpaswd  (这个密码加在哪)
db=dbpath&"/"&dbname
connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"


set conn=server.createobject("ADODB.CONNECTION")
on error resume next
conn.open connstr
if err then
Err.Clear
Call CloseConn()
Response.Write "数据库连接出错，请检查数据库目录和数据库文件名是否正确。"
Response.End
end if

---

connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mydatabase.mdb;User Id=admin;Password=xxx;"

---

这个写法我还用你讲吗 ？

---

引用

这个写法我还用你讲吗 ？

这么牛X，那你还是自己慢慢搞吧！

---

VBScript code:

Access 97/2000/XP/2003 Database Connection String using Microsoft Access Driver (DSN less)

<%@LANGUAGE=VBSCRIPT%>
<%
Option Explicit
Dim strConnection, conn, rs, strSQL

strConnection = "Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq=" & Server.MapPath(".\db\db.mdb") & ";Uid=admin;Pwd=password;"

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open strConnection

Set