万卷书   首页 > 电脑书籍 > Flash > Flash 与 Asp结合使用实例之二 聊天室的实现
 
  6、在主场景中的第5帧中插入关键帧,将此帧命名为“netfalse”,在此帧场景中添加“网络连接超时……”的信息。在帧的Action面板中增加下面的语句:


 

stop();


 

  7、在主场景中的第10帧中插入关键帧,将此帧命名为“loginfalse”,在此帧场景中添加“用户名或密码错”的信息。在帧的Action面板中增加下面的语句:


 

stop();


 

  C、小结与提高


 

  在Asp部分要注意的是当登陆成功后,要在application("VisitorName")和application("VisitorNum")对象中加上相应的值。在Flash部分中,先用loadVariables()发送请求,然后启动另外一个clip等待返回的值,这是一种比较好的操作方法。


 

  三、发送


 

  发送部分的基本原理是从Flash端发送聊天内容到服务器端,在服务器端将聊天内容添加到application("AllCanSee")对象中,并将修改后的application("AllCanSee")对象的内容返回到Flash端。


 

  A、asp部分


 

  1、新建一个空白文件,命名为send.htm,其内容如下:


 

<%
username = request("username")
tempstr= username & " say: " & request("content") & "<br>"
application("AllCanSee") = application("AllCanSee") & tempstr              ‘注释1
response.Write("sflag=true&scontent=" & application("AllCanSee"))          ‘注释2
%>


 

  注释1:将从flash端发送来的内容添加到聊天的内容中。
  注释2:将标志位sflag和聊天的内容发送回flash端。


 

  B、Flash部分


 

  1、在主场景的第15帧中添加关键帧,将此帧命名为“main”,在帧的Action面板中增加下面的语句:


 

now = new Date();     //注释1
starttime = now.getTime();
stop();


 

  注释1:这是为计算在线时间而设的。


 

  2、在主场景中拉一个对话框,属性设置如图4所示。
 

 

上一页 下一页