notice.asp

来自「数值计算方法网络课件系统是浙江大学过程装备与控制工程专业2001级本科生毕业设计」· ASP 代码 · 共 24 行

<!--#include file="inc/conn.asp"-->
<!--#include file="inc/func.asp"-->
<!--#include file="inc/md5.asp"-->
<!--#include file="inc/sqlin.asp"-->

<%
dim txtR

txtR = "<div id='content1'><h4>阅读</h4><p/><div class='doctitle'>{theTitle}</div><hr>作者：{theAuthor}&nbsp;发表时间：{theTime}&nbsp;点击次数：{theHits}<p/>{theContent}<p/></div>"
Call DBConnBegin()
Conn.Execute("update notice set hits=hits+1 where id=" & Request.QueryString("id"))
Sql="select * from notice where id=" & Request.QueryString("id")
rs.open sql,conn,1,1
txtR = Replace(txtR, "{theTitle}", rs("title"))
txtR = Replace(txtR, "{theTime}", rs("time"))
txtR = Replace(txtR, "{theAuthor}", rs("name"))
txtR = Replace(txtR, "{theHits}", rs("hits"))
txtR = Replace(txtR, "{theContent}", rs("say"))

Response.write replace(FSOFileRead("html/exam_common.txt"), "{theRightFrmContent}", txtR)
%>