admin_xy.asp

找北文章系统

<%
  xy=utf8(Request("xy"))
  id=TRim(Request("id"))

if xy<>""  then
			Set Rs_xy = Server.CreateObject("Adodb.Recordset")
			Sql_xy = "SELECT id FROM admin where  xy='"&xy&"'"
			Rs_xy.Open Sql_xy,conn,1,2
			if rs_xy.bof and rs_xy.eof  then 
				Response.Redirect "denlu.asp"
			end if
			Rs_xy.close
			set rs_xy=nothing

else
	Response.Redirect "denlu.asp"
end if%>