青青青国产的视频在线播放,亚洲女成aⅴ,大香伊蕉99大香伊蕉免费视频,国产高清在线播放 26uuu,国产呦萝小初合集密码,久久这里精品国产99丫e6,精品国产SM最大网站蜜芽,麻批好紧日起要舒服死了,www

[點(diǎn)晴永久免費(fèi)OA]ASP編程入門(mén)進(jìn)階（十一）：Chat聊天程序

當(dāng)前位置：點(diǎn)晴教程→點(diǎn)晴OA辦公管理信息系統(tǒng) →『經(jīng)驗(yàn)分享&問(wèn)題答疑』

admin

2022年6月28日 9:46 本文熱度 857

通常的聊天室所采用的程序，也就是Chat程序了，其基本結(jié)構(gòu)原理是不會(huì)采用到數(shù)據(jù)庫(kù)的。那究竟采用什么技術(shù)呢？我們知道ASP變量當(dāng)中Session變量的作用是記錄單個(gè)用戶的信息，并且能跟蹤用戶的行為；Application對(duì)象的作用則起的全局變量，可以實(shí)現(xiàn)站點(diǎn)多個(gè)用戶之間在頁(yè)面中共享信息的。

那可以想象，在針對(duì)當(dāng)前聊天程序中，一個(gè)聊天成員即為一個(gè)Session變量，聊天成員之間的會(huì)話則當(dāng)成Application變量進(jìn)行共享顯示，以使各成員都能看見(jiàn)。

那下面就采用一很經(jīng)典的實(shí)例程序，進(jìn)行了解和分析。

1，chat.asp

<%If Request.ServerVariables("Request_Method")="GET" then%>
<form method="post" action="chat.asp">
<input type="text" name="nick" value="your nick name"><p>
<input type="submit" value="come in"><p>
<input type="hidden" name="log" size="20" value="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="chat.asp" name=form1>
<%=Session("nick")%>說(shuō)話：
<input type="text" name="talk" size="50"><br>
<input type="submit" value="提交">
<input type="reset" value="取消"></p>
</form>
<a href="chat.asp">離開(kāi)</a><br>

<%
If Request.Form("log")<>1 then
If trim(Request.Form("talk"))="" then
talk=Session("nick")&"不說(shuō)一句話就想來(lái)敷衍大家"
Else
talk=trim(Request.Form("talk"))
End If
Application.lock
Application("show")="來(lái)自"&Request.ServerVariables("remote_addr")& "的" &Session("nick")&"在"&time& "的時(shí)候說(shuō)：" &talk& "<br>" &Application("show")
Application.UnLock
Response.Write Application("show")
End if
%>
<%End if%>

簡(jiǎn)單解釋?zhuān)?/span>
1，<%If Request.ServerVariables("Request_Method")="GET" then%>的作用就是判斷當(dāng)前頁(yè)面接受的方式，如果為GET方式則會(huì)顯示“要求輸入昵稱(chēng)”的表單頁(yè)。因?yàn)轫?yè)面的默然接受方式為GET，當(dāng)在URL地址欄直接敲入時(shí)，也就是沒(méi)有任何信息的時(shí)候，就應(yīng)該顯示要求“輸入昵稱(chēng)”。

2，<input type="hidden" name="log" size="20" value="1">和下面的If Request.Form("log")<>1 then是有關(guān)聯(lián)的：顯然第一次輸入昵稱(chēng)進(jìn)入，同樣將log隱藏域發(fā)送。但作為第一次的進(jìn)入是無(wú)任何語(yǔ)句發(fā)言的，所以判斷接受的log值不為1，亦即非首次登錄（表示已經(jīng)登錄）時(shí)，執(zhí)行內(nèi)部相關(guān)聊天顯示程序。

3，trim(Request.Form("talk"))=""，trim就是個(gè)函數(shù)了：刪去字符串前，后的空格。初此，還有rtrim()：去掉字符串后的空格；ltrim()：去掉字符串前的空格。

cnbruce=" This is a Test ！ "

alert("全部顯示："&cnbruce)

alert("刪除前面空格："<rim(cnbruce))

alert("刪除后面空格："&rtrim(cnbruce))

alert("刪除前后空格："&trim(cnbruce))

</script>

4，

Application.lock
Application("show")="來(lái)自"&Request.ServerVariables("remote_addr")& "的" &Session("nick")&"在"&time& "的時(shí)候說(shuō)：" &talk& "<br>" &Application("show")
Application.UnLock

提取精華得

Application.lock
Application("show")=talk& "<br>" &Application("show")
Application.UnLock

可以看到是Application變量的疊加功能，每次Application("show")的值都建立在原有Application變量值的基礎(chǔ)之上，再附加上最新的聊天內(nèi)容：talk變量的值。這樣就保證所有用戶都能看到的共享信息了。

未完待敘。。。

該文章在 2022/6/28 11:54:40 編輯過(guò)

關(guān)鍵字查詢

聊天

程序

相關(guān)文章

正在查詢...

點(diǎn)晴ERP是一款針對(duì)中小制造業(yè)的專(zhuān)業(yè)生產(chǎn)管理軟件系統(tǒng),系統(tǒng)成熟度和易用性得到了國(guó)內(nèi)大量中小企業(yè)的青睞。

點(diǎn)晴PMS碼頭管理系統(tǒng)主要針對(duì)港口碼頭集裝箱與散貨日常運(yùn)作、調(diào)度、堆場(chǎng)、車(chē)隊(duì)、財(cái)務(wù)費(fèi)用、相關(guān)報(bào)表等業(yè)務(wù)管理，結(jié)合碼頭的業(yè)務(wù)特點(diǎn)，圍繞調(diào)度、堆場(chǎng)作業(yè)而開(kāi)發(fā)的。集技術(shù)的先進(jìn)性、管理的有效性于一體，是物流碼頭及其他港口類(lèi)企業(yè)的高效ERP管理信息系統(tǒng)。

點(diǎn)晴WMS倉(cāng)儲(chǔ)管理系統(tǒng)提供了貨物產(chǎn)品管理,銷(xiāo)售管理,采購(gòu)管理,倉(cāng)儲(chǔ)管理,倉(cāng)庫(kù)管理,保質(zhì)期管理,貨位管理,庫(kù)位管理,生產(chǎn)管理,WMS管理系統(tǒng),標(biāo)簽打印,條形碼,二維碼管理,批號(hào)管理軟件。

點(diǎn)晴免費(fèi)OA是一款軟件和通用服務(wù)都免費(fèi)，不限功能、不限時(shí)間、不限用戶的免費(fèi)OA協(xié)同辦公管理系統(tǒng)。