asp代码哪里出错拉
- 提问者网友:戎马万世
- 2021-04-20 17:15
<body>
<h2 align="center">通讯录</h2>
<%
'以下连接数据库,建立一个Connection对象实例conn
Dim conn,strConn
Set conn=Server.CreateObject("ADODB.Connection")
strConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("address.mdb")
conn.Open strConn
'以下建立记录集,建立一个RecordSet对象实例rs
Dim rs,strConn
strSql="Select*From tbAddress Order By ID DESC"
Set rs=conn.Execute(strSql)
'以下利用表格显示记录集中的记录
%>
<a href="insert.asp">添加记录</a>
<table border="1"width="100%">
<tr bgcolor="#E0E0E0">
<th>姓名</th><th>性别</th><th>年龄</th><th>电话</th><th>E-mail</th>
<th>简介</th><th>添加日期</th><th>删除</th><th>更新</th>
</tr>
<%
Do While Not rs.Eof
%>
<tr>
<td><%=rs("strName")%></td>
<td><%=rs("strSex")%></td>
<td><%=rs("intAge")%></td>
<td><%=rs("strTel")%></td>
<td><a href="mailto:<%=rs("strEmail")%>"><%=rs("strEmail")%></a></td>
<td><%=rs("strIntro")%></td>
<td><%=rs("dtmSubmit")%></td>
<td><a href="delete.asp?ID=<%=rs("ID")%>">删除</a></td>
<td><a href="updata_form.asp?ID=<%=rs("ID")%>">更新</a></td>
</tr>
<%
rs.MoveNext '将记录指针移动到下一条记录
Loop
%>
</table>
</body>
</html>
- 五星知识达人网友:不甚了了
- 2021-04-20 18:25
一针见血指出给分 呵呵
看下你这里是不是连在一起啦?
改一下:
strSql="Select * From tbAddress Order By ID DESC"
连在一起当然出错啦
- 1楼网友:撞了怀
- 2021-04-20 19:27
我以前弄的 看了下 应该是你定义sql并且要返回记录集那里的错误
<div id="Layer1"> <table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr> <td height="26"> <% set rs=server.createobject("adodb.recordset") sql="select* from cate where cateid=3" rs.open sql,conn,1,1
do while not rs.eof response.write(" <font color='#0022FF'>"&rs("catename")&"</font> ") rs.movenext loop %></td> <td align="right" valign="middle"><a href="main.asp?cateid=1"><font color="#6600CC">·MORE·</font></a></td> </tr> <% set rs=server.createobject("adodb.recordset") sql="select * from news where cateid=3" rs.open sql,conn,1,1 if rs.eof then response.write("<tr><td > 此类记录不存在!</td><td> </td></tr>") end if i=0 do while not rs.eof and i<8 i=i+1 %> <tr> <td height="15"><a href="admin/news.asp?id=<%=rs("id")%>"><%=rs("title")%></a></td> <td height="15" align="right" valign="middle"><%=rs("data")%></td> </tr> <% rs.movenext loop %> </table> </div>