发布网友 发布时间:2022-04-27 11:02
共1个回答
热心网友 时间:2023-09-14 09:47
这个还不容易啊. 你在数据库里面应该有信息的id 和 信息的 标题title吧. 首先调用数据库, 就是我们说的标题列表. 如果是用表格布局的话 列表的代码应该是这样写的 <% set rs = server.CreateObject("ADODB.Recordset") sql = "select * from 表名 where 条件" rs.open sql,conn,1,1 do while not rs.eof %> <tr> <td width="10"> </td> <td height="21">·<%=left(rs("title"),10)%> <td> <td width="10"> </td> </tr> <% rs.movenext loop rs.close set rs = nothing %> </table> 这样文章的标题列表就显示出来了 再加个连接到显示文章的内容页 就是在 <%=left(rs("title"),10)%>上加链接<a href = "内容页显示页面?id = <%=rs("id")%>"> <%=left(rs("title"),10)%></a> 最后就是内容显示页 要显示内容的话就是先读取传过来的id参数 <% set rs = server.CreateObject("ADODB.Recordset") sql = "select * from 表名 where id = '"&request("id")&"'" rs.open sql,conn,1,1 %> <tr> <td width="10"> </td> <td height="21"><%=rs("title")%> <td> <td width="10"><%=rs("content")%></td> </tr> <% rs.close set rs = nothing %> </table> 这样就显示出来了 追问: 列表页的代码:<!--#include file="conn.asp"--> <% exec="select * from PS" set rs=server.createobject("adodb.recordset") rs.open exec,conn,1,1 %> <div><%do while not rs.eof%> <a href = "show.asp?id = <%=rs("id")%>"><%=rs("psname")%></a> <% rs.movenext loop %> </div> 这是显示内容页的代码: <!--#include file = "conn.asp" --> <% set rs=server.createobject("adodb.recordset") exec="select * from ps where id = '"&request("id")&"'" rs.open exec,conn,1,1 %> <table><tr><td><%=rs("pstitle")%></td></tr></table> 总是提示: Microsoft OLE DB Provider for ODBC Drivers (0x80040E21) ODBC 驱动程序不支持所需的属性。 /myweb2/show.asp, 第 5 行 .... 麻烦你了. 回答: exec="select * from PS" set rs=server.createobject("adodb.recordset") 把两行位置换下看 追问: 已经换过了.是一样的.不知道是怎么回事 回答: exec="select * from ps where id = '"&request("id")&"'" 改成 exec="select * from ps where id = "&request("id")&"" 追问: 也不行.还是同样的错误.方便加QQ吗 我的278455170