admin_xiugai.asp

数据库系统,全是源文件,大家可以自由下载哦,谢谢合作

<!--#include file="conn.asp"-->

<%
  dim sql
   
	if not isempty(request("submit")) then

	set rs=server.CreateObject("adodb.recordset")
   sql="select * from user where usename='"&request.Form("admin")&"' and password='"&request.Form("paw")&"'"
    rs.open sql,conn,3,1
	
	rs("password")=request("paw")
	rs.update
	rs.close
	response.write("密码修改成功")
	set rs=nothing
	set conn=nothing
	else
	response.write("密码成功")
	
	end if
	
	 

%>