前面把后台所需要的文件都做完了~
现在来做前台的 需要三个文件 index.asp list.asp newshow.asp
首先先做list.asp
代码如下:
CODE:
<!--#include file="conn.asp"-->
<%
exec="Select top 5 * From aa Order By id DESC"
set rs=conn.execute(exec)
if not rs.eof then
rs.movefirst
dis_mes=dis_mes & "最新更新<br>"
do while not rs.eof
dis_mes=dis_mes &"<img src=dot1.gif> <a href=newshow.asp?id=" & rs("id") & " target=_blank>" & rs("title") & "</a> " & rs("time") & "<br>"
rs.movenext
loop
end if
rs.close
dis_mes="document.write(""" & dis_mes & """);"
response.write dis_mes
%>
代码解释:
(1)
exec="Select top 5 * From aa Order By id DESC"
set rs=conn.execute(exec)
选择数据库里的表aa的前5条信息
(2)
if not rs.eof then
rs.movefirst
dis_mes=dis_mes & "最新更新<br>"
do while not rs.eof
直到扫描到最后一条信息 游标就跳到第一条信息
dis_mes=dis_mes & "最新更新<br>"定义一个变量 变量后面是显示最新更新
(3)
dis_mes=dis_mes &"<img src=dot1.gif> <a href=newshow.asp?id=" & rs("id") & " target=_blank>" & rs("title") & "</a> " & rs("time") & "<br>"
&"<img src=dot1.gif>&这里是显示图片dot1.gif
<a href=newshow.asp?id=" & rs("id") & " target=_blank>"这里是连接到newshow.asp文件做处理 为每一条最新信息添加连接 当点激显示的信息时 就跳到newshow.asp
rs("title") & "</a> " & rs("time") 这里是显示数据库的title和time
(4)
dis_mes="document.write(""" & dis_mes & """);"
这段代码是输出dis_mes 的值
整个list.asp 文件的意思是输出数据库最新的前5条信息 并为每条信息添加连接 点激进入详细信息