www.gusucode.com > ASP+ACCESS医药公司网站建设毕业设计(源代码+论文+答辩PPT) > ASP+ACCESS医药公司网站建设毕业设计(源代码+论文+答辩PPT)\ASP医药网站042\医药网站代码\disNoteInfo.asp

    <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Connections/conn.asp" -->
<%
if request("iId")="" then
	response.end
end if
%>
<%	
		Dim Recordset3
		Dim Recordset3_numRows
		Set Recordset3 = Server.CreateObject("ADODB.Recordset")
		Recordset3.ActiveConnection = MM_conn_STRING
		Recordset3.Source = "select * from NoteBook where iId='"&request("iId")&"'"
		Recordset3.CursorType= 1
		Recordset3.CursorLocation = 2
		Recordset3.LockType = 1
		Recordset3.Open()
		Recordset3_numRows = 0 
%>
<p>
标题:
<%=Recordset3("Title")%>
</p>
<p>
作者:
<%=Recordset3("Id")%>
</p>
<p>
内容:
<%=Recordset3("comment")%>
</p>
<%
Recordset3.Close()
Set Recordset3 = Nothing
%>