geng.asp

我们学校毕业设计的文件.我的题目是 ASP.net校友录系统 里面包括我的毕业论文1套和代码源程序

<%
user=request("user")
if user="" then user="admin"
%>
<!--#include file="conn.asp"-->
<%
sql="select top 8 * from txt where 用户='"&user&"' order by addtime desc"
 set rs=conn.execute(sql)
 do while not rs.EOF 
 id=rs("id")
 nr=rs("日记内容")
 if rs("保密")="y" then nr="<font color=red>保密</font>"
 newarticle= newarticle & "◇ <font color='#999A67'>("&formatdatetime(rs("addtime"),vbshortdate)&")</font><a target=_blank href='http://www.city9990.com/ahui/ciduriji/riji.asp?id="&id&"&user="&user&"'>"&left(nr,28)&"</a><br>"
 rs.MoveNext 
 loop
 rs.Close
 set conn = nothing 
 newarticle=newarticle & "◇ <a href=index.asp?user="&user&">显示全部</a>"
 newarticle="document.write(""" & newarticle & """);"
 response.write newarticle 
%>