
asp数据库可不可以嵌套
<%Setrs=Server.CreateObject("ADODB.Recordset")sql="select*from[luntan]"rs.Opensql,con...
<%
Set rs = Server.CreateObject ("ADODB.Recordset")
sql="select * from [luntan]"
rs.Open sql,conn,1,1
%>
<%
if rs.EOF and rs.BOF then
response.write ("<br>"&"暂时还没有交流!")
else
end if
Do Until rs.EOF
response.Write("<br>")%><font face="wingdings">v</font> <%
response.write("<strong>"&rs("l_title")&"</strong>"&"<br></br>"&" ")%><pre><%response.Write(" "&rs("l_neirong"))%></pre>
<%response.Write("<br>"&"发表人:"&rs("l_username")&" 时间:"&rs("l_time")&" ")
response.write"<a href=hufu.asp?id="&rs("l_id")&">"&"[回复]"&"</a>"
response.Write("<br>")
lid=rs("l_id")
%>
<%
Set rst = Server.CreateObject ("ADODB.Recordset")
sqlt="select * from [hf]"
rst.Open sqlt,conn,1,1
%>
<%if rst.EOF and rst.BOF then
response.Write("<br>")
else
end if
Do Until rst.EOF
response.Write("<br>")
response.write("<br>"&"<font color=red>"&rst("h_title")&"</font>"&"</br>"&" ")%> <pre><%response.Write(rst("h_neirong"))%></pre><br><%response.Write("发表人:"&rst("h_username")&" 时间:"&rst("h_time")&" ")
response.Write("<br>")
rst.MoveNext
Loop%>
<%
rs.MoveNext
Loop
rs.close
Set rs = Nothing
set rst= nothing
conn.close
set conn=Nothing
%>
我想在luntan这个表中提取出别人发表的内容,输出完之后我还要利用这个人的ID去hf这个表去查它想关的回复,这样用 do until把它们输出出来,但数据库能不能这样子实现呢…………急呀……希望各位大哥给帮帮忙…… 展开
Set rs = Server.CreateObject ("ADODB.Recordset")
sql="select * from [luntan]"
rs.Open sql,conn,1,1
%>
<%
if rs.EOF and rs.BOF then
response.write ("<br>"&"暂时还没有交流!")
else
end if
Do Until rs.EOF
response.Write("<br>")%><font face="wingdings">v</font> <%
response.write("<strong>"&rs("l_title")&"</strong>"&"<br></br>"&" ")%><pre><%response.Write(" "&rs("l_neirong"))%></pre>
<%response.Write("<br>"&"发表人:"&rs("l_username")&" 时间:"&rs("l_time")&" ")
response.write"<a href=hufu.asp?id="&rs("l_id")&">"&"[回复]"&"</a>"
response.Write("<br>")
lid=rs("l_id")
%>
<%
Set rst = Server.CreateObject ("ADODB.Recordset")
sqlt="select * from [hf]"
rst.Open sqlt,conn,1,1
%>
<%if rst.EOF and rst.BOF then
response.Write("<br>")
else
end if
Do Until rst.EOF
response.Write("<br>")
response.write("<br>"&"<font color=red>"&rst("h_title")&"</font>"&"</br>"&" ")%> <pre><%response.Write(rst("h_neirong"))%></pre><br><%response.Write("发表人:"&rst("h_username")&" 时间:"&rst("h_time")&" ")
response.Write("<br>")
rst.MoveNext
Loop%>
<%
rs.MoveNext
Loop
rs.close
Set rs = Nothing
set rst= nothing
conn.close
set conn=Nothing
%>
我想在luntan这个表中提取出别人发表的内容,输出完之后我还要利用这个人的ID去hf这个表去查它想关的回复,这样用 do until把它们输出出来,但数据库能不能这样子实现呢…………急呀……希望各位大哥给帮帮忙…… 展开
展开全部
可以嵌套的,但打开数据库的对象必须分开,比如下面这样是可以的
rs.open str,conn,1
if not rs.eof then
rs2.open str2,conn2,1
if not rs2.eof then
......
end if
rs2.close
end if
rs.close
也就是rs和rs2要分别定义
rs.open str,conn,1
if not rs.eof then
rs2.open str2,conn2,1
if not rs2.eof then
......
end if
rs2.close
end if
rs.close
也就是rs和rs2要分别定义
参考资料: www.zz-sky.com.cn
展开全部
看看sql的教程吧
用join连接多个表,只要一条sql语句就可以实现你想要的了
select * from luntan a left join hf b on 连接条件
用join连接多个表,只要一条sql语句就可以实现你想要的了
select * from luntan a left join hf b on 连接条件
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
为什么要把原文和回复内容分开啊?觉得没有必要呢
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询