欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

用Agent+ASP技术制作语音聊天室

程序员文章站 2022-11-18 12:38:47
用agent+asp技术制作语音聊天室--------------------以下为程序内容,按文章中出现的顺序分块排序
用agent+asp技术制作语音聊天室
--------------------以下为程序内容,按文章中出现的顺序分块排序

<!--定义"agentcontrol"-->
<object classid=clsid:d45fd31b-5c6e-11d1-9ec1-00c04fd7081f
codebase=#version=2,0,0,0 id=agent>
</object>

<!--定义l&h truvoice text-to-speech american english -->
<object classid=clsid:b8f2846e-ce36-11d0-ac83-00c04fd97575
codebase=#version=6,0,0,0 id=truvoice width="14" height="14">
</object>
______________________________________________________________

尝试从微软agent角色目录中装载
set loadrequestunc = agent.characters.load ("peedy", "peedy.acs")

  if loadrequestunc.status <> 0 then
     如果失败便尝试从微软服务器下载
    set loadrequesturl = agent.characters.load ("peedy", "https://agent.microsoft.com/agent2/chars/peedy/peedy.acf")
  else
     现在产生一个peedy实例
    set peedy = agent.characters("peedy")
  end if
_____________________________________________________________

<html>
<body>
<h3 align="center"><font color="#0000ff">welcome to my chatroom!</font></h3>
<form method="post" action="default.">
  <p align="center">your name please:
  <input type="text" name="txtusername" size="20">
  <input type="submit" value="ok" name="btnok"></p>
</form>
<p align="center"><a href="download.htm">click here to go to download page.</a></p>
</body>
</html>
_______________________________________________________________________

<script language=vbscript runat=server>
sub application_onstart
    application("message")=""     发言内容
    application("expression")=""  表情
    application("sender")=""      发言者id
    application("globalid")=0     发言总序号
end sub
</script>
_______________________________________________________________________
<%
  session("username") = server.htmlencode(request.form("txtusername"))
  session("personalid")=0
%>
<html>
<head>
<title>welcome to my chatroom!</title>
</head>
<frameset border=0 framespacing=0 cols="98,*" frameborder=0>
  <frame name="agent" src="agent.asp">
  <frameset rows="196,68,*">
    <frame name="display" src="display.asp">
    <frame name="refresh" src="refresh.asp">
    <frame name="message" src="message.asp">
  </frameset>
</frameset>
<frameset>
</frameset>
</html>
________________________________________________________________

<html>
<body bgcolor="#006699" text="#ffffff">
<!--定义"agentcontrol"-->
<object classid=clsid:d45fd31b-5c6e-11d1-9ec1-00c04fd7081f
codebase=#version=2,0,0,0 id=agent>