用ASP建造自己的聊天室__教程 - 久丰模板网站，提供免费及精美的网页模板下载

文章搜索：分类关键字

收藏本站

设为首页

您的位置：首页 → 网页设计 → ASP程序 → 用ASP建造自己的聊天室__教程

用ASP建造自己的聊天室__教程

日期：2007-5-20 1:15:05 人气：76 [大中小]

[1] [2]

application.lock
mcounter=application("gcounter")
mchars=application("gchars")
if mcounter >9 then
mcounter=0
end if
mchars(mcounter)=session("ssname")
& ":" & request("txttalk")
mcounter=mcounter+1
application("gcounter")=mcounter
application("gchars")=mchars
application.unlock
end if % >
< % if application("gcounter")=0 then
lstemp=application("gchars")(0)
else
for x=0 to application("gcounter")-1
lstemp=lstemp & "< br >" & application("gchars")(x)
next
end if
response.write lstemp % >
< hr >< center >
< form action="default.asp" method=post name="aspform" >
< b >< a href="default.asp" >
更新显示< /a >< /b >
< h5 >发言:
< input type="text" name="txttalk" size="70" >< br >
< h5 >您的姓名:
< input type="text" name="txtname" length="20"
value=< %=session("ssname")% > >
< input type="submit" name="cmdpost" default="true" value="发送" >
< /form >< /center >< /body >< /html >

---- 以上代码在NT4.0、IIS4.0、IE4.0中和Pwin98、PWS、IE4.0中分别运行通过。

出处：本站原创作者：佚名

推荐文章