
dreamweaver8无法连接Access数据库,老是出现错误提示:未发现数据源名称并且未指定默认驱动程序,在线等
代码:<%dimObjRstdimdb1connSetObjRst=Server.createObject("ADODB.Recordset")db1conn="sele...
代码:<%
dim ObjRst
dim db1conn
Set ObjRst=Server.createObject("ADODB.Recordset")
db1conn="select * from 表1"
ObjRst.Open db1conn,"dsn=ConnectLook;"
Response.write("客户编号: "&ObjRst("C-ID")&"<br>")
Response.write("客户名称: "&ObjRst("C-name")&"<br>")
Response.write("客户地址: "&ObjRst("C-address")&"<br>")
Response.write("客户地址: "&ObjRst("C-mail")&"<br>")
ObjRst.Close
set ObjRst=Nothing
%>
错误提示:
未发现数据源名称并且未指定默认驱动程序
/moodflying/test06A.asp, 第 15 行
我是菜鸟,想学一下网页制作,希望高手能讲的详细一点!!!谢谢!!! 展开
dim ObjRst
dim db1conn
Set ObjRst=Server.createObject("ADODB.Recordset")
db1conn="select * from 表1"
ObjRst.Open db1conn,"dsn=ConnectLook;"
Response.write("客户编号: "&ObjRst("C-ID")&"<br>")
Response.write("客户名称: "&ObjRst("C-name")&"<br>")
Response.write("客户地址: "&ObjRst("C-address")&"<br>")
Response.write("客户地址: "&ObjRst("C-mail")&"<br>")
ObjRst.Close
set ObjRst=Nothing
%>
错误提示:
未发现数据源名称并且未指定默认驱动程序
/moodflying/test06A.asp, 第 15 行
我是菜鸟,想学一下网页制作,希望高手能讲的详细一点!!!谢谢!!! 展开
1个回答
展开全部
Connstr="DRIVER=Microsoft Access Driver (*.mdb);DBQ="&server.mappath("/database/data.mdb")
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open Connstr
sql = "select * from 表1"
Set ObjRst=Server.createObject("ADODB.Recordset")
ObjRst.Open sql,conn,1,1
while not rs.eof
Response.write("客户编号: "&ObjRst("C-ID")&"<br>")
Response.write("客户名称: "&ObjRst("C-name")&"<br>")
Response.write("客户地址: "&ObjRst("C-address")&"<br>")
Response.write("客户地址: "&ObjRst("C-mail")&"<br>")
rs.movenext
wend
ObjRst.Close
set ObjRst=Nothing
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open Connstr
sql = "select * from 表1"
Set ObjRst=Server.createObject("ADODB.Recordset")
ObjRst.Open sql,conn,1,1
while not rs.eof
Response.write("客户编号: "&ObjRst("C-ID")&"<br>")
Response.write("客户名称: "&ObjRst("C-name")&"<br>")
Response.write("客户地址: "&ObjRst("C-address")&"<br>")
Response.write("客户地址: "&ObjRst("C-mail")&"<br>")
rs.movenext
wend
ObjRst.Close
set ObjRst=Nothing
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |