主题:  急,数据库连接的问题

lixiangwei

职务:普通成员
等级:1
金币:0.0
发贴:57
#12003/7/7 19:13:39
用Macromedia Dreamweaver MX作的与SQlserver连接,出现如下错误:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E4D)
/dyry-db/ceshi/22.asp, 第 8 行
请大虾帮忙!
原程序如下:
<%
Dim Recordset1
Dim Recordset1_numRows

Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_web_STRING
Recordset1.Source = "SELECT * FROM dbo.dyrs2"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()

Recordset1_numRows = 0
%>



绿茶

职务:普通成员
等级:8
金币:10.0
发贴:19267
#22003/7/8 8:53:52
先连接数据库
<%
Set conn = Server.CreateObject("ADODB.connection")
set cmd=server.createobject("adodb.command")
connstr= "Provider=Sqloledb ;Server=数据库服务器的IP;Database=数据库名;UID=用户名;PWD=密码"
conn.Open connstr
%>
然后再作查询
<%
set rs=Server.CreateObject("ADODB.Recordset")
sql=""SELECT * FROM dbo.dyrs2"
rs.open sql,conn,1,2
%>
这样就OK了



pigeon

职务:普通成员
等级:1
金币:0.0
发贴:46
#32003/7/8 11:39:08
lixiangwei在上个帖子中说
引用:
用Macromedia Dreamweaver MX作的与SQlserver连接,出现如下错误:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E4D)
/dyry-db/ceshi/22.asp, 第 8 行
请大虾帮忙!
原程序如下:
<%
'你应该有web.asp这个文件才行color[/]
Dim Recordset1
Dim Recordset1_numRows

Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = [color=Red] MM_web_STRING
'这个在哪里?要加上连接数据库的文件
Recordset1.Source = "SELECT * FROM dbo.dyrs2"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()

Recordset1_numRows = 0
%>



lixiangwei

职务:普通成员
等级:1
金币:0.0
发贴:57
#42003/7/9 17:39:11
感谢两位大侠,现在问题已经解决了。