adminadd_do.asp

来自「WAP2.0的手机网站留言板」· ASP 代码 · 共 30 行

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%Response.CodePage=65001%>
<%Response.Charset="UTF-8"%>
<!--#include file="adminCheck.asp"-->
<!--#include file="../func.asp"-->
<!--#include file="md5.asp"-->
<!--#include file="db_conn_admin.asp"-->
<%
account=ReplaceBadChar(Trim(request.form("ac")))
password=ReplaceBadChar(Trim(request.form("pw")))

if strLength(password)<4 Then
	Response.redirect "error.asp?err=1907"
Else
	sqlStr="select * from WP_admin where admin_account='"&account&"'"
	set rs = server.createobject("ADODB.RecordSet")
	rs.open sqlStr,conn,1,1
	If Not rs.eof Then
		Response.redirect "error.asp?err=1908"
	Else
		sqlStr="insert into WP_admin(admin_account,admin_password) values('"&account&"','"&md5(password)&"')"
		conn.execute(sqlStr)
		Response.redirect "info.asp?info=2902"
	End If
	rs.close
	Set rs=Nothing
End if

Set conn=nothing
%>