admin_add.inc.asp

来自「ASP开发学生成绩查询管理系统,能满足毕业设计的要求-ASP student a」· ASP 代码 · 共 21 行

<%
dim s,usename,paw
  
	paw=request.form("txtpaw")
	usename=request.form("txtname")
if request.form("submit")="确定" then
    set rs=server.CreateObject("adodb.recordset") 
	s="select * from user "
	rs.open s,conn,3,3
	rs.addnew
	
	rs("password")=paw
	rs("usename")=usename
	
	response.write "<script> alert('修改成功!');location.href='admin_adduser.asp';</script>"
	rs.update


   end if
  
%>