網站建設之最簡單的聊天室程序
想到聊天室，你一定會認為非常復雜非常麻煩的吧，呵呵，這僅僅只有一段簡單的ASP代碼，實現了聊天室的基本功能，不妨參考下：將以下代碼保存為liaotian.asp
<%If Request.ServerVariables("Request_Method")="GET" then%>
<form method="post" action="liaotian.asp">
<input type="text" name="nick" Ｖalue="您的昵稱"><p>
<input type="submit" Ｖalue="come in"><p>
<input type="hidden" name="log" size="20" Ｖalue="1">
</form>
<%Response.End
Else
Response.clear
dim talk
If Request.Form("nick")<>"" then
Session("nick")=Request.Form("nick")
End if
%>
<form method="post" action="liaotian.asp" name=form1>
<%=Session("nick")%>說話：
<input type="text" name="talk" size="50"><br>
<input type="submit" Ｖalue="提交">
<input type="reset" Ｖalue="取消"></p>
</form>
<a href="liaotian.asp">離開</a><br>
<%
If Request.Form("log")<>1 then
If trim(Request.Form("talk"))="" then
talk=Session("nick")&"不說一句話就想來敷衍大家"
Else
talk=trim(Request.Form("talk"))
End If
Application.lock
Application("show")="來自"&Request.ServerVariables("remote_addr")& "的" &Session("nick")&"在"&time& "的時候說：" &talk& "<br>" &Application("show")
Application.UnLock
Response.Write Application("show")
End if
%>
<%End if%>
提示：將Ｖ改成v
網站建設之ASP上一篇下一篇代碼 鞋子中國網站制作完成 網站建設之如何快速備案 廣州奇億網站建設恭祝全國人民新春快樂 騰訊也被收購？中移動澄清無意收購騰訊！ 網站建設實用的圖片防盜鏈方法 建站技巧之一個表單同時提交兩個頁面 網站建設之域名轉發新方法 PHP自動執行任務的網站建設代碼 廣州網站制作贈送空間免費升級通知 網站建設技巧之ASP時間顯示格式 網站制作之如何去掉LI前面的點 從網絡孔子學院事件看網站建設問題 網站建設行業的幾大忽悠 asp動態判斷下拉菜單或選擇框哪個已選 網站建設之簡單的簡繁轉換代碼 網站制作客戶使用CN域名的緊急通知 簡單隨網頁滾動而滾動的層 廣州網站建設之彈出并關閉跳轉返回代碼 谷歌退出中國市場的真正原因何在？
