UC知道关于asp连接access的问题 重金悬赏
来源：百度知道 编辑：UC知道 时间：2024/05/17 16:07:33
这是一个连接的ACCESS的数据库的函数，里边有链接SQL的数据的方法，我的链接SQL的时候是可是用的 但是连接ACCESS总是抱错！
<%
' 创建数据库连接
Function GetConn(connstr)
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open connstr
Set GetConn = conn
End Function
' 创建sqlserver数据库连接
'Function GetSQLServerConn( Server, UserID, Password, DataBase )
' Dim Params, conn
'Set GetSQLServerConn = Nothing
'Params = "Driver={SQL Server}"
'Params = Params & ";Database=" & DataBase
'Params = Params & ";Server=" & Server
'Params = Params & ";Uid=" & UserID
'Params = Params & ";Pwd=" & Password
'Set GetSQLServerConn = GetConn ( Params )
'End Function
' 创建access数据库连接
Function GetMDBConn( DataBaseUrl )
Provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
DBPath = "Data Source="
<%
' 创建数据库连接
Function GetConn(connstr)
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open connstr
Set GetConn = conn
End Function
' 创建sqlserver数据库连接
'Function GetSQLServerConn( Server, UserID, Password, DataBase )
' Dim Params, conn
'Set GetSQLServerConn = Nothing
'Params = "Driver={SQL Server}"
'Params = Params & ";Database=" & DataBase
'Params = Params & ";Server=" & Server
'Params = Params & ";Uid=" & UserID
'Params = Params & ";Pwd=" & Password
'Set GetSQLServerConn = GetConn ( Params )
'End Function
' 创建access数据库连接
Function GetMDBConn( DataBaseUrl )
Provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
DBPath = "Data Source="
你这些方法写的是挺好的..可以多次使用...但是
在每一次调用时都有可能因为参数不对而引起的ERROR...这时你就碰到了..那你应该在每个 方法里对之些ERROR进行排除...在你出问题的那个测试用例里对每个方法直接ERROR的DEBUG吧....这样会好一点...
你已经有测试通过的就说明没有问题...
而出问题的是在GET recordset上...那么在此之前应该要有CONN...你可以查询一下connection的连接状态...进一步了解是在get Connection上出问题还是在get recordset上...如果是在recordset上..就很有可能是sql出问题
如果是在connection上...就有data source地址问题...权限问题...
你连最基本的错误信息都不贴出来...只能教你这个排错的方法!
感觉，你这个问题是access权限不够造成的，你可以参考一下文章进行设置。
http://blog.zol.com.cn/146/article_145911.html