adduser.asp

来自「一个学生信息管理网站」· ASP 代码 · 共 15 行

<!--#include file="..\inc\conn.asp"-->
<!--#include file="..\inc\SessionCheck.asp"-->
<%
Call DBConnBegin()
dim user,pwd
user=Request.Form("user")
pwd=Request.Form("pwd")
if user<>"" and pwd<>"" then  
  '添加用户信息
  sSql="insert into UserInfo(UserID,UserPwd) values('"&user&"','"&pwd&"')"
  oRs.open sSql,oConn,1,1
end if
Call DBConnEnd()
Response.redirect "usermanage.asp"
%>