user_online_out.asp

电影ASP文件

<!--#include file="../film_conn.asp"-->
<!--#include file="session.asp"-->
<!--#include file="../set_url.asp"-->
<%
if request("want")="" then 
userid=request("userid")
application(""&userid&"")=""
response.redirect Request.ServerVariables("HTTP_REFERER")
else
Set rs= Server.CreateObject("ADODB.Recordset")
sql="select * from users where oklook>0 order by id desc"
rs.open sql,conn,1,1
do while not rs.eof
application(""&rs("userid")&"")=""
rs.movenext
loop
rs.close
set rs=nothing  
conn.close
set conn=nothing
response.redirect Request.ServerVariables("HTTP_REFERER")
end if
%>