usernew_ok.asp

来自「网上车辆管理系统」· ASP 代码 · 共 23 行

<!--#include file="..\pub\ChkAdmin.asp"-->
<!--#include file="..\CONN.INC"-->

<%
str="(RealName,RegDate,UserType,Affiliation,UserName,Password)"
str=str+"Values ('"&Request("RealName")&"','"&Request("RegDate")&"','"&Request("UserType")&"'"
str=str+",'"&Request("Affiliation")&"','"&Request("UserName")&"','"&Request("Password")&"')"
Sqlstring="Insert into  UserInfo "&str

Conn.execute(Sqlstring)
if Request("UserType")="2" then 
	set rs=conn.execute ("select @@identity as CurID" )
	Conn.execute("update DriverInfo set UserID="&rs("CurID")&" where DriverID="&Request("DriverID"))
	set rs=nothing
end if
set conn=nothing
%>
<form name=reDirectURL action=UserReg.asp method=post></form>
<script language="javascript">
	 alert("新的用户信息已经添加");
     document.reDirectURL.submit();
</script>