Making voice chat room with agent+asp technology
--------------------the following for program content, sorted by the order in which the article appears
<!--define "Agentcontrol"-->
<object classid=clsid:d45fd31b-5c6e-11d1-9ec1-00c04fd7081f
codebase= #VERSION =2,0,0,0 id=agent>
</OBJECT>
<!--definition L&h TruVoice text-to-speech American 中文版-->
<object classid=clsid:b8f2846e-ce36-11d0-ac83-00c04fd97575
codebase= #VERSION =6,0,0,0 id=truvoice width= "height=" >
</OBJECT>
______________________________________________________________
Attempt to load from Microsoft Agent role directory
Set Loadrequestunc = Agent.Characters.Load ("Peedy", "Peedy.acs")
If loadrequestunc.status <> 0 Then
' If you fail, try downloading from Microsoft server
Set Loadrequesturl = Agent.Characters.Load ("Peedy", "HTTP://AGENT.MICROSOFT.COM/AGENT2/CHARS/PEEDY/PEEDY.ACF")
Else
' Now generates a Peedy instance
Set Peedy = agent.characters ("Peedy")
End If
_____________________________________________________________
<HTML>
<BODY>
<form method= "POST" action= "Default.asp" >
<p align= "center" >your Name please:
<input type= "text" name= "txtUserName" size= ">"
<input type= "Submit" value= "OK" name= "Btnok" ></p>
</FORM>
<p align= "center" ><a href= "download.htm" >click here to go download page.</a></p>
</BODY>
</HTML>
_______________________________________________________________________
<script Language=vbscript runat=server>
Sub Application_OnStart
Application ("message") = "" ' Speech content