复制内容到剪贴板
代码:
' This code will dismount the selected mailbox database.
' ------ SCRIPT CONFIGURATION ------
strServerName = "" ' e.g., "BATMAN"
strMDBName = "" ' e.g., "Mailbox Store (BATMAN)"
' ------ END CONFIGURATION ---------
Set theServer = CreateObject("CDOEXM.ExchangeServer")
Set theMDB = CreateObject("CDOEXM.MailboxStoreDB")
theServer.DataSource.Open strServerName
arrSG = theServer.StorageGroups
theFirstSG = arrSG(0)
strURL = "LDAP://" & theServer.DirectoryServer & "/cn=" & strMDBName & "," & theFirstSG
theMDB.DataSource.Open strURL
theMDB.Dismount
WScript.Echo "Database dismounted."上面的脚本只是一个例子,可以实现数据库的unmount。