高考问答上海学生英文报少儿版:请问一个公告程序
来源：百度文库 编辑：高考问答 时间：2024/04/30 11:27:51
我是一个初学者，下面是一个公告ASP，请问公告的题目和内容来源于哪里？
<%
if rsAnnounce.bof and rsAnnounce.eof then
response.write "<p> 没有通告或找不到指定的通告</p>"
else
AnnounceNum=rsAnnounce.recordcount
dim i
do while not rsAnnounce.eof
response.Write "<p align='center'>" & rsAnnounce("title") & "</p><p align='left'>" & ubbcode(dvHTMLEncode(rsAnnounce("Content"))) & "</p><p align='right'>" & rsAnnounce("Author") & " <br>" & FormatDateTime(rsAnnounce("DateAndTime"),1) & "</p>"
rsAnnounce.movenext
i=i+1
if i<AnnounceNum then response.write "<hr>"
loop
end if
%>
<%
if rsAnnounce.bof and rsAnnounce.eof then
response.write "<p> 没有通告或找不到指定的通告</p>"
else
AnnounceNum=rsAnnounce.recordcount
dim i
do while not rsAnnounce.eof
response.Write "<p align='center'>" & rsAnnounce("title") & "</p><p align='left'>" & ubbcode(dvHTMLEncode(rsAnnounce("Content"))) & "</p><p align='right'>" & rsAnnounce("Author") & " <br>" & FormatDateTime(rsAnnounce("DateAndTime"),1) & "</p>"
rsAnnounce.movenext
i=i+1
if i<AnnounceNum then response.write "<hr>"
loop
end if
%>
response.Write "<p align='center'>" & rsAnnounce("title") & "</p><p align='left'>" & ubbcode(dvHTMLEncode(rsAnnounce("Content"))) & "</p><p align='right'>" & rsAnnounce("Author") & " <br>" & FormatDateTime(rsAnnounce("DateAndTime"),1) & "</p>"
在这段代码里其中& rsAnnounce("title") &这个是读出数据库里面的标题也就是公告的题目。& ubbcode(dvHTMLEncode(rsAnnounce("Content"))) & 这个是内容。& rsAnnounce("Author") & 这个是作者。&FormatDateTime(rsAnnounce("DateAndTime"),1) &这个是日期。
这些都是从数据库里面读出来的