<!--#include file="conn.asp"-->
<%
dim rs,conn
number=session("number")
passwd=session("Passwd")
set rs=server.CreateObject("ADODB.RecordSet")
sql="select * from admin1 where number='"&number&"'and passwd='"&Passwd&"'"
rs.open sql,conn,3,3
if rs.eof then
response.redirect "index.asp"
response.end
end if
key1=rs("oskey")
IF not(KEY1="super") THEN
	response.redirect "error.asp?id=065"
	response.end
END IF
rs.close
ke=request("ke")
sql="delete * from kecheng where ke='"&ke&"'"
rs.open sql,conn,3,3

response.redirect "returnOK.asp"%>