新手入门，请高手指点下，越简单越好，在线急等！（结贴） - ASP技术论坛

楼主

已结贴√ 问题点数：20 回复次数：8

新手入门，请高手指点下，越简单越好，在线急等！（结贴）

http://jinyou8899.free.

就是一个简单的列表，然后点击显示公司具体内容，但是老是进入时报错。是不是SQL写得不对？

细节页面的代码：

<% @language="vbscript" %>

<%
id=request.querystring("id")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("data/zz6500.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")

sql= "select * from shouji1 where id='"&request("id")&"' "
RS.open sql,Conn,1,1
%>
<html>
<head>
<title><%=rs("JGMC")%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>

<body>

 <tr>
 <td align="center"> <%=rs("JGMC")%></td> 
 </tr>
 <tr>
 <td>
 企业负责人：<%=rs("FDDBR")%> 
 联系电话：<%=rs("DHHM")%> 
 企业类型：<%=rs("JJHY")%>[<%=rs("JJLX")%>] 
 企业经营范围：[<%=rs("JYFW")%>] 
 企业地址：<%=rs("JGDZ")%> 
 邮编：<%=rs("YZBM")%> 
 </td>
 </tr>
</body>
</html>
<%
 rs.movenext
 loop
 rs.close
 set rs=nothing
 conn.close
 set rs=nothing
%>

[ 本帖最后由 jinyou8899 于 2010-4-19 12:18 编辑 ]

搜索更多相关主题的帖子: 新手入门　在线　

第 2 楼

得分:0

错误类型：500。您指定的网页无法访问。

第 3 楼

得分:0

帮我写个这个也行：有个数据库AA（mdb），里面有1个表tel，该表有3个字段：id,name,tel。asp第一页显示这个表的所有记录，然后点击每个记录，显示name和tel。多谢高手了！！

第 4 楼

得分:10

<% @language="vbscript" %>

<%
id=request.querystring("id")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("data/zz6500.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")

sql= "select * from shouji1 where id='"&request("id")&"' "
RS.open sql,Conn,1,1
%>
<html>
<head>
<title><%=rs("JGMC")%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>

<body>
 <% do while not rs.eof %>
 <tr>
 <td align="center"> <%=rs("JGMC")%></td> 
 </tr>

 <tr>
 <td>
 企业负责人：<%=rs("FDDBR")%> 
 联系电话：<%=rs("DHHM")%> 
 企业类型：<%=rs("JJHY")%>[<%=rs("JJLX")%>] 
 企业经营范围：[<%=rs("JYFW")%>] 
 企业地址：<%=rs("JGDZ")%> 
 邮编：<%=rs("YZBM")%> 
 </td>
 </tr>
<%
 rs.movenext
 loop
%>
</body>
</html>

<%
 rs.close
 set rs=nothing
 conn.close
 set conn=nothing
%>

[ 本帖最后由 zzy_420 于 2010-4-18 22:12 编辑 ]

第 5 楼

得分:0

.
<%
.
.数据库连接
.
sql="select * from tel"
rs.open sql ,conn,1,1
%>

<% myid=request.querystring("id")%>
<body>
<% if myid="" then%>
<table>
<% for i=0 to rs.recordcount-1 step 1 %>
<tr>
<td><a href="本页.asp?id=<%=rs("id")%>"><%=rs("id")%><%=rs("name")%><%=rs("tel")%></a></td>
</tr>
<%rs.movenext%>
<%next%>
'关闭对象
</table>

<%
else
sql="select * from tel where id='"&myid&"'"
rs.open sql ,conn,1,1
%>
<table>
<tr>
<td>><%=rs("name")%><%=rs("tel")%></td>
</tr>
</table>
关闭对象
<%end if%>

请楼主自己完善不全的部分，这里给出了主体部分。希望能帮到你。