<%response.expires=0%>
<!--#include file="function.asp"-->
<%
response.expiresabsolute=dateadd("s",1,now())
pagefile=request("pagefile")
if session("siteid")="" or isempty(session("siteid")) then
	response.write("<font color=""#ffff00"">對(duì)不起，您只有重新打開快狗才能上線！</font>")
	response.end
end if
if session("username")="" or isempty(session("username")) then
	application.lock
	application("online")=application("online")+1
	application.unlock
	session("username")="訪客"&application("online")
	session("manager")="0"
end if
if find_online_user(session("siteid"))=0 then
	call write_online_user(session("siteid"))'寫入當(dāng)前用戶信息
	if pagefile="user" then
		response.write("<script language=""javascript"">")
		response.write("location.href=""disp_online_user.asp"";")
		response.write("</script>")
	else
		response.write("<script language=""javascript"">")
		response.write("location.href=""disp_online_manager.asp"";")
		response.write("</script>")
	end if
end if
%>