数据库连接和读取

来源:百度知道 编辑:UC知道 时间:2024/06/23 08:07:58
大家帮忙看下
<%
Dim connstr
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &

Server.MapPath("db1.mdb")
set bb =server.CreateObject("ADODB.Connection")
bb.open connstr
%>这个是打开连接数据库
<%
set rs = server.CreateObject ("adodb.recordset")
rs.open "select * from user ",bb
%>
<%=rs("user")%>
<%=rs("pw")%>
<%=rs("name")%>
<%=rs("zj")%>
<%=rs("QQ")%>
<%=rs("DH")%>
<%=rs("XL")%>
这个是读取怎么不行啊那点有错吗?
来人啊 快救命啊
rs.open "select * from user ",bb,1,1
这点有问题

...
这个。。。有点难。

-----------------------------------
注意user要加中括号 [user]
可能是关键字
------------------------------------

这样写

rs.open "select * from [user] ",bb,1,1

后面还有两个参数啊。
另外如果数据库中没有数据会报错的。
这样写简洁:

<%
set rs = bb.execute("select * from [user]")
if not rs.eof then
%>
<%=rs("user")%>
<%=rs("pw")%>
<%=rs("name")%>
<%=rs("zj")%>
<%=rs("QQ")%>
<%=rs("DH")%>
<%=rs("XL")%>
<%else
response.write"没有数据"
end if
rs.close
%>