|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
帮助用户快速实现各种应用服务,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提供的是一对多的服务,所以用户的一些特殊需求很难得到满足。 |
|