换一个连接方法就可以了<%
Dim oConn Dim dbFilePath,dbFileName dbFileName = "bbs.mdb" '换成你的数据库 dbFilePath = Server.MapPath(dbFileName) On Error Resume Next Set oConn = Server.CreateObject("ADODB.Connection") oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbFilePath If Err Then Err.Clear Set oConn = Noth