下面是一个简单的示例代码,展示了一个基本的ASP留言板功能:

<%'连接数据库Set conn = Server.CreateObject(“ADODB.Connection”)conn.Open “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mydatabase.mdb”

'处理提交留言的请求If Request.Form(“submit”) <> “” Then'获取表单数据Dim name, messagename = Request.Form(“name”)message = Request.Form(“message”)

'插入留言数据到数据库Dim sqlsql = "insert INTO messages (name, message) VALUES ('" & name & "', '" & message & "')"conn.Execute sql

End If

'查询留言数据Dim rsSet rs = Server.CreateObject(“ADODB.Recordset”)rs.Open “select * FROM messages ORDER BY id DESC”, conn

'显示留言列表If Not rs.EOF ThenWhile Not rs.EOFResponse.Write “

” & rs(“name”) & ": " & rs(“message”) & “

”rs.MoveNextWendElseResponse.Write “

暂无留言。

”End If

'关闭数据库连接rs.CloseSet rs = Nothingconn.CloseSet conn = Nothing%>

上述代码中,首先连接数据库,然后根据用户提交的留言信息,将数据插入到数据库中。接着查询留言数据,并将留言内容逐条显示出来。最后,关闭数据库连接。

留言表单使用POST方法提交数据,并包括姓名和留言内容两个字段。提交按钮的name属性设置为"submit",便于在服务器端判断表单是否提交。

注意:以上代码仅为示例,实际开发中需要根据具体需求进行适当的修改和完善。例如,对用户输入进行安全验证,防止SQL注入攻击;显示分页功能;添加用户身份认证等。