了解MSMQ，控制ASP進(jìn)程（二）

2019-11-18 22:42:55

字體：大中小

供稿：網(wǎng)友

在運用程序中 MSMQ 可以有很多的運用，但是最普遍的運用是卸載另一個線程中的進(jìn)程。 ( 例如和 MSMQ 在同一臺機(jī)器上的 IIS) 或則是另外一臺機(jī)器上的 IIS. 通過卸載這些阻塞的進(jìn)程，就能夠使得 asp 程序能夠繼續(xù)運行下去了。

　　一般來說，判斷是否需要卸載任務(wù)進(jìn)程要做兩件事：

　　一是根據(jù)該進(jìn)程運行的時間。

　　二是根據(jù)用戶是否有回應(yīng)（例如聊天室里面某個用戶幾個小時都沒說話了）。

　　例如：如果服務(wù)端的一個 Web 網(wǎng)頁的任務(wù)花費了太長的時間 , 用戶會得到一個網(wǎng)頁超時的錯誤信息，我們一般可以通過重新單擊刷新或者簡單的放棄這個網(wǎng)頁。但現(xiàn)在可以改變一下處理方式，例如進(jìn)行后臺處理，而不是簡單的靠增加處理網(wǎng)頁的時間方式。要知道，后臺處理方式也能夠提高網(wǎng)站性能的。

　　 MSMQ 還有一個功能，就是能夠控制消息的 body 中特定的一個 COM 對象。只要該對象支持 Idispatch 和 ipersist (IPersistStream or IPersistStorage ) 接口就行。

　　其中最常用的，能支持的兩個就是 ADODB.Recordset ( 或 ADOR.Recordset ) 和 Word.Document 。在下面我們舉一個處理 ADODB.Recordset 例子。

　　例：如何處理 ADODB.Recordset ：
Public Sub SendRecordsetInMessage()
Dim objQInfo As New MSMQ.MSMQQueueInfo
Dim objQSend As MSMQ.MSMQQueue
Dim objMessage As New MSMQ.MSMQMessage
Dim objRS As New ADOR.Recordset
Dim a As New MSMQQueue
With objRS
.CursorLocation = adUseClient
.Fields.Append "FN", adVarChar, 25
.Fields.Append "LN", adVarChar, 25
.Open
.AddNew
.Fields("FN") = "Chris"
.Fields("LN") = "Blexrud"
.Update
.AddNew
.Fields("FN") = "Shayna"
.Fields("LN") = "Blexrud"
.Update
End With
objQInfo.PathName = "./test"
Set objQSend = objQInfo.Open(MQ_SEND_access, MQ_DENY_NONE)
objMessage.Label = "Recordset State!!!!"
objMessage.Body = objRS
objMessage.Send objQSend
objQSend.Close
Set objQInfo = Nothing
Set objQSend = Nothing
Set objMessage = Nothing
Set objRS = Nothing
End Sub

　　了解了 MSMQ 么？我想現(xiàn)在對于 ASP 的進(jìn)程死鎖，你已經(jīng)有了很好的解決方法了吧！希望大家能通過以上文字，真正了解 MSMQ ，及通過 MSMQ 控制 ASP 進(jìn)程的方法！

上一篇：ASP技術(shù)在論壇中的運用(一)（吐血推薦！！！！）

下一篇：了解MSMQ，控制ASP進(jìn)程（一）