<!--#include file="top.asp"-->
<!--#include file="conn.asp"-->
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="225" height="700" valign="top"><table width="225" border="1" cellpadding="0" cellspacing="0" bordercolor="#0099FF">
<tr bordercolor="#FFFFFF">
<td height="697" valign="top"><table width="220" height="22" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="20" background="images/lm2.gif"><table width="220" height="22" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="48" height="18"> </td>
<td width="172" background="images/lm3.gif"><span class="STYLE4">文章列表</span></td>
</tr>
</table></td>
</tr>
</table>
<table width="216" height="266" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#CCCCFF">
<tr bordercolor="#CCCCCC">
<td width="210" height="260" valign="top">
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from teach",bb,1,1
%>
<table width="194" border="0" cellspacing="0" cellpadding="0">
<%if rs.eof and rs.bof then
response.write("暂无信息")
else
do until rs.eof
%>
<tr>
<td width="18"><div align="center"><img src="images/dot1.gif" width="9" height="15" /></div></td>
<td width="176">
<a href="list.asp?id<%=rs("id")%>"><%=rs("title")%></a></td>
</tr>
<%
rs.movenext
loop
end if
rs.close
%>
</table>
</td>
</tr>
</table></td>
</tr>
</table></td>
<td width="555" valign="top"><table width="555" border="1" cellpadding="0" cellspacing="0" bordercolor="#00CC99">
<tr bordercolor="#FFFFFF">
<td height="697" valign="top
"><!--#include file="list.asp"--></td>
蓝色代码是调用list.asp </tr>
</table></td>
</tr>
</table>
[此贴子已经被作者于2007-7-24 22:04:56编辑过]