主頁 > 知識庫 > 顯示在線人數(shù)

顯示在線人數(shù)

熱門標簽:電話機器人銷售公司嗎 成都銷售外呼系統(tǒng)公司 客服外呼系統(tǒng)呼叫中心 保定電銷機器人軟件 鎮(zhèn)江云外呼系統(tǒng)怎么樣 電話機器人案例 自動外呼系統(tǒng)怎么防止封卡 土地證宗地圖標注符號 vue 地圖標注拖拽
%
NowUrl=request.servervariables("HTTP_REFERER")
UserName = session("Wenday_sys_User")
if UserName="" then
   UserName="客人"
end if
call sqlonline()
Response.Write "document.write(" chr(34) "nbsp;nbsp;font color=#000000>當(dāng)前在線 " online() "人/font>" chr(34) ")"
'Response.Write "document.write(" chr(34) "nbsp;nbsp;a href=count/ShowOnline.asp title=查看在線列表>font color=#000000>當(dāng)前在線" online() "人/font>/a>" chr(34) ")"
sub sqlonline()
dim statuserid
     statuserid=replace(Request.ServerVariables("REMOTE_HOST"),".","") 
  Response.Cookies("Wenday_Sys")("onlineid")=statuserid
 sql="select id from "CategoryName"_online where id="cstr(request.cookies("Wenday_Sys")("onlineid"))
 set rs=conn.execute(sql)
 if rs.eof and rs.bof then
  sql="insert into "CategoryName"_online(id,UserName,ip,startime,lastimebk,browser,actforip,Now_Url) values ("statuserid",'"UserName"','"Request.ServerVariables("REMOTE_HOST")"',now(),now(),'"Request.ServerVariables("HTTP_USER_AGENT")"','"Request.ServerVariables("HTTP_X_FORWARDED_FOR")"','"request.servervariables("HTTP_REFERER")"')"
 else
  sql="update "CategoryName"_online set lastimebk=now(),UserName='"UserName"' where id="cstr(request.cookies("Wenday_Sys")("onlineid"))
 end if
 conn.execute(sql)
set rs=nothing
Rem 刪除超時用戶
sql="Delete FROM "CategoryName"_online WHERE DATEDIFF('s', lastimebk, now()) > "kicktime"*60"
Conn.Execute sql
end sub
function online()
dim tmprs
 sql="Select count(id) from "CategoryName"_online"
set tmprs=conn.execute(sql)
online=tmprs(0)
set tmprs=nothing
if isnull(online) then online=0
end function
CloseDatabase
%>

標簽:成都 臺灣 天津 麗江 公主嶺 重慶 懷化 內(nèi)江

巨人網(wǎng)絡(luò)通訊聲明:本文標題《顯示在線人數(shù)》,本文關(guān)鍵詞  顯示,在線,人數(shù),顯示,在線,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請?zhí)峁┫嚓P(guān)信息告之我們,我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《顯示在線人數(shù)》相關(guān)的同類信息!
  • 本頁收集關(guān)于顯示在線人數(shù)的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章

    上一篇:asp打包類

    下一篇:ASP 類 Class入門