Monitor Exchange Last Full Backup Time

noodleNT's picture

I need to setup a monitor to log the exchange store last backups and alert me if the difference between the last backup is greater than 7 days. I can use a VB script to pull the info but I was wonder if Altiris Monitor Solution or Inventory Solution can do this.

Here is a sample VB script:

strTitle="Rapport for en Mailboks Store "
strServer=InputBox("Whats the name of the Exchange Server?",strTitle,"MyExchangeSVR")

SGReport strServer
WScript.Quit

Sub SGReport(strServer)
Dim iServer
Dim iSGs
Dim iMBS

Set iServer=CreateObject("CDOEXM.ExchangeServer")
Set iSGs=CreateObject("CDOEXM.StorageGroup")
Set iMBs=CreateObject("CDOEXM.MailboxStoreDB")
iServer.DataSource.Open strServer

arrSGs=iServer.StorageGroups

For i=0 To UBound(arrSGs)
 strSGUrl=arrSGs(i)
 'WScript.Echo strSGUrl
 iSGs.DataSource.Open "LDAP://" & iServer.DirectoryServer & "/" & strSGUrl
 strData=strData & iSGs.Name & vbcrlf
 arrMBStores=iSGs.MailboxStoreDBs
 For j=0 To UBound(arrMBStores)
  iMBS.DataSource.open "LDAP://" & arrMBStores(j) 
  strData=strData & vbTab & iMBS.Name& vbcrlf
  strData=strData & vbTab & " DBPath:" & iMBS.DBPath& vbcrlf
  strData=strData & vbTab & " Last Backup:" & iMBS.LastFullBackupTime & vbcrlf
  strData=strData & vbTab & " StorageQuotaWarning:" & iMBS.StoreQuota & vbcrlf
  strData=strData & vbTab & " StorageQuotaLimit:" & iMBS.OverQuotaLimit & vbcrlf
 Next
 
Next

'WScript.Echo strData

strFileName = "C:\Scripts\Exchange.Log"

Set objFSO = CreateObject("scripting.filesystemobject")
Set objTextStream = objFSO.OpenTextFile(strFileName, 2, True)
objTextStream.WriteLine strData

End sub

 

 

Joseph_Carson's picture

Monitor Exchange Last Full Backup Tim

 Hi i will look at this in more detail to see what i can come up with.

noodleNT's picture

Thanks

Thanks

MonitorMan's picture

I saw this post and had a

I saw this post and had a couple of ideas to expose this information for you.

Since collaborative data objects cannot be natively exposed within Monitor Solution, and the exchange WMI classes dont house this data, how about using a log file?

Monitor Solution natively supports reading a log file. Your VBS needs to be updates to write out to a log file and then you could have MS read the log file.

Another concept would be commandline execution. Change your VBS to update the last date of backup, have MS read the last date and then have rules set to trigger X threshold.

I am not the exchange admin here, but we accomplish similar tasks using the above methods.

Again, just some thoughts.

Third Floor Garage Door Operator