ASP编程：谈天室完成私聊(一)

缺点:安全性不是太差了，还行，只要你充分利用系统自带的工具;唯一缺点就是执行效率慢，如何进行网站优化以后，效果会比较好。谈天室几个要好的网友在谈天室里闲谈的时侯，总会赶上有些话题是不想统一谈天室内其余聊友瞥见的，那末谈天室撑持悄然话功效将是什分有需要的了，完成悄然话的办法良多，如今小虎先容一下使用session工具来完成它，用session工具来完成悄然话，是有优弱点的，由于session工具的使用，实在就是客户端cookies的利用。假如客户端cookies不撑持或封闭了，那末程序运转起来就有成绩了。那末利用session工具就没优点了吗？？非也，最少在编程上年夜年夜削减了事情量嘛，试想一下假如必要保留该用户的谈天名字，那末利用session工具就可以间接保留他的名字了，假如没有session工具。办理的办法看来就只要在处置讲话的FORM里设几个隐含的textbox工具来保留，如许处置起来会比教烦锁，但优点是通用性广，就算扫瞄器不撑持cookies仍旧可用。

说到这里，年夜伙无妨尝尝网上浩瀚的ASP谈天室，试把扫瞄器的平安选项（老是承受cookies关了）看看谁人谈天室仍旧一般地能利用。谁人就成绩百出来。。呵呵～～不要找小虎的谈天室来试哦....我的谈天室也必要cookies来撑持的。不必session工具编程真是烦锁良多。并且年夜部分扫瞄器的平安设置的默许值是老是承受cookies。以是也不必太但心，只要少部分的用户是比教出格的。

如今从谈天室的讲话入手下手，各处剃头言，显现讲话，一步一步地让人人懂得一下是怎样处置的，最初就加上悄然话功效

　　起首，我们的谈天室次要供应以下元素：讲话人（你的名字），举措（叫唤，抱抱...等），工具（这句话是向谁说的呢？），讲话内容等四年夜元素。

　　个中讲话人（你的谈天名字）的名字是保留在讲话FORM的user埋没文本框中，如许每当讲话的时侯，在处置讲话的says.asp程序里，就能够用request.form("user")来获得谈天名字。而举措则是由下拉框action来供应的，你能够自界说良多的举措范例，以满意分歧聊友的必要。而讲话工具，也是由下拉框whoto来选定，这些名单是列出以后谈天室内一切用户的称号。怎样判别有新用户进谈天室和加入处置，这里先不说了。由于机关一个完全的谈天室要做的事情仍是挺多的。最初由一个says文本框供应讲话内容。

　　有了这几个次要的谈天元素。我们就能够举行讲话处置了。

　　请看看上面的程序片断

　

获得措辞内容,并过滤个中的剧本语句
usersays=request.form("says")
ifinstr(usersays,"<script")>0then
usersays=""
endif

判别是不是有发言内容，没有的话就不作处置

iflen(usersays)0then
session("whoto")=request.form("whoto")
session("action")=request.form("action")
ifinstr(usersays,chr(39))>0then
usersays=replace(usersays,chr(39),""&chr(39))
endif
ifinstr(usersays,chr(34))>0then
usersays=replace(usersays,chr(34),""&chr(34))
endif

application.lock

界说一个扳谈缓冲区，前面将给人人细心剖析一下

dimchats(20)
forn=1to20
chats(n)=application("chats")(n)
next
username=request.Form("user")


usertime=Time
usertime="("&right(usertime,8)&")"
user_whoto=request.Form("whoto")
user_action=request.Form("action")
ifapplication("counter")>19then
application("counter")=0
endif
不是私语就加一
ifrequest.form("action")"私语"then
application("counter")=application("zj_1counter")+1
counter=application("zj_1counter")
用户的举措处置

selectcaserequest.FORM("action")
case"措辞"
ifrequest.FORM("whoto")="ALL"then
chats(counter)="<fontcolor=blue>"&usertime&"</font><fontcolor=black>"&username&"</font>:<fontcolor=#0000aa>"&usersays&"</font><BR><BR>"
else
chats(counter)="<fontcolor=blue>"&usertime&"</font><fontcolor=black>"&username&"</font><I>与<fontcolor=#00bb00>"&request.FORM("whoto")&"</font>说</I>:<fontcolor=#0000aa>"&usersays&"</font><BR><BR>"
endif
case"叫唤"
chats(counter)="<fontcolor=blue>"&usertime&"</font><fontcolor=black>"&username&"</font><I>冲<fontcolor=#00bb00>"&request.FORM("whoto")&"</font>大呼</I>:<B><fontcolor=#0000aa>"&usersays&"</font></B><BR><BR>"
case"亲亲"
chats(counter)="<fontcolor=blue>"&usertime&"</font><fontcolor=black>"&username&"</font><I>亲了亲<fontcolor=#00bb00>"&request.FORM("whoto")&"</font>的面颊</I>:<fontcolor=#0000aa>"&usersays&"</font><BR><BR>"
case"拥抱"
chats(counter)="<fontcolor=blue>"&usertime&"</font><fontcolor=black>"&username&"</font><I>悄悄的抱着<fontcolor=#00bb00>"&request.FORM("whoto")&"</font></I>:<fontcolor=#0000aa>"&usersays&"</font><BR><BR>"
case"暴怒"
chats(counter)="<fontcolor=blue>"&usertime&"</font><fontcolor=black>"&username&"</font><I>朝<fontcolor=#00bb00>"&request.FORM("whoto")&"</font>横眉竖目道</I>:<fontcolor=#0000aa</p>在实现ERP等高端的ASP应用时，用户需要提供核心的经营资料，需要ASP商有很高的信用度。楼上说交互性不好，太牵强了吧。在微软提供的一套框架中，利用asp做网站，开发效率高，使用人数少，减少不必要的开销。交互性是互动方式，是有开发人员决定的。

运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中，便可快速完成网站的应用程序，无需编译，可在服务器端直接执行。容易编写，使用普通的文本编辑器编写，如记事本就可以完成。由脚本在服务器上而不是客户端运行，ASP所使用的脚本语言都在服务端上运行。

Request:从字面上讲就是“请求”，因此这个是处理客户端提交的东东的,例如Resuest.Form，Request.QueryString,或者干脆Request("变量名")

Session:这个存储跟客户端会话过程的数据，默认20分钟失效

那么，ASP.Net有哪些改进呢？

弱类型造成潜在的出错可能：尽管弱数据类型的编程语言使用起来回方便一些，但相对于它所造成的出错几率是远远得不偿失的。

Server:这个表示的服务器，操作服务器的一些东西使用这个，如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件

下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。