• Some users have recently had their accounts hijacked. It seems that the now defunct EVGA forums might have compromised your password there and seems many are using the same PW here. We would suggest you UPDATE YOUR PASSWORD and TURN ON 2FA for your account here to further secure it. None of the compromised accounts had 2FA turned on.
    Once you have enabled 2FA, your account will be updated soon to show a badge, letting other members know that you use 2FA to protect your account. This should be beneficial for everyone that uses FSFT.

VBScript Exchange Information Store Status

ANTDrakko

n00b
Joined
Mar 25, 2005
Messages
48
Hey guys,

I'm coming here as a last ditch effort in order to try and figure out how to solve a very cut and dry scripting problem. I don't have very much in depth experience in specifically programming in VBScript, however, I have worked with enough VBScript syntax that I can usually get a good grasp on what is being done. Here is the information that I have so far:

I want to be able to check the status of a particular Information Store in Exchange (2003) and then do something with that output.

I know this has to be done using CDOEXM, which is Microsoft CDO for Exchange Management Library . More specifically, the exact information that I want is listed on this M$ website.

I am unfamiliar with the syntax as it relates to working with CDOEXM, so I don't even know where to start aside from trying to piece together various examples that I can find on Google.

I don't want anyone to DO the problem for me. I am simply looking for guidance or perhaps an example of proper syntax when dealing with the IPublicStoreDB Interface or IMailBoxStoreDB Interface.

Here is what I *think* I have got so far:

Code:
Set iMDB = CreateObject ("CDOEXM.MailboxStoreDB") 

If iMDB.Status = 0 Then
  wscript.echo "Store is Online"
 ElseIf iMDB.Status = 1 Then
  wscript.echo "Store is Offline"
 ElseIf iMDB.Status = 2 Then
  wscript.echo "Store is Mounting"
 ElseIf iMDB.Status = 3 Then
  wscript.echo "Store is Dismounting"
 Else
  wscript.quit
 End If

Am I missing a lot for this to work? Where can I find more information about how to get closer to my goal?

Any advice or help would be greatly, deeply appreciated. I'm sorry if this violates any forum rules and if so please promptly lock or delete this thread.

Thank you.
 
Back
Top