Getting test data

I wrote the following simple script to send 1000 emails into Exchange, whereby the subject is sequentially numbered.

It’s quite handy for testing bulk operations, because you can see (if it fails) where it got to in processing the items.

You will only need some small (obvious) modification to run in your environment, and it uses CDO from VBScript (so needs to be run from a client with Outlook + CDO installed)

set objMessage = CreateObject("CDO.Message")
set objConfig = CreateObject("CDO.Configuration")

SET Flds = objConfig.Fields
    With Flds
        .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
        .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "exch1.ev.local"
        .Update
    End With

set objMessage.COnfiguration = objConfig

' Do a big loop

for i = 1 to 1000
            wscript.echo "Processing : " & i
            objMessage.Subject = i
            objMessage.From = "ExternalPerson@External.com"
            objMessage.To = "YourTestUser@ev.local"
            objMessage.TextBody = "Hello"
            objMessage.Send
            wscript.sleep(1000)
next