是啊，怎么办？我对do while 语句不是很了解，是刚接触ASP不久的那种
2007-06-06 17:50
2007-06-06 17:52
2007-06-06 17:53
2007-06-06 18:35
[QUOTE]<!--#include file="oConn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>永州职业技术学院成教部欢迎您！</title>
<link href="cjb.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="990" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td>
<!--#include file="top.asp"--></td></tr>
<tr>
<td><table width="990" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="1" valign="top" bgcolor="#004292"></td>
<td rowspan="4" width="15"> </td>
<td><table width="990" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table width="318" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="182" height="4"> </td>
</tr>
<tr>
<td width="182" height="28"><img src="images/gbl2.gif" width="318" height="42" /></td>
</tr>
<tr>
<td><table width="318" border="0" cellspacing="0" cellpadding="0" bgcolor="#F2F2F2">
<%
set oRs=server.createobject("adodb.recordset")
sSql="select top 8 * from news where cataid='公布栏' order by id desc "
oRs.open sSql,oConn,1,1
if oRs.eof then
response.Write "数据库中无此记录！"
else
do while not oRs.eof
%>
<tr>
<td width="25" height="21" align="center" valign="middle"><img src="images/wjj.gif" width="14" height="9" /></td>
<td height="21"><a href="xyxw_view.asp?id=<%=oRs("id")%>" class="ttblue" title=<%=oRs("title")%>>
<%if len(oRs("title"))>18 then%>
<%=left(oRs("title"),18)%>…
<%else%>
<%=oRs("title")%>
<%end if%>
</a>
<%if len(title)<15 then%>
<%=oRs("addtime")%>
<%end if%>
</td>
</tr>
<%
oRs.movenext
loop
oRs.close
end if
%>
</table></td>
</tr>
</table></td>
<td><table width="297" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="4"> </td>
</tr>
<tr>
<td width="297"><img src="images/zsxx2.gif" width="297" height="42" /></td>
</tr>
<tr>
<td><table width="" border="0" cellspacing="0" cellpadding="0" bgcolor="#F2F2F2">
<tr>
<td><table width="297" border="0" cellspacing="0" cellpadding="0">
<%
set oRs=server.createobject("adodb.recordset")
sSql="select top 8 * from news where cataid='招生信息' order by id desc "
oRs.open sSql,oConn,1,1
if oRs.eof then
response.Write "数据库中无此记录！"
else
do while not oRs.eof
%>
<tr>
<td width="25" height="21" align="center" valign="middle"><img src="images/wjj.gif" width="14" height="9" /></td>
<td height="21"><a href="xyxw_view.asp?id=<%=oRs("id")%>"class="ttblue" title=<%=oRs("title")%>>
<%if len(oRs("title"))>18 then%>
<%=left(oRs("title"),18)%>…
<%else%>
<%=oRs("title")%>
<%end if%>
</a>
<%if len(title)<15 then%>
<%=oRs("addtime")%>
<%end if%>
</td>
</tr>
<%
oRs.movenext
loop
oRs.close
end if
%>
</table></td>
</tr>
</table></td>
<td><table width="198" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="4"> </td>
</tr>
<tr>
<td><img src="images/cjcx1.gif" width="198" height="63" /></td>
</tr>
<tr>
<td><table width="198" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="4"> </td>
</tr>
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="42" height="20"><img src="images/xh.gif" width="35" height="15"></td>
<td width="156"><INPUT name=xsxh class="tt" id=xsxh
size=16 maxLength=16></td>
</tr>
</table></td>
</tr>
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="42" height="20"><img src="images/xm.gif" width="35" height="15"></td>
<td width="156"><INPUT name=xsxm class="tt" id=xsxm4 size=16></td>
</tr>
</table></td>
</tr>
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/tj.gif" width="26" height="12" align="right"></td>
<td width="4"> </td>
<td><img src="images/cz.gif" width="26" height="12"></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td><table width="990" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="387"><table width="318" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="4"> </td>
</tr>
<tr>
<td><img src="images/zkkx2.gif" width="318" height="47" /></td>
</tr>
<tr>
<td><table width="" border="0" cellspacing="0" cellpadding="0" bgcolor="#F2F2F2">
<tr>
<td><table width="318" border="0" cellspacing="0" cellpadding="0">
<%
set oRs=server.createobject("adodb.recordset")
sSql="select top 8 * from news where cataid='自考快讯' order by id desc "
oRs.open sSql,oConn,1,1
if oRs.eof then
response.Write "数据库中无此记录！"
else
do while not oRs.eof
%>
<tr>
<td width="25" height="21" align="center" valign="middle"><img src="images/wjj.gif" width="14" height="9" /></td>
<td height="21"><a href="xyxw_view.asp?id=<%=oRs("id")%>"class="ttblue" title=<%=oRs("title")%>>
<%if len(oRs("title"))>18 then%>
<%=left(oRs("title"),18)%>…
<%else%>
<%=oRs("title")%>
<%end if%>
</a>
<%if len(title)<15 then%>
<%=oRs("addtime")%>
<%end if%>
</td>
</tr>
<%
oRs.movenext
loop
oRs.close
end if
%>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
<td width="361"><table width="297" border="0" cellpadding="0" cellspacing="0">
<tr>
<td> </td>
</tr>
<tr>
<td><img src="images/cjkx2.gif" width="297" height="47" /></td>
</tr>
<tr>
<td><table width="182" border="0" cellspacing="0" cellpadding="0" bgcolor="#F2F2F2">
<tr>
<td><table width="297" border="0" cellspacing="0" cellpadding="0">
<%
set oRs=server.createobject("adodb.recordset")
sSql="select top 8 * from news where cataid='成教快讯' order by id desc "
oRs.open sSql,oConn,1,1
if oRs.eof then
response.Write "数据库中无此记录！"
else
do while not oRs.eof
%>
<tr>
<td width="25" height="21" align="center" valign="middle"><img src="images/wjj.gif" width="14" height="9" align="center"/></td>
<td height="21"><a href="xyxw_view.asp?id=<%=oRs("id")%>"class="ttblue" title=<%=oRs("title")%>>
<%if len(oRs("title"))>18 then%>
<%=left(oRs("title"),18)%>…
<%else%>
<%=oRs("title")%>
<%end if%>
</a>
<%if len(title)<15 then%>
<%=oRs("addtime")%>
<%end if%>
</td>
</tr>
<%
oRs.movenext
loop
oRs.close
end if
%>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
<td width="242"><table width="198" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/lqcx1.gif" width="197" height="69"></td>
</tr>
<tr>
<td><a href="#"><img src="images/11.gif" width="198" height="98" border="0"></a></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
</table>
</td>
<td width="1" valign="top" bgcolor="#004292"></td>
</tr>
</tr>
</table>
</table>
<!--#include file="bottom.asp"-->
</body>
</html>[/QUOTE]
这样试一下.
2007-06-07 09:50
2007-06-07 11:44