永发信息网

asp代码哪里出错拉

答案:2  悬赏:10  手机版
解决时间 2021-04-20 22:52
<html>
<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>
最佳答案

一针见血指出给分 呵呵



看下你这里是不是连在一起啦?





改一下:



strSql="Select * From tbAddress Order By ID DESC"



连在一起当然出错啦


全部回答

我以前弄的 看了下 应该是你定义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("&nbsp;<font color='#0022FF'>"&rs("catename")&"</font>&nbsp;") 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 >&nbsp; 此类记录不存在!</td><td>&nbsp;</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>

我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
怎样能让学习成绩提高?
电影迷雾经典台词,迷雾森林代表的意思
下个月还有100包400小时吗
QQ堂 没开G 号给封了 怎么办?
网络掉线,双击宽带连接只闪一下就没了,系统变
诗歌鉴赏赏析字词,高一毕节市统考语文诗歌赏
诺基亚5800IXM手机上海那个商场有卖的,多少
新洲区劳模活动中心在什么地方啊,我要过去处
谁能要请我开通QQ牧场?现在就要开通的!xiex
我现在19岁,我现在想学修手机技术有前途吗?
我要怎样才能摆脱绝望?
有什么好看的恐怖小说?
晶花碘盐纸箱包装有限公司这个地址在什么地方
学美容美发到哪个学校好,学理发到学校好还是
怎么分别NBA队伍的主客场?
推荐资讯
吃什么水果能缓解胃疼
学会变通的名人名言,数学求助
这样的药品运费应该被医药营销代表负担吗?
哪些程序可以删除不要啊?
腾捷电脑科技怎么去啊,有知道地址的么
QQ牧场/农场外挂举报人
晨光小区我想知道这个在什么地方
DNF 这个装备几钱?17L的!!!
淘宝本科毕业论文修改大概要多少钱
谁能告诉下你的微笑的鼓谱
DNF 25狂站 拿什么巨剑好? 都叫什么名字 求
为什么电话可以打通,短信却收不到?
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?