mod_op.asp

基本功能: 1.网友留言 2.留言可以选择悄悄话 3.管理员后台管理留言 4.可有多个管理员 5.20个留言形象 6.可设置每页显示最大留言数

<%@language=vbscript%>
<%if not session("checked")="yes" then 
response.Redirect "error.htm"  
else
%>

<!--#include file="conn1.asp"-->
<%
sq_1="select * from admin where id="&request.form("id")
set adm=server.createobject("adodb.recordset")
adm.open sq_1,conn,1,3
adm("admin")=request.form("admin")
adm("admin_pas")=request.form("password")
adm.update
adm.close
set adm=nothing
conn.close
set conn=nothing 
response.Redirect "admin_option.asp" 
%>
<%end if%>