源代码如下..帮忙看看..谢谢.

SEASKYLONG 2004-02-17 05:24:28
目的就能句RS2那句打开没有错..



<table width="747" border="0" cellspacing="0" cellpadding="0">
<tr>
<td colspan="3" height="15">
<!--#include file="top.htm"-->
</td>
</tr>
<tr valign="top">
<td colspan="3"><a name="top"></a><img src="images/jj1.jpg" width="747" height="9"></td>
</tr>
<tr>
<td width="155" background="images/jjbg.jpg" valign="top"><img src="images/cp1.jpg" width="155" height="60">
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from cbnb_en order by id asc"
rs.open sql,conn,3
%>
<table width="120" border="0" cellspacing="0" cellpadding="0" align="center" background="images/bg1.jpg">
<%if rs.bof and rs.eof then%>
<tr>
<td height="28" align="center">Not Fonut!</td>
</tr>
<%else
for i=0 to rs.recordcount-1
if rs.eof then
exit for
end if
%>
<tr>
<td height="28" align="center"><a href="cpcx1.asp?cbnb=<%=rs("id")%>&nbmc=<%=rs("nbmc")%>&list=aa"><%=rs("nbmc")%></a></td>
</tr>
<%
rs.movenext
next
end if
%>
</table>
<img src="images/cp0.jpg" width="155" height="360"></td>
<td rowspan="2" width="20" valign="top"><img src="images/0.jpg" width="20" height="24">
</td>
<td width="572" valign="top" height="500">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/cp2.jpg" width="572" height="69"></td>
</tr>
<tr>
<td height="18"></td>
</tr>
<tr>
<td valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td valign="top" align="center">
<table width="500" border="0" cellspacing="0" cellpadding="0">
<tr>
<td background="images/cp001.jpg" valign="bottom"> <b><font color="#000000">
Search result </font></b></td>
</tr>
<tr>
<%
dim rs2
set rs2=server.CreateObject("adodb.recordset")
wesql="select * from cbxl_en where nbmc='"&request("cbnb")&"' order by id asc"
rs2.open wesql,conn,3
%>
<td valign="top" background="images/cp003.jpg"> <table width="96%" border="0" cellspacing="1" cellpadding="1" align="center">
<%if rs2.bof and rs2.eof then%>
<tr>
<td colspan="2">Have not found!</td>
</tr>
<%
else
for i=0 to rs2.recordcount-1
%>
<tr>
<td width="6%"><img src="images/dot4.jpg" width="14" height="12"></td>
<td width="94%"><a href="cpcx1.asp?cbnb=<%=rs("id")%>&nbmc=<%=rs("nbmc")%>%cbnb=<%=rs2("id")%>"><%=rs2("xlmc")%></a>

</tr>
<%
rs2.movenext
next
end if
%>
</table></td>
</tr>
<tr>
<td><img src="images/cp002.jpg" width="500" height="10"></td>
</tr>
</table>
<br> <br> </td>
</tr>
</table></td>
</tr>
</table>
...全文
34 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧