Try replacing these lines:
For Each objExchange_Mailbox in listExchange_Mailboxs
ado.RS.AddNew(objExchange_Mailbox.ServerName, objExchange_Mailbox.StorageGroupName, Exchange_Mailbox.StorageGroupName, Exchange_Mailbox.MailboxDisplayName, objExchange_Mailbox.Size,
With these lines
ado.RS.AddNew(objExchange_Mailbox.ServerName, objExchange_Mailbox.StorageGroupName, Exchange_Mailbox.StorageGroupName, _
& Exchange_Mailbox.MailboxDisplayName, objExchange_Mailbox.Size, objExchange_Mailbox.TotalItems, _
If you're still having trouble email me directly and I'll be glad to help you out...
so did we get anywhere with putting this altogether in one nice neat script?
I was going to post the 2007/2010 scripts yesterday but it only allows me to add one attachment at a time, unless i was missing something...
Otherwise give me your email and ill send it to you.
etabush and I are still working out the bugs in the VBScript for Exchange 2003...
etabush - when we get it working you can zip them all and then attach the zip file, if you like.
Your right, didnt think of that
Completed scripts for 2007+2010
The scripts also place the csv file in live connect 'get file'
2003 script still in the works...