asp怎么循环读取两个数据库的记录
来源:百度知道 编辑:UC知道 时间:2024/09/23 15:42:46
<!--#include file="conn.asp"-->
<%
if session("name")="" then
response.Redirect"index.asp"
response.End
end if
%>
<%
id=request("id")
set rs=server.CreateObject("adodb.recordset")
sql="select * from tiezi where id="&id
rs.open sql,conn,1,3
set hfrs=server.CreateObject("adodb.recordset")
hfsql="select * from huifu where title='"&rs("title")&"'"
hfrs.open hfsql,conn,1,3
set hfcsrs=server.CreateObject("adodb.recordset")
hfcssql="select * from hfcs where title='"&rs("title")&"'"
hfcsrs.open hfcssql,conn,1,3
hfrs.pagesize=5
if request("page")<>"" then
ipage=cint(request("page"))
if ipage<1 then ipage=1
if ipage>hfrs.pagecount then ipage=hfrs.pagecount
else
<%
if session("name")="" then
response.Redirect"index.asp"
response.End
end if
%>
<%
id=request("id")
set rs=server.CreateObject("adodb.recordset")
sql="select * from tiezi where id="&id
rs.open sql,conn,1,3
set hfrs=server.CreateObject("adodb.recordset")
hfsql="select * from huifu where title='"&rs("title")&"'"
hfrs.open hfsql,conn,1,3
set hfcsrs=server.CreateObject("adodb.recordset")
hfcssql="select * from hfcs where title='"&rs("title")&"'"
hfcsrs.open hfcssql,conn,1,3
hfrs.pagesize=5
if request("page")<>"" then
ipage=cint(request("page"))
if ipage<1 then ipage=1
if ipage>hfrs.pagecount then ipage=hfrs.pagecount
else
看看我的这段代码,在每次循环的时候根据回复作者查询USER表然后直接输出就OK了.仔细看我的输出图片效果:
<%
set user=server.CreateObject ("adodb.recordset")
sql="select * from zf_user where usernemu='"&rs("zz")&"'"
user.open sql,conn,1,1
%>
<table width="156" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="21" colspan="2" ><div align="