關於ASP編程問題

<!--#include file="conn.asp"-->

<b><a href="say.asp">發表帖子</a></b><br><br>

<div align="center">

<center>

<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse; " bordercolor="#000000" width="100%" height="26">

<tr>

<td width="17%"><b>作者</b></td>

<td width="83%"><b>主題</b></td>

</tr>

</table>

</center>

</div><hr size="1">

<%

set rs=server.createobject("Adodb.recordset")

sql="select * from bbs order by id desc"

rs.open sql,conn,1,1

'set showbbs=conn.execute("select*from bbs order by id desc")

if rs.eof and rs.bof then

response.write"暫無"

else

i=1

do while not rs.eof

%>

<div align="center">

<center>

<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse; " bordercolor="#000000" width="100%" height="20">

<tr>

<td width="17%"><%=rs("name")%> </td>

<td width="83%">

<a href="show.asp?id=<%=rs("id")%>"><%=rs("title")%></a></td>

</tr>

</table>

</center>

</div><hr size="1">

<%i=i+1

if i>50 then

exit do

end if

rs.movenext

Loop

rs.Close

set rs=nothing

end if

%>

上一篇:excel編程

下一篇:Bo hmi如何實現圓周運動