gusucode.com > ASP+ACCESS在线教育系统设计(源代码+论文) > ASP+ACCESS在线教育系统设计(源代码+论文)\王智_在线教育系统\board.asp

    <%@  Language = "VBScript"  %>
<!-- #Include file="include\adovbs.inc" -->
<!-- #Include file="include\cod_ado.inc" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>New Page </title>
<!-- #Include file="include\style.inc" -->
</head>
<body>
<%
	strID = Request.queryString("ID")
	dim objCnn,rs
	strDSN = Application("dsn")
	strSQL = "SELECT id,title,detail FROM board where ID="&strID
	cod_AdoOpen objCnn,rs,strDSN,strSQL
%>
<table border="0" cellspacing="0" width="500" cellpadding="0">
      <tr class="tr3">
           <td>标题</td>
      </tr>
      <tr class="tr1">
        <td><%=rs("title")%><br><br></td>
      </tr>
      <tr class="tr3">
        <td>内容</td>
      </tr>
      <tr class="tr1">
        <td>
<pre>
<%=rs("detail")%>
</pre><br><br></td>
       </tr>
    <tr bgcolor="#f4f4f4"><td><p align=center><a href="vbscript:window.history.back">返回</a></p></td></tr>
</table>
<%
call cod_AdoClose(objCnn, rs)
%>
</body>
</html>