1.我也不会。 2.要想私聊,可以用application和session对象来实现。 为了保存私聊信息,首先需要在global.asax中定义一些全局变量,私聊内容和公共聊天室显示的内容有所区别,就是加入了....悄悄的对你说等等。 <sript language="vb" runat=server> sub application_onstart(s as object,e as eventargs) '建立用户列表 dim user(20) as string application("user")=user '预置20条聊天记录 dim chats(20) as string application("chats")=chats '当前记录数 application("current")=0 '定义接受列表 dim receive(40) as string application("sendto")=receive '定义发送列表 dim owner(40) as string application("owner")=owner '定义私聊内容列表 dim chat(40) as string application("chat")=chat '定义私聊内容当前记录数 application("chatnum")=0 '定义私聊信息发送时间 dim chattime(40) as string application("chattime")=chattime end sub ... .... </script>除了定义公共聊天室的内容处,还要另处定义5个application变量来存储私聊内容。 application("sendto"):私聊内容的接收者 application("owner"):私聊内容的发送者 application("chat"):私聊内容 application("chatnum"):当前私聊记录的编号. application("chattime"):私聊信息发送时间.3.我没有代码。
To OK521(拉登陪我打CS) 四条三角裤啦,恭喜恭喜~~! 我7月3号就自由人了。一块写个聊天室吧?
thank you!!
2.要想私聊,可以用application和session对象来实现。
为了保存私聊信息,首先需要在global.asax中定义一些全局变量,私聊内容和公共聊天室显示的内容有所区别,就是加入了....悄悄的对你说等等。
<sript language="vb" runat=server>
sub application_onstart(s as object,e as eventargs)
'建立用户列表
dim user(20) as string
application("user")=user
'预置20条聊天记录
dim chats(20) as string
application("chats")=chats
'当前记录数
application("current")=0
'定义接受列表
dim receive(40) as string
application("sendto")=receive
'定义发送列表
dim owner(40) as string
application("owner")=owner
'定义私聊内容列表
dim chat(40) as string
application("chat")=chat
'定义私聊内容当前记录数
application("chatnum")=0
'定义私聊信息发送时间
dim chattime(40) as string
application("chattime")=chattime
end sub
...
....
</script>除了定义公共聊天室的内容处,还要另处定义5个application变量来存储私聊内容。
application("sendto"):私聊内容的接收者
application("owner"):私聊内容的发送者
application("chat"):私聊内容
application("chatnum"):当前私聊记录的编号.
application("chattime"):私聊信息发送时间.3.我没有代码。
四条三角裤啦,恭喜恭喜~~!
我7月3号就自由人了。一块写个聊天室吧?