ASP网页编程之ASP编程进门进阶（十一）：Chat 谈天程...
帮助用户快速实现各种应用服务，ASP商有整合各方面资源的能力，可在短期内为用户提供所需的解决方案。例如，典型的ERP安装，如果要在客户端安装的话需要半年到二年的时间，但是美国的一些ASP商如USI和CORIO能在90—120天内提供ERP应用方案。编程|程序一般的谈天室所接纳的程序，也就是Chat程序了，其基础布局道理是不会接纳到数据库的。那事实接纳甚么手艺呢？我们晓得ASP变量傍边Session变量的感化是纪录单个用户的信息，而且能跟踪用户的举动。Application工具的感化则起的全局变量，能够完成站点多个用户之间在页面中共享信息的。
那能够设想，在针对以后谈天程序中，一个谈天成员即为一个Session变量，谈天成员之间的会话则当做Application变量举行共享显现，以使各成员都能瞥见。
那上面就接纳一很典范的实例程序，举行懂得和剖析。
1，chat.asp
<%IfRequest.ServerVariables("Request_Method")="GET"then%><formmethod="post"action="chat.asp"><inputtype="text"name="nick"value="yournickname"><p><inputtype="submit"value="comein"><p><inputtype="hidden"name="log"size="20"value="1"></form><%Response.EndElseResponse.cleardimtalkIfRequest.Form("nick")""thenSession("nick")=Request.Form("nick")Endif%><formmethod="post"action="chat.asp"name=form1><%=Session("nick")%>措辞：<inputtype="text"name="talk"size="50"><br><inputtype="submit"value="提交"><inputtype="reset"value="作废"></p></form><ahref="chat.asp">分开</a><br><%IfRequest.Form("log")1thenIftrim(Request.Form("talk"))=""thentalk=Session("nick")&"不说一句话就想来唐塞人人"Elsetalk=trim(Request.Form("talk"))EndIfApplication.lockApplication("show")="来自"&Request.ServerVariables("remote_addr")&"的_"&Session("nick")&"在"&time&"的时分说："&talk&"<br>"&Application("show")Application.UnLockResponse.WriteApplication("show")Endif%>
复杂注释：
1，<%IfRequest.ServerVariables("Request_Method")="GET"then%>的感化就是判别以后页面承受的体例，假如为GET体例则会显现“请求输出昵称”的表单页。由于页面的沉默承受体例为GET，当在URL地点栏间接敲进时，也就是没有任何信息的时分，就应当显现请求“输出昵称”。
2，<inputtype="hidden"name="log"size="20"value="1">和上面的IfRequest.Form("log")1then是有联系关系的：明显第一次输出昵称进进，一样将log埋没域发送。但作为第一次的进进是无任何语句讲话的，以是判别承受的log值不为1，亦即非初次登录（暗示已登录）时，实行外部相干谈天显现程序。
3，trim(Request.Form("talk"))=""，trim就是个函数了：删往字符串前，后的空格。初此，另有rtrim()：往失落字符串后的空格；ltrim()：往失落字符串前的空格。
<scriptlanguage=vbs>cnbruce="ThisisaTest！"alert("全体显现："&cnbruce)alert("删除后面空格："<rim(cnbruce))alert("删除前面空格："&rtrim(cnbruce))alert("删除前后空格："&trim(cnbruce))</script>
Application.lockApplication("show")="来自"&Request.ServerVariables("remote_addr")&"的_"&Session("nick")&"在"&time&"的时分说："&talk&"<br>"&Application("show")Application.UnLock
提取精髓得：
Application.lockApplication("show")=talk&"<br>"&Application("show")Application.UnLock
能够看到是Application变量的叠加功效，每次Application("show")的值都创建在原有Application变量值的基本之上，再附加上最新的谈天内容：talk变量的值。如许就包管一切用户都能看到的共享信息了。
</p>由于ASP提供的是一对多的服务，所以用户的一些特殊需求很难得到满足。 不能只是将它停留在纸上谈兵的程度上。 ASP主要是用好六个对象，其实最主要的是用好其中两个：response和request，就可以随心所欲地控制网页变换和响应用户动作了。 以上是语言本身的弱点，在功能方面ASP同样存在问题，第一是功能太弱，一些底层操作只能通过组件来完成，在这点上是远远比不上PHP/JSP，其次就是缺乏完善的纠错/调试功能，这点上ASP/PHP/JSP差不多。 ASP（ActiveServerPages）是Microsfot公司1996年11月推出的WEB应用程序开发技术，它既不是一种程序语言，也不是一种开发工具，而是一种技术框架，不须使用微软的产品就能编写它的代码，能产生和执行动态、交互式、高效率的站占服务器的应用程序。 下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助... 我们必须明确一个大方向，不要只是停留在因为学而去学,我们应有方向应有目标. 我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。 如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。
页:
[1]