2、响应报文
| <login><usrename name="用户名" right="权限">用户名</username></login> |
b、flash部分
1、在flash mx 2004中新建一个flash文件，设置场景的第一帧的帧标签为“login”，并在actionscript面板上增加语句：
| stop(); |
2、在第一帧的场景中用文本工具拉两个文本框，类型都为“input type”，变量名var分别设置为“username”、“userpwd”，这是用来输入用户名跟密码的。
3、新建一个button并拖到第一帧的场景中，摆放位置如图1所示。并在这个button的actionscript面板中增加如下语句：
| on (release) { if (length(_root.username) == 0) { //注释1 _root.username = "guest"; } else if (length(_root.userpwd) == 0) { //注释2 _root.username = "guest"; } loginxml = new xml(); //注释3 loginelement = loginxml.createelement("login"); //注释4 // name node nameelement = loginxml.createelement("username"); //注释5 namenode = loginxml.createtextnode("name"); //注释6 namenode.nodevalue = _root.username; nameelement.appendchild(namenode); //注释7 // pwd node pwdelement = loginxml.createelement("pwd"); //注释8 pwdnode = loginxml.createtextnode("pwd"); pwdnode.nodevalue = _root.userpwd; pwdelement.appendchild(pwdnode); //注释9 loginelement.appendchild(nameelement); //注释10 loginelement.appendchild(pwdelement); loginxml.appendchild(loginelement); //注释11 xmlrepley = new xml(); //注释12 xmlrepley.onload = onloginreply; //注释13 function onloginreply(success) { if (success) { if (xmlrepley.firstchild.firstchild.attributes.right == "1") { //注释14 _root.gotoandplay("main"); } else { _root.username = "登陆失败"; } } } loginxml.sendandload("http://localhost/xmlchat/login.asp", xmlrepley); //注释15 } |
注释1：检查输入框中用户名的长度，如为空，则默认为guest。
注释2：检查输入框中密码的长度。
注释3：新建一个xml对象，这是用来发送到服务器端的。
注释4：创建一个login结点对象。
注释5：创建一个username结点对象，注意不能直接在element对象中放置文本内容，要在text node对象中才能放置文本内容。具体可以参见flash帮助文件中有关xml.createelement()和xml.createtextnode() 中的内容。
注释6：创建一个text node对象，用来放置username结点的文本内容。
注释7：将创建的text node结点插入到username结点对象中。
注释8：分别创建一个pwd结点对象和text node。
注释9：将text node结点插入到pwd结点对象中。
注释10：将username结点对象插入到login结点对象中，将pwd结点对象插入到login结点对象中。
注释11：将login结点对象插入到所创建的xml对象中，从而构造一个完整的xml对象。注意这里在构建xml对象时，是从最里面开始构建的。
注释12：新建一个xml对象，这里是用来放置接收到的xml对象的。
注释13：设置接收xml对象的响应函数，当服务器端返回xml对象的时候触发。
注释14：判断返回的xml对象中的结点属性是否符合要求。
注释15：利用sendandload()函数，将flash端的xml对象发送到服务器端，并接收从服务器端返回的xml对象。
c、asp部分
1、新建一个文件，命名为global.asa，输入如下内容：
| <script language="vbscript" runat="server"> sub application_onstart application("visitornum")=0 application("visitorname")="" application("allcansee")="" end sub </script> |
<% set objdom = server.createobject("microsoft.xmldom") ‘注释4 set objpwd = objdom.documentelement.selectsinglenode("//login/pwd") ‘注释8 righ = "-1" '返回 |
注释1：利用filesystemobject组件建立一个文件对象，将通讯过程中传送的东西写在文件里面，方便调试。
注释2：注意根据实际需要修改文件的路径。
注释3：把request.form是传送进来的所有内容都写在文件里面，在服务器端留下调试痕迹。可以用日志模式进一步完善此功能。
注释4：创建一个xml对象。可以在ms xml包中找到更多有关xml操作的信息。
注释5：通过loadxml()函数，导入flash端传送进来的xml格式字符串。
注释6：建立username结点的对象。
注释7：取得username结点的内容。
注释8：建立pwd结点的对象，取得pwd结点的内容。
注释9：建立一个数据库connection集合。
注释10：建立一个数据库的ado连接，这里用到的是access 2000数据库，数据库的格式见后面的附录，请注意数据库的存放位置。
注释11：建立一个数据库recordset集合。
注释12：根据取得的用户名和密码，构造一个sql字符串。
注释13：判断查询结果是否为空。
注释14：将用户名和id号添加到application("visitorname")对象中。
注释15：将登陆信息添加到application("allcansee")对象中。
注释16：关闭数据库连接，释放资源。
注释17：直接构造一个xml字符串，并通过write函数写到flash端。
发送部分的基本原理是从flash端发送xml格式的聊天内容到服务器端，在服务器端将聊天内容添加到application("allcansee")对象中，并将修改后的application("allcansee")对象的内容用xml格式返回到flash端。
a、传递的xml
1、请求报文
| <send><username>用户名</username><content>发送内容</content></send> |
| <send><result sflag="true" scontent="聊天室显示的内容">用户名</result></send> |
b、flash部分
1、在主场景的第5帧中添加关键帧，将此帧命名为“main”，在帧的action面板中增加下面的语句：
| now = new date(); //注释1 starttime = now.gettime(); stop(); |
注释1：这是为了在下面计算在线时间用的。
2、在主场景中拉一个文本框，属性设置如图2所示。
3、在主场景main帧中增加一个button，显示的内容为“发送”。在button的action面板上面增加如下语句：
| on (release) { if (length(_root.txtsend) == 0) { //注释1 _root.txtsend = "内容为空"; } sendxml = new xml(); //注释2 sendelement = sendxml.createelement("send"); //注释3 // name node nameelement = sendxml.createelement("username"); //注释4 namenode = sendxml.createtextnode("name"); //注释5 namenode.nodevalue = _root.username; nameelement.appendchild(namenode); //注释6 // content node cntelement = sendxml.createelement("content"); //注释7 cntnode = sendxml.createtextnode("cnt"); //注释8 cntnode.nodevalue = _root.txtsend; cntelement.appendchild(cntnode); //注释9 sendelement.appendchild(nameelement); //注释10 sendelement.appendchild(cntelement); sendxml.appendchild(sendelement); //注释11 xmlsendrepley = new xml(); //注释12 xmlsendrepley.onload = onsendreply; //注释13 function onsendreply (success) { if (success) { if (xmlsendrepley.firstchild.firstchild.attributes.sflag == "true") { //注释14 _root.txtcontent = xmlsendrepley.firstchild.firstchild.attributes.scontent; //注释15 }else { _root.txtcontent = "连接超时……"; } } } sendxml.sendandload("http://localhost/xmlchat/send.asp", xmlsendrepley); //注释16 } |
注释1：判断发送的内容是否为空。
注释2：创建一个用于发送的xml对象。
注释3：创建一个send结点对象。
注释4：创建一个username结点对象。
注释5：创建一个text node对象，用于存放用户名。
注释6：将创建的text node对象添加到username结点对象中。
注释7：创建一个content结点对象。
注释8：创建一个text node对象，用于存放要发送的内容。
注释9：将创建的text node对象添加到content结点对象中。
注释10：将创建的username和content对象添加到send结点对象中。
注释11：将创建的send结点对象添加到send对象中。
注释12：创建一个用于接收的xml对象。
注释13：设置接收xml对象的响应函数。
注释14：判断从服务器返回的值，根据判断结果做相应的操作。
注释15：将聊天室的内容显示出来。
注释16：利用sendandload()函数，将flash端的xml对象发送到服务器端，并接收从服务器端返回的xml对象
c、asp部分
新建一个空白文件，命名为send.asp，其内容如下：
<% set objdom = server.createobject("microsoft.xmldom") ‘注释3 set objcnt = objdom.documentelement.selectsinglenode("//send/content") ‘注释6 tempstr= username & " say: " & content & "..." '返回 |
注释1：利用filesystemobject组件建立一个文件对象，将通讯过程中传送的东西写在文件里面，方便调试。
注释2：把request.form是传送进来的所有内容都写在文件里面，在服务器端留下调试痕迹。
注释3：创建一个xml对象。
注释4：通过loadxml()函数，导入flash端传送进来的xml格式字符串。
注释5：建立username结点的对象，取得相应内容。
注释6：建立content结点的对象，取得相应内容。
注释7：将从flash端发送过来的内容添加到application("allcansee")对象中。
注释8：直接构造一个xml字符串，并通过write函数写到flash端。
显示聊天内容的基本原理是从flash端发送要显示聊天内容的xml请求，在服务器端将application("allcansee")的内容按xml格式发送到flash端，在flash端解释和显示出来。
显示在线人数名单的基本原理是在flash端发送显示在线人数名单的xml请求，服务器端将application("visitorname")对象的内容按xml格式发送到flash端，在flash端解释和显示出来。
a、传递的xml
1、请求报文
| <refresh><username>用户名</username></refresh> |
2、响应报文
| <refresh><result cflag="true" ccontent="聊天内容" talker="在线人员名单">用户名</result></refresh> |
b、flash部分
1、在主场景中拉一个文本框，属性设置如图3所示。
2、从组件库里面选择list组件，在场景中拉一个list，命名为“talkerlist”。此时场景中的布局应该如图4所示。
3、在主场景main帧中增加一个button，显示的内容为“刷新”。在button的action面板上面增加如下语句：
| on (release) { refreshxml = new xml(); //注释1 refreshelement = refreshxml.createelement("refresh"); //注释2 // name node nameelement = refreshxml.createelement("username"); //注释3 namenode = refreshxml.createtextnode("name"); //注释4 namenode.nodevalue = _root.username; nameelement.appendchild(namenode); //注释5 refreshelement.appendchild(nameelement); //注释6 refreshxml.appendchild(refreshelement); xmlrefreshrepley = new xml(); //注释7 xmlrefreshrepley.onload = onrefreshreply; //注释8 function onrefreshreply(success) { if (success) { if (xmlrefreshrepley.firstchild.firstchild.attributes.cflag == "true") { //注释9 _root.txtcontent = xmlrefreshrepley.firstchild.firstchild.attributes.ccontent; //注释10 strtalker = xmlrefreshrepley.firstchild.firstchild.attributes.talker; _root.talkerlist.removeall(); //注释11 if (strtalker.length>0) { //注释12 talkerarray = new array(); //注释13 temparray = new array(); talkerarray = strtalker.split(";"); //注释14 for (i=0; i<talkerarray.length-1; i++) { //注释15 temparray = talkerarray[i].split(","); //注释16 _root.talkerlist.additem(temparray[0], temparray[1]); //注释17 } } } else { _root.txtcontent = "连接超时……"; } } } refreshxml.sendandload("http://localhost/xmlchat/refresh.asp", xmlrefreshrepley); //注释18 } |
注释1：创建一个用于发送的xml对象。
注释2：创建一个refresh结点对象。
注释3：创建一个username结点对象。
注释4：创建一个text node对象，用于存放用户名。
注释5：将创建的text node对象添加到username结点对象中。
注释6：将创建的username对象添加到refresh结点对象中。
注释7：创建一个用于接收的xml对象。
注释8：设置接收xml对象的响应函数。
注释9：判断从服务器返回的值，根据判断结果做相应的操作。
注释10：将聊天室的内容显示出来。
注释11：将场景中的下拉列表中的内容清空。
注释12：判断从服务器端返回的在线名单是否为空。
注释13：创建两个数组，用来操作在线用户名单。
注释14：调用string的split函数，将分割后的string保存到数组中。
注释15：循环读取数组里面的string，继续分割。
注释16：调用string的split函数，将分割后的string保存到数组中。
注释17：将分割后取得的用户名和id号，都添加到场景中的下拉列表中。
注释18：利用sendandload()函数，将flash端的xml对象发送到服务器端，并接收从服务器端返回的xml对象。
c、asp部分
新建一个文件，命名为refresh.asp，添加如下内容：
<% set objdom = server.createobject("microsoft.xmldom") ‘注释4 '返回 |
注释1：利用filesystemobject组件建立一个文件对象，将通讯过程中传送的东西写在文件里面，方便调试。
注释2：创建一个文件。
注释3：把request.form是传送进来的所有内容都写在文件里面，在服务器端留下调试痕迹。
注释4：创建一个xml对象。
注释5：通过loadxml()函数，导入flash端传送进来的xml格式字符串。
注释6：建立username结点的对象，取得相应内容。
注释7：根据聊天室内容和在线人员名单构造一个xml字符串，并通过write函数写到flash端
flash中的时间功能已经足够强大，单凭flash端就可以计算在线时间。不断地用当前时间去减记录下来的开始时间，并显示出来，就是在线时间了。
a、flash部分
1、在主场景中拉一个文本框，属性设置如图5所示。
2、按“ctrl + f8”新建一个空白的movie clip，将此clip拖到场景中，并在此clip的action面板上面增加如下语句（注意是在场景中的clip上面，不是在clip里面）：
| onclipevent (load) { timedate = new date(); } onclipevent (enterframe) { //注释1 mytime = timedate.gettime(); //注释2 _root.txttime = "您共在线 " + math.round((math.ceil((mytime - _root.starttime)/1000)/60)) + " 分钟"; //注释3 delete timedate; //注释4 timedate = new date(); //注释5 } |
注释1：当clip的帧从头播放的时候触发。
注释2：取得当前时间。
注释3：将统计所得的秒转换成分钟，并显示出来。
注释4：删除当前的时间对象。
注释5：重新构造一个时间对象，这样就可以不断的取得最新的时间。
聊天室中，管理功能是必不可少的，这里以简单的“踢人”功能为例来说明一下。
a、传递的xml
1、请求报文
| <kick><id>要踢的用户名和id串</id></kick> |
2、响应报文
| <refresh><result kflag="true" ccontent="聊天室内容" talker="在线人员列表">用户名</result></refresh> |
b、flash部分
1、在场景中新建一个button，显示的内容为“踢人”，在button的action面板上面增加如下语句：
on (release) { namenode.nodevalue = _root.talkerlist.selecteditem.label + "," +_root.talkerlist.selecteditem.data + ";"; //注释5 |
c、asp部分
新建一个文件，命名为kick.asp，在文件中添加如下内容：
<% set objdom = server.createobject("microsoft.xmldom") ‘注释4 '返回 |
注释1：利用filesystemobject组件建立一个文件对象，将通讯过程中传送的东西写在文件里面，方便调试。
注释2：创建一个文件。
注释3：把request.form是传送进来的所有内容都写在文件里面，在服务器端留下调试痕迹。
注释4：创建一个xml对象。
注释5：通过loadxml()函数，导入flash端传送进来的xml格式字符串。
注释6：建立id结点的对象，取得相应内容。
注释7：这几步是处理“踢人”的动作，在这里只是简单地把要踢的用户从在线用户名单中删除，更严格的“踢人”可以把要踢的用户的ip地址写数据库中，只到管理员解开为止。
注释8：直接构造一个xml字符串，并通过write函数写到flash端。
1、开发环境介绍
系统的开发环境为win 2k + flash mx 2004 + iis 6.0 + ie 6.0 + 记事本。在iis中所设置的虚拟目录的名称为xmlchat。
2、涉及的数据库
系统用到的数据库为access 2000，数据库中只有一个用户表userinfo，表中的字段为：id、username、pwd、right。
点击这里下载源文件
b、flash部分1、在flash mx 2004中新建一个flash文件，设置场景的第一帧的帧标签为“login”，并在actionscript面板上增加语句：
| stop(); |
2、在第一帧的场景中用文本工具拉两个文本框，类型都为“input type”，变量名var分别设置为“username”、“userpwd”，这是用来输入用户名跟密码的。
3、新建一个button并拖到第一帧的场景中，摆放位置如图1所示。并在这个button的actionscript面板中增加如下语句：
| on (release) { if (length(_root.username) == 0) { //注释1 _root.username = "guest"; } else if (length(_root.userpwd) == 0) { //注释2 _root.username = "guest"; } loginxml = new xml(); //注释3 loginelement = loginxml.createelement("login"); //注释4 // name node nameelement = loginxml.createelement("username"); //注释5 namenode = loginxml.createtextnode("name"); //注释6 namenode.nodevalue = _root.username; nameelement.appendchild(namenode); //注释7 // pwd node pwdelement = loginxml.createelement("pwd"); //注释8 pwdnode = loginxml.createtextnode("pwd"); pwdnode.nodevalue = _root.userpwd; pwdelement.appendchild(pwdnode); //注释9 loginelement.appendchild(nameelement); //注释10 loginelement.appendchild(pwdelement); loginxml.appendchild(loginelement); //注释11 xmlrepley = new xml(); //注释12 xmlrepley.onload = onloginreply; //注释13 function onloginreply(success) { if (success) { if (xmlrepley.firstchild.firstchild.attributes.right == "1") { //注释14 _root.gotoandplay("main"); } else { _root.username = "登陆失败"; } } } loginxml.sendandload("http://localhost/xmlchat/login.asp", xmlrepley); //注释15 } |
注释1：检查输入框中用户名的长度，如为空，则默认为guest。
注释2：检查输入框中密码的长度。
注释3：新建一个xml对象，这是用来发送到服务器端的。
注释4：创建一个login结点对象。
注释5：创建一个username结点对象，注意不能直接在element对象中放置文本内容，要在text node对象中才能放置文本内容。具体可以参见flash帮助文件中有关xml.createelement()和xml.createtextnode() 中的内容。
注释6：创建一个text node对象，用来放置username结点的文本内容。
注释7：将创建的text node结点插入到username结点对象中。
注释8：分别创建一个pwd结点对象和text node。
注释9：将text node结点插入到pwd结点对象中。
注释10：将username结点对象插入到login结点对象中，将pwd结点对象插入到login结点对象中。
注释11：将login结点对象插入到所创建的xml对象中，从而构造一个完整的xml对象。注意这里在构建xml对象时，是从最里面开始构建的。
注释12：新建一个xml对象，这里是用来放置接收到的xml对象的。
注释13：设置接收xml对象的响应函数，当服务器端返回xml对象的时候触发。
注释14：判断返回的xml对象中的结点属性是否符合要求。
注释15：利用sendandload()函数，将flash端的xml对象发送到服务器端，并接收从服务器端返回的xml对象。
c、asp部分
1、新建一个文件，命名为global.asa，输入如下内容：
| <script language="vbscript" runat="server"> sub application_onstart application("visitornum")=0 application("visitorname")="" application("allcansee")="" end sub </script> |
<% set objdom = server.createobject("microsoft.xmldom") ‘注释4 set objpwd = objdom.documentelement.selectsinglenode("//login/pwd") ‘注释8 righ = "-1" '返回 |
注释1：利用filesystemobject组件建立一个文件对象，将通讯过程中传送的东西写在文件里面，方便调试。
注释2：注意根据实际需要修改文件的路径。
注释3：把request.form是传送进来的所有内容都写在文件里面，在服务器端留下调试痕迹。可以用日志模式进一步完善此功能。
注释4：创建一个xml对象。可以在ms xml包中找到更多有关xml操作的信息。
注释5：通过loadxml()函数，导入flash端传送进来的xml格式字符串。
注释6：建立username结点的对象。
注释7：取得username结点的内容。
注释8：建立pwd结点的对象，取得pwd结点的内容。
注释9：建立一个数据库connection集合。
注释10：建立一个数据库的ado连接，这里用到的是access 2000数据库，数据库的格式见后面的附录，请注意数据库的存放位置。
注释11：建立一个数据库recordset集合。
注释12：根据取得的用户名和密码，构造一个sql字符串。
注释13：判断查询结果是否为空。
注释14：将用户名和id号添加到application("visitorname")对象中。
注释15：将登陆信息添加到application("allcansee")对象中。
注释16：关闭数据库连接，释放资源。
注释17：直接构造一个xml字符串，并通过write函数写到flash端。
发送部分的基本原理是从flash端发送xml格式的聊天内容到服务器端，在服务器端将聊天内容添加到application("allcansee")对象中，并将修改后的application("allcansee")对象的内容用xml格式返回到flash端。
a、传递的xml
1、请求报文
| <send><username>用户名</username><content>发送内容</content></send> |
| <send><result sflag="true" scontent="聊天室显示的内容">用户名</result></send> |
b、flash部分
1、在主场景的第5帧中添加关键帧，将此帧命名为“main”，在帧的action面板中增加下面的语句：
| now = new date(); //注释1 starttime = now.gettime(); stop(); |
注释1：这是为了在下面计算在线时间用的。
2、在主场景中拉一个文本框，属性设置如图2所示。
3、在主场景main帧中增加一个button，显示的内容为“发送”。在button的action面板上面增加如下语句：
| on (release) { if (length(_root.txtsend) == 0) { //注释1 _root.txtsend = "内容为空"; } sendxml = new xml(); //注释2 sendelement = sendxml.createelement("send"); //注释3 // name node nameelement = sendxml.createelement("username"); //注释4 namenode = sendxml.createtextnode("name"); //注释5 namenode.nodevalue = _root.username; nameelement.appendchild(namenode); //注释6 // content node cntelement = sendxml.createelement("content"); //注释7 cntnode = sendxml.createtextnode("cnt"); //注释8 cntnode.nodevalue = _root.txtsend; cntelement.appendchild(cntnode); //注释9 sendelement.appendchild(nameelement); //注释10 sendelement.appendchild(cntelement); sendxml.appendchild(sendelement); //注释11 xmlsendrepley = new xml(); //注释12 xmlsendrepley.onload = onsendreply; //注释13 function onsendreply (success) { if (success) { if (xmlsendrepley.firstchild.firstchild.attributes.sflag == "true") { //注释14 _root.txtcontent = xmlsendrepley.firstchild.firstchild.attributes.scontent; //注释15 }else { _root.txtcontent = "连接超时……"; } } } sendxml.sendandload("http://localhost/xmlchat/send.asp", xmlsendrepley); //注释16 } |
注释1：判断发送的内容是否为空。
注释2：创建一个用于发送的xml对象。
注释3：创建一个send结点对象。
注释4：创建一个username结点对象。
注释5：创建一个text node对象，用于存放用户名。
注释6：将创建的text node对象添加到username结点对象中。
注释7：创建一个content结点对象。
注释8：创建一个text node对象，用于存放要发送的内容。
注释9：将创建的text node对象添加到content结点对象中。
注释10：将创建的username和content对象添加到send结点对象中。
注释11：将创建的send结点对象添加到send对象中。
注释12：创建一个用于接收的xml对象。
注释13：设置接收xml对象的响应函数。
注释14：判断从服务器返回的值，根据判断结果做相应的操作。
注释15：将聊天室的内容显示出来。
注释16：利用sendandload()函数，将flash端的xml对象发送到服务器端，并接收从服务器端返回的xml对象
c、asp部分
新建一个空白文件，命名为send.asp，其内容如下：
<% set objdom = server.createobject("microsoft.xmldom") ‘注释3 set objcnt = objdom.documentelement.selectsinglenode("//send/content") ‘注释6 tempstr= username & " say: " & content & "..." '返回 |
注释1：利用filesystemobject组件建立一个文件对象，将通讯过程中传送的东西写在文件里面，方便调试。
注释2：把request.form是传送进来的所有内容都写在文件里面，在服务器端留下调试痕迹。
注释3：创建一个xml对象。
注释4：通过loadxml()函数，导入flash端传送进来的xml格式字符串。
注释5：建立username结点的对象，取得相应内容。
注释6：建立content结点的对象，取得相应内容。
注释7：将从flash端发送过来的内容添加到application("allcansee")对象中。
注释8：直接构造一个xml字符串，并通过write函数写到flash端。
显示聊天内容的基本原理是从flash端发送要显示聊天内容的xml请求，在服务器端将application("allcansee")的内容按xml格式发送到flash端，在flash端解释和显示出来。
显示在线人数名单的基本原理是在flash端发送显示在线人数名单的xml请求，服务器端将application("visitorname")对象的内容按xml格式发送到flash端，在flash端解释和显示出来。
a、传递的xml
1、请求报文
| <refresh><username>用户名</username></refresh> |
2、响应报文
| <refresh><result cflag="true" ccontent="聊天内容" talker="在线人员名单">用户名</result></refresh> |
b、flash部分
1、在主场景中拉一个文本框，属性设置如图3所示。
2、从组件库里面选择list组件，在场景中拉一个list，命名为“talkerlist”。此时场景中的布局应该如图4所示。
3、在主场景main帧中增加一个button，显示的内容为“刷新”。在button的action面板上面增加如下语句：
| on (release) { refreshxml = new xml(); //注释1 refreshelement = refreshxml.createelement("refresh"); //注释2 // name node nameelement = refreshxml.createelement("username"); //注释3 namenode = refreshxml.createtextnode("name"); //注释4 namenode.nodevalue = _root.username; nameelement.appendchild(namenode); //注释5 refreshelement.appendchild(nameelement); //注释6 refreshxml.appendchild(refreshelement); xmlrefreshrepley = new xml(); //注释7 xmlrefreshrepley.onload = onrefreshreply; //注释8 function onrefreshreply(success) { if (success) { if (xmlrefreshrepley.firstchild.firstchild.attributes.cflag == "true") { //注释9 _root.txtcontent = xmlrefreshrepley.firstchild.firstchild.attributes.ccontent; //注释10 strtalker = xmlrefreshrepley.firstchild.firstchild.attributes.talker; _root.talkerlist.removeall(); //注释11 if (strtalker.length>0) { //注释12 talkerarray = new array(); //注释13 temparray = new array(); talkerarray = strtalker.split(";"); //注释14 for (i=0; i<talkerarray.length-1; i++) { //注释15 temparray = talkerarray[i].split(","); //注释16 _root.talkerlist.additem(temparray[0], temparray[1]); //注释17 } } } else { _root.txtcontent = "连接超时……"; } } } refreshxml.sendandload("http://localhost/xmlchat/refresh.asp", xmlrefreshrepley); //注释18 } |
注释1：创建一个用于发送的xml对象。
注释2：创建一个refresh结点对象。
注释3：创建一个username结点对象。
注释4：创建一个text node对象，用于存放用户名。
注释5：将创建的text node对象添加到username结点对象中。
注释6：将创建的username对象添加到refresh结点对象中。
注释7：创建一个用于接收的xml对象。
注释8：设置接收xml对象的响应函数。
注释9：判断从服务器返回的值，根据判断结果做相应的操作。
注释10：将聊天室的内容显示出来。
注释11：将场景中的下拉列表中的内容清空。
注释12：判断从服务器端返回的在线名单是否为空。
注释13：创建两个数组，用来操作在线用户名单。
注释14：调用string的split函数，将分割后的string保存到数组中。
注释15：循环读取数组里面的string，继续分割。
注释16：调用string的split函数，将分割后的string保存到数组中。
注释17：将分割后取得的用户名和id号，都添加到场景中的下拉列表中。
注释18：利用sendandload()函数，将flash端的xml对象发送到服务器端，并接收从服务器端返回的xml对象。
c、asp部分
新建一个文件，命名为refresh.asp，添加如下内容：
<% set objdom = server.createobject("microsoft.xmldom") ‘注释4 '返回 |
注释1：利用filesystemobject组件建立一个文件对象，将通讯过程中传送的东西写在文件里面，方便调试。
注释2：创建一个文件。
注释3：把request.form是传送进来的所有内容都写在文件里面，在服务器端留下调试痕迹。
注释4：创建一个xml对象。
注释5：通过loadxml()函数，导入flash端传送进来的xml格式字符串。
注释6：建立username结点的对象，取得相应内容。
注释7：根据聊天室内容和在线人员名单构造一个xml字符串，并通过write函数写到flash端
flash中的时间功能已经足够强大，单凭flash端就可以计算在线时间。不断地用当前时间去减记录下来的开始时间，并显示出来，就是在线时间了。
a、flash部分
1、在主场景中拉一个文本框，属性设置如图5所示。
2、按“ctrl + f8”新建一个空白的movie clip，将此clip拖到场景中，并在此clip的action面板上面增加如下语句（注意是在场景中的clip上面，不是在clip里面）：
| onclipevent (load) { timedate = new date(); } onclipevent (enterframe) { //注释1 mytime = timedate.gettime(); //注释2 _root.txttime = "您共在线 " + math.round((math.ceil((mytime - _root.starttime)/1000)/60)) + " 分钟"; //注释3 delete timedate; //注释4 timedate = new date(); //注释5 } |
注释1：当clip的帧从头播放的时候触发。
注释2：取得当前时间。
注释3：将统计所得的秒转换成分钟，并显示出来。
注释4：删除当前的时间对象。
注释5：重新构造一个时间对象，这样就可以不断的取得最新的时间。
聊天室中，管理功能是必不可少的，这里以简单的“踢人”功能为例来说明一下。
a、传递的xml
1、请求报文
| <kick><id>要踢的用户名和id串</id></kick> |
2、响应报文
| <refresh><result kflag="true" ccontent="聊天室内容" talker="在线人员列表">用户名</result></refresh> |
b、flash部分
1、在场景中新建一个button，显示的内容为“踢人”，在button的action面板上面增加如下语句：
on (release) { namenode.nodevalue = _root.talkerlist.selecteditem.label + "," +_root.talkerlist.selecteditem.data + ";"; //注释5 |
c、asp部分
新建一个文件，命名为kick.asp，在文件中添加如下内容：
<% set objdom = server.createobject("microsoft.xmldom") ‘注释4 '返回 |
注释1：利用filesystemobject组件建立一个文件对象，将通讯过程中传送的东西写在文件里面，方便调试。
注释2：创建一个文件。
注释3：把request.form是传送进来的所有内容都写在文件里面，在服务器端留下调试痕迹。
注释4：创建一个xml对象。
注释5：通过loadxml()函数，导入flash端传送进来的xml格式字符串。
注释6：建立id结点的对象，取得相应内容。
注释7：这几步是处理“踢人”的动作，在这里只是简单地把要踢的用户从在线用户名单中删除，更严格的“踢人”可以把要踢的用户的ip地址写数据库中，只到管理员解开为止。
注释8：直接构造一个xml字符串，并通过write函数写到flash端。
1、开发环境介绍
系统的开发环境为win 2k + flash mx 2004 + iis 6.0 + ie 6.0 + 记事本。在iis中所设置的虚拟目录的名称为xmlchat。
2、涉及的数据库
系统用到的数据库为access 2000，数据库中只有一个用户表userinfo，表中的字段为：id、username、pwd、right。
点击这里下载源文件
2、在第一帧的场景中用文本工具拉两个文本框，类型都为“input type”，变量名var分别设置为“username”、“userpwd”，这是用来输入用户名跟密码的。3、新建一个button并拖到第一帧的场景中，摆放位置如图1所示。并在这个button的actionscript面板中增加如下语句：
| on (release) { if (length(_root.username) == 0) { //注释1 _root.username = "guest"; } else if (length(_root.userpwd) == 0) { //注释2 _root.username = "guest"; } loginxml = new xml(); //注释3 loginelement = loginxml.createelement("login"); //注释4 // name node nameelement = loginxml.createelement("username"); //注释5 namenode = loginxml.createtextnode("name"); //注释6 namenode.nodevalue = _root.username; nameelement.appendchild(namenode); //注释7 // pwd node pwdelement = loginxml.createelement("pwd"); //注释8 pwdnode = loginxml.createtextnode("pwd"); pwdnode.nodevalue = _root.userpwd; pwdelement.appendchild(pwdnode); //注释9 loginelement.appendchild(nameelement); //注释10 loginelement.appendchild(pwdelement); loginxml.appendchild(loginelement); //注释11 xmlrepley = new xml(); //注释12 xmlrepley.onload = onloginreply; //注释13 function onloginreply(success) { if (success) { if (xmlrepley.firstchild.firstchild.attributes.right == "1") { //注释14 _root.gotoandplay("main"); } else { _root.username = "登陆失败"; } } } loginxml.sendandload("http://localhost/xmlchat/login.asp", xmlrepley); //注释15 } |
注释1：检查输入框中用户名的长度，如为空，则默认为guest。
注释2：检查输入框中密码的长度。
注释3：新建一个xml对象，这是用来发送到服务器端的。
注释4：创建一个login结点对象。
注释5：创建一个username结点对象，注意不能直接在element对象中放置文本内容，要在text node对象中才能放置文本内容。具体可以参见flash帮助文件中有关xml.createelement()和xml.createtextnode() 中的内容。
注释6：创建一个text node对象，用来放置username结点的文本内容。
注释7：将创建的text node结点插入到username结点对象中。
注释8：分别创建一个pwd结点对象和text node。
注释9：将text node结点插入到pwd结点对象中。
注释10：将username结点对象插入到login结点对象中，将pwd结点对象插入到login结点对象中。
注释11：将login结点对象插入到所创建的xml对象中，从而构造一个完整的xml对象。注意这里在构建xml对象时，是从最里面开始构建的。
注释12：新建一个xml对象，这里是用来放置接收到的xml对象的。
注释13：设置接收xml对象的响应函数，当服务器端返回xml对象的时候触发。
注释14：判断返回的xml对象中的结点属性是否符合要求。
注释15：利用sendandload()函数，将flash端的xml对象发送到服务器端，并接收从服务器端返回的xml对象。
c、asp部分
1、新建一个文件，命名为global.asa，输入如下内容：
| <script language="vbscript" runat="server"> sub application_onstart application("visitornum")=0 application("visitorname")="" application("allcansee")="" end sub </script> |
<% set objdom = server.createobject("microsoft.xmldom") ‘注释4 set objpwd = objdom.documentelement.selectsinglenode("//login/pwd") ‘注释8 righ = "-1" '返回 |
注释1：利用filesystemobject组件建立一个文件对象，将通讯过程中传送的东西写在文件里面，方便调试。
注释2：注意根据实际需要修改文件的路径。
注释3：把request.form是传送进来的所有内容都写在文件里面，在服务器端留下调试痕迹。可以用日志模式进一步完善此功能。
注释4：创建一个xml对象。可以在ms xml包中找到更多有关xml操作的信息。
注释5：通过loadxml()函数，导入flash端传送进来的xml格式字符串。
注释6：建立username结点的对象。
注释7：取得username结点的内容。
注释8：建立pwd结点的对象，取得pwd结点的内容。
注释9：建立一个数据库connection集合。
注释10：建立一个数据库的ado连接，这里用到的是access 2000数据库，数据库的格式见后面的附录，请注意数据库的存放位置。
注释11：建立一个数据库recordset集合。
注释12：根据取得的用户名和密码，构造一个sql字符串。
注释13：判断查询结果是否为空。
注释14：将用户名和id号添加到application("visitorname")对象中。
注释15：将登陆信息添加到application("allcansee")对象中。
注释16：关闭数据库连接，释放资源。
注释17：直接构造一个xml字符串，并通过write函数写到flash端。
发送部分的基本原理是从flash端发送xml格式的聊天内容到服务器端，在服务器端将聊天内容添加到application("allcansee")对象中，并将修改后的application("allcansee")对象的内容用xml格式返回到flash端。
a、传递的xml
1、请求报文
| <send><username>用户名</username><content>发送内容</content></send> |
| <send><result sflag="true" scontent="聊天室显示的内容">用户名</result></send> |
b、flash部分
1、在主场景的第5帧中添加关键帧，将此帧命名为“main”，在帧的action面板中增加下面的语句：
| now = new date(); //注释1 starttime = now.gettime(); stop(); |
注释1：这是为了在下面计算在线时间用的。
2、在主场景中拉一个文本框，属性设置如图2所示。
3、在主场景main帧中增加一个button，显示的内容为“发送”。在button的action面板上面增加如下语句：
| on (release) { if (length(_root.txtsend) == 0) { //注释1 _root.txtsend = "内容为空"; } sendxml = new xml(); //注释2 sendelement = sendxml.createelement("send"); //注释3 // name node nameelement = sendxml.createelement("username"); //注释4 namenode = sendxml.createtextnode("name"); //注释5 namenode.nodevalue = _root.username; nameelement.appendchild(namenode); //注释6 // content node cntelement = sendxml.createelement("content"); //注释7 cntnode = sendxml.createtextnode("cnt"); //注释8 cntnode.nodevalue = _root.txtsend; cntelement.appendchild(cntnode); //注释9 sendelement.appendchild(nameelement); //注释10 sendelement.appendchild(cntelement); sendxml.appendchild(sendelement); //注释11 xmlsendrepley = new xml(); //注释12 xmlsendrepley.onload = onsendreply; //注释13 function onsendreply (success) { if (success) { if (xmlsendrepley.firstchild.firstchild.attributes.sflag == "true") { //注释14 _root.txtcontent = xmlsendrepley.firstchild.firstchild.attributes.scontent; //注释15 }else { _root.txtcontent = "连接超时……"; } } } sendxml.sendandload("http://localhost/xmlchat/send.asp", xmlsendrepley); //注释16 } |
注释1：判断发送的内容是否为空。
注释2：创建一个用于发送的xml对象。
注释3：创建一个send结点对象。
注释4：创建一个username结点对象。
注释5：创建一个text node对象，用于存放用户名。
注释6：将创建的text node对象添加到username结点对象中。
注释7：创建一个content结点对象。
注释8：创建一个text node对象，用于存放要发送的内容。
注释9：将创建的text node对象添加到content结点对象中。
注释10：将创建的username和content对象添加到send结点对象中。
注释11：将创建的send结点对象添加到send对象中。
注释12：创建一个用于接收的xml对象。
注释13：设置接收xml对象的响应函数。
注释14：判断从服务器返回的值，根据判断结果做相应的操作。
注释15：将聊天室的内容显示出来。
注释16：利用sendandload()函数，将flash端的xml对象发送到服务器端，并接收从服务器端返回的xml对象
c、asp部分
新建一个空白文件，命名为send.asp，其内容如下：
<% set objdom = server.createobject("microsoft.xmldom") ‘注释3 set objcnt = objdom.documentelement.selectsinglenode("//send/content") ‘注释6 tempstr= username & " say: " & content & "..." '返回 |
注释1：利用filesystemobject组件建立一个文件对象，将通讯过程中传送的东西写在文件里面，方便调试。
注释2：把request.form是传送进来的所有内容都写在文件里面，在服务器端留下调试痕迹。
注释3：创建一个xml对象。
注释4：通过loadxml()函数，导入flash端传送进来的xml格式字符串。
注释5：建立username结点的对象，取得相应内容。
注释6：建立content结点的对象，取得相应内容。
注释7：将从flash端发送过来的内容添加到application("allcansee")对象中。
注释8：直接构造一个xml字符串，并通过write函数写到flash端。
显示聊天内容的基本原理是从flash端发送要显示聊天内容的xml请求，在服务器端将application("allcansee")的内容按xml格式发送到flash端，在flash端解释和显示出来。
显示在线人数名单的基本原理是在flash端发送显示在线人数名单的xml请求，服务器端将application("visitorname")对象的内容按xml格式发送到flash端，在flash端解释和显示出来。
a、传递的xml
1、请求报文
| <refresh><username>用户名</username></refresh> |
2、响应报文
| <refresh><result cflag="true" ccontent="聊天内容" talker="在线人员名单">用户名</result></refresh> |
b、flash部分
1、在主场景中拉一个文本框，属性设置如图3所示。
2、从组件库里面选择list组件，在场景中拉一个list，命名为“talkerlist”。此时场景中的布局应该如图4所示。
3、在主场景main帧中增加一个button，显示的内容为“刷新”。在button的action面板上面增加如下语句：
| on (release) { refreshxml = new xml(); //注释1 refreshelement = refreshxml.createelement("refresh"); //注释2 // name node nameelement = refreshxml.createelement("username"); //注释3 namenode = refreshxml.createtextnode("name"); //注释4 namenode.nodevalue = _root.username; nameelement.appendchild(namenode); //注释5 refreshelement.appendchild(nameelement); //注释6 refreshxml.appendchild(refreshelement); xmlrefreshrepley = new xml(); //注释7 xmlrefreshrepley.onload = onrefreshreply; //注释8 function onrefreshreply(success) { if (success) { if (xmlrefreshrepley.firstchild.firstchild.attributes.cflag == "true") { //注释9 _root.txtcontent = xmlrefreshrepley.firstchild.firstchild.attributes.ccontent; //注释10 strtalker = xmlrefreshrepley.firstchild.firstchild.attributes.talker; _root.talkerlist.removeall(); //注释11 if (strtalker.length>0) { //注释12 talkerarray = new array(); //注释13 temparray = new array(); talkerarray = strtalker.split(";"); //注释14 for (i=0; i<talkerarray.length-1; i++) { //注释15 temparray = talkerarray[i].split(","); //注释16 _root.talkerlist.additem(temparray[0], temparray[1]); //注释17 } } } else { _root.txtcontent = "连接超时……"; } } } refreshxml.sendandload("http://localhost/xmlchat/refresh.asp", xmlrefreshrepley); //注释18 } |
注释1：创建一个用于发送的xml对象。
注释2：创建一个refresh结点对象。
注释3：创建一个username结点对象。
注释4：创建一个text node对象，用于存放用户名。
注释5：将创建的text node对象添加到username结点对象中。
注释6：将创建的username对象添加到refresh结点对象中。
注释7：创建一个用于接收的xml对象。
注释8：设置接收xml对象的响应函数。
注释9：判断从服务器返回的值，根据判断结果做相应的操作。
注释10：将聊天室的内容显示出来。
注释11：将场景中的下拉列表中的内容清空。
注释12：判断从服务器端返回的在线名单是否为空。
注释13：创建两个数组，用来操作在线用户名单。
注释14：调用string的split函数，将分割后的string保存到数组中。
注释15：循环读取数组里面的string，继续分割。
注释16：调用string的split函数，将分割后的string保存到数组中。
注释17：将分割后取得的用户名和id号，都添加到场景中的下拉列表中。
注释18：利用sendandload()函数，将flash端的xml对象发送到服务器端，并接收从服务器端返回的xml对象。
c、asp部分
新建一个文件，命名为refresh.asp，添加如下内容：
<% set objdom = server.createobject("microsoft.xmldom") ‘注释4 '返回 |
注释1：利用filesystemobject组件建立一个文件对象，将通讯过程中传送的东西写在文件里面，方便调试。
注释2：创建一个文件。
注释3：把request.form是传送进来的所有内容都写在文件里面，在服务器端留下调试痕迹。
注释4：创建一个xml对象。
注释5：通过loadxml()函数，导入flash端传送进来的xml格式字符串。
注释6：建立username结点的对象，取得相应内容。
注释7：根据聊天室内容和在线人员名单构造一个xml字符串，并通过write函数写到flash端
flash中的时间功能已经足够强大，单凭flash端就可以计算在线时间。不断地用当前时间去减记录下来的开始时间，并显示出来，就是在线时间了。
a、flash部分
1、在主场景中拉一个文本框，属性设置如图5所示。
2、按“ctrl + f8”新建一个空白的movie clip，将此clip拖到场景中，并在此clip的action面板上面增加如下语句（注意是在场景中的clip上面，不是在clip里面）：
| onclipevent (load) { timedate = new date(); } onclipevent (enterframe) { //注释1 mytime = timedate.gettime(); //注释2 _root.txttime = "您共在线 " + math.round((math.ceil((mytime - _root.starttime)/1000)/60)) + " 分钟"; //注释3 delete timedate; //注释4 timedate = new date(); //注释5 } |
注释1：当clip的帧从头播放的时候触发。
注释2：取得当前时间。
注释3：将统计所得的秒转换成分钟，并显示出来。
注释4：删除当前的时间对象。
注释5：重新构造一个时间对象，这样就可以不断的取得最新的时间。
聊天室中，管理功能是必不可少的，这里以简单的“踢人”功能为例来说明一下。
a、传递的xml
1、请求报文
| <kick><id>要踢的用户名和id串</id></kick> |
2、响应报文
| <refresh><result kflag="true" ccontent="聊天室内容" talker="在线人员列表">用户名</result></refresh> |
b、flash部分
1、在场景中新建一个button，显示的内容为“踢人”，在button的action面板上面增加如下语句：
on (release) { namenode.nodevalue = _root.talkerlist.selecteditem.label + "," +_root.talkerlist.selecteditem.data + ";"; //注释5 |
c、asp部分
新建一个文件，命名为kick.asp，在文件中添加如下内容：
<% set objdom = server.createobject("microsoft.xmldom") ‘注释4 |