useradd.asp

就业信息服务网

<!--#include file="dbconn.asp"-->
<%
dim rs,tsql
dim rst
set rst=server.CreateObject("ADODB.RecordSet")
rst.open "select * from admin  where username='"&request("username")&"'",conn,3,2
if not rst.eof then
%>
<BR><BR>
<CENTER>
<link rel="stylesheet" type="text/css" href="../style.css">
<TABLE border="0" cellspacing="0" width="600" cellpadding="0">
<TBODY>
   <TR>
      <TD  height="250" valign="middle" align="center"><font color="#ff6600" class=f12><b>该户名已经存在，请点击返回按钮，重新填写用户名。</b><br><br><input type="button" VALUE="返   回" class="smallInput" onClick=javascript:history.go(-1)></font>
      </TD>
   </TR>
</TBODY>
</TABLE>
<%else
rst.addnew
rst("oskey")=request("oskey")
rst("username")=request("username")
rst("password")=request("password")
rst.update
rst.close
set rst=nothing
conn.close
set conn=nothing
response.redirect "default.asp"
end if%>