在運用程序中 MSMQ 可以有很多的運用,但是最普遍的運用是卸載另一個線程中的進程。 ( 例如和 MSMQ 在同一台機器上的 IIS) 或則是另外一台機器上的 IIS. 通過卸載這些阻塞的進程,就能夠使得 ASP 程序能夠繼續運行下去了。
一般來說,判斷是否需要卸載任務進程要做兩件事:
一是根據該進程運行的時間。
二是根據用戶是否有回應(例如聊天室裡面某個用戶幾個小時都沒說話了)。
例如:如果服務端的一個 Web 網頁的任務花費了太長的時間 , 用戶會得到一個網頁超時的錯誤信息,我們一般可以通過重新單擊刷新或者簡單的放棄這個網頁。但現在可以改變一下處理方式,例如進行後台處理,而不是簡單的靠增加處理網頁的時間方式。要知道,後台處理方式也能夠提高網站性能的。
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 麼?我想現在對於 ASP 的進程死鎖,你已經有了很好的解決方法了吧!希望大家能通過以上文字,真正了解 MSMQ ,及通過 MSMQ 控制 ASP 進程的方法!