檢查 IsServerUp功能的Lotus Notes Domino的狀態
基本上,代碼連接到遠程服務器,並檢查,看看是否可以找到模板log.ntf,它有一個有效的副本ID。 如果模板可以發現,有一個有效的副本ID,然後服務器。 否則,假設服務器已關閉。 我們這個函數的測試達到它運行起來後,我們關閉遠程服務器關閉與遠程服務器的一個預定的代理。
它成功返回true,當服務器和FALSE時,服務器已經下降。 作為顯示器,我們一直在使用一個預定的每小時代理(這是建設另一個應用程序的過程中的一部分),到目前為止,這個功能已經 100%可靠。 但是,就像我說的,我們沒有遇到任何網絡問題或服務器上的不同尋常的重物能夠看到在這些情況下這是什麼功能。 下面的代碼:
為布爾功能IsServerUp(會議作為 NotesSession,作為字符串的ServerName)
在錯誤轉到 BubbleError
“返回true,如果遠程服務器,否則返回False下來
DIM DB作為 NotesDatabase
在錯誤恢復下一步
DB = session.GetDatabase(SERVERNAME,“log.ntf”)
如果不是DB然後是Nothing
如果不db.IsOpen然後調用 db.Open(“”,“”)
“每一次在一段說明,作為一個有效的返回一個無效的數據庫
“數據庫與零副本ID的字符串。 檢查該。
如果db.ReplicaID =字符串$(LEN(db.ReplicaID),“0”),然後設置 DB =沒有
結束如果
在錯誤轉到 BubbleError
如果錯誤 <> 0或DB是Nothing
ERR = 0
IsServerUp = FALSE
其他
IsServerUp = TRUE
結束如果
退出功能
BubbleError:
錯誤的錯誤,錯誤 $&CHR $(10)&“程序”和Getthreadinfo(1)&“,行”&CSTR(ERL)
端功能
如果您有任何輸入,或者可以嘗試這一點對一個頻繁使用的服務器(可能不響應)或大量的網絡流量,讓我們知道您的結果。
2532觀眾觀看了8431次














後,它是有益的。 我發現了檢查服務器的可用性,而無需硬編碼數據庫或模板。 隨時檢查出來:
HTTP:/ / blog.theozzyblogger.com/2010/09/lotus-script-to-check-if-server-is.html