下面是能用的asp代碼的壹部分
<%
User = Request("User")
Pwd = Request("Pwd")
Page = Request("Page")
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("Data.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From GuestBook Where Re = '0' Order By AddDate DESC", conn, 3
rs.Close
conn.Close
%>