conn.asp

简单的留言版asp原码,供学习参考,里边有详细说明

<%
dim conn,connstr
Set conn = Server.CreateObject("ADODB.Connection")
	connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("#bxgzs.asp")
        conn.Open connstr
dim title,pagesize,Num,Guest
title="简单-留言板" 
pagesize=10              //限制一页显示多少条留言,改数字就可以
Num=500                 //限制留言文字数量，改数字就可以
guest="yes"              //显示是否允许游客回复yes为可以no为不可以
%>