dw CS6连接数据库(SQL)并测试成功,可以查看到表中信息,一绑定记录集就报下面的错误,新手请高手指点
错误类型:MicrosoftOLEDBProviderforODBCDrivers(0x80004005)[Microsoft][ODBC驱动程序管理器]未发现数据源名称...
错误类型:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默认驱动程序
/test/zuoye.asp, 第 8行 展开
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默认驱动程序
/test/zuoye.asp, 第 8行 展开
1个回答
展开全部
你可以查看一下绑定记录集的源码会不会因为多加了引号之类的。……
个人还是不太建议用这种方式建站,不可控的因素太多。并且,脱离DW独立运行就有可能出错。
送你一段代码(我以前用的,现在转行不写代码了)
Dim MM_Conn_STRING,DatabasePath
DatabasePath="database/database.mdb" '数据库路径
MM_Conn_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("" & DatabasePath &"")
'上面的代码是数据库驱动字符串,是必不可少的。如果网站有两个以上的数据库,那么每一个都要写一次。
------------------------------------------------------------------------------
'函数名称:GetRecordset
'功能说明:打开指定的SQL查询[返回记录集,视SQL查询语句而定]
'变量说明:SQLString:SQL查询语句
[code]
Function GetRecordset(SQLString)
Dim MM_Recordset_cmd
Set MM_Recordset_cmd = Server.CreateObject ("ADODB.Command")
MM_Recordset_cmd.ActiveConnection = MM_Conn_STRING
MM_Recordset_cmd.CommandText = SQLString
MM_Recordset_cmd.Prepared = true
Set GetRecordset = MM_Recordset_cmd.Execute
End Function
[/code]
'用法:
Set MM_Recordset = GetRecordset(SQLString)
'执行SQL查询并返回记录集,将返回的记录集命名为:MM_Recordset
GetRecordset(SQLString)
'执行SQL查询,但不必返回记录集(比如Insert、Update类查询)
个人还是不太建议用这种方式建站,不可控的因素太多。并且,脱离DW独立运行就有可能出错。
送你一段代码(我以前用的,现在转行不写代码了)
Dim MM_Conn_STRING,DatabasePath
DatabasePath="database/database.mdb" '数据库路径
MM_Conn_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("" & DatabasePath &"")
'上面的代码是数据库驱动字符串,是必不可少的。如果网站有两个以上的数据库,那么每一个都要写一次。
------------------------------------------------------------------------------
'函数名称:GetRecordset
'功能说明:打开指定的SQL查询[返回记录集,视SQL查询语句而定]
'变量说明:SQLString:SQL查询语句
[code]
Function GetRecordset(SQLString)
Dim MM_Recordset_cmd
Set MM_Recordset_cmd = Server.CreateObject ("ADODB.Command")
MM_Recordset_cmd.ActiveConnection = MM_Conn_STRING
MM_Recordset_cmd.CommandText = SQLString
MM_Recordset_cmd.Prepared = true
Set GetRecordset = MM_Recordset_cmd.Execute
End Function
[/code]
'用法:
Set MM_Recordset = GetRecordset(SQLString)
'执行SQL查询并返回记录集,将返回的记录集命名为:MM_Recordset
GetRecordset(SQLString)
'执行SQL查询,但不必返回记录集(比如Insert、Update类查询)
来自:求助得到的回答
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询