<!--#include file="conn.asp"-->
<!--#include file="../../inc/filter.asp"-->
<%
Rem 获得待修改的管理员信息
dim adminname
adminname=trim(request("id"))
if(adminname="") then
	response.Write("<script language='javascript'>")
	response.Write("alert('输入参数不能为空');")
	response.Write("window.location='main_body.asp';")
	response.Write("</script>")
else
	if(ChkBadWord(adminname)<>0) then
		response.Write("<script language='javascript'>")
		response.Write("alert('输入参数包含非法字符');")
		response.Write("window.location='main_body.asp';")
		response.Write("</script>")
	else
		set rs=Server.CreateObject("ADODB.RecordSet")
		rs.open "select * from [fksf_admin] where adminname='"&adminname&"'",conn,1,1
		if(rs.eof) then
			rs.close()
			set rs=nothing
			response.Write("<script language='javascript'>")
			response.Write("alert('本系统无该管理员');")
			response.Write("history.go(-1);';")
			response.Write("</script>")
		else
			id=rs("adminname")
			rs.close()
			set rs=nothing
		end if
	end if
end if
%>