最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
global.asa文件
时间：2022-07-02 23:30:37 编辑：袖梨 来源：一聚教程网
sub Application_OnStart
DIM chatpoin,roomname,kicklist,chatdata(50,6),onliuser,chatcomm(50)
for i=0 to 50
chatdata(i,0)=""
chatdata(i,1)=""
chatdata(i,2)=0
chatdata(i,3)=""
chatdata(i,4)=0
chatdata(i,5)=""
chatcomm(i)=""
next
chatcomm(0)="'00:00:00,系统消息,0,所有人,ff0000,0,你好，你是第一位光临的客人'"
application.lock
application("roomname")="温馨情缘"
application("onliuser")=""
application("chatpoin")=0
application("kicklist")=""
application("chatdata")=chatdata
application("chatcomm")=chatcomm
application.unlock
end sub
sub Session_onEnd
ip=session("userip")
id=session("userid")
chatdata=application("chatdata")
application.lock
application("kicklist")=replace(application("kicklist"),",'"&chatdata(id,1)&"'","")
application("kicklist")=replace(application("kicklist"),",'#"&chatdata(id,0)&"'","")
application("onliuser")=replace(application("onliuser"),",'"&chatdata(id,0)&"'","")
application.unlock
for i=0 to 50
chatdata(i,4)=(chatdata(i,4) mod 4)+4
next
chatdata(id,0)=""
chatdata(id,1)=""
chatdata(id,2)=""
chatdata(id,3)=""
chatdata(id,4)=""
chatdata(id,5)=""
application.lock
appliation("chatdata")=chatdata
application.unlock
end sub
相关文章
- 实用伴唱app下载推荐 热门伴唱软件排行榜 07-30
- 免费视频提取软件合集 值得推荐的视频提取软件盘点 07-30
- 有哪些软件英语推荐 值得推荐的英语app盘点 07-30
- 日结临时工app哪个平台靠谱 真实可靠的日结临时工app推荐 07-30
- ai做ppt一键生成工具推荐 ai做ppt一键生成工具有哪些 07-30
- 学泰语的app哪个更好 学泰语的app实用分享 07-30