DTS Send Resultset in the body of an email as "text"

Question

Viewing 5 posts - 1 through 4 (of 4 total)

You must be logged in to reply to this topic. Login to reply

Jonathan Stokes SSCrazy Eights Points: 9861 More actions · Answer 1

store the output in a global variable which you can then access in your code

------------------------------
The Users are always right - when I'm not wrong!

finance_teacher SSC Eights! Points: 855 More actions · Answer 2

I found out how to get the output into a global variable, and tested some theories to make the below work, however I cannot seem to get it to work.

Can you send me a sample or a hint ?

Function Main()

Dim iMsg

set iMsg = CreateObject("CDO.Message")

Dim objMail

Set objMail = CreateObject("CDO.Message")

objMail.From = "user@user.com"

objMail.To ="user@user.com"

objMail.Subject="Test Subject"

objMail.TextBody = GlobalVariable (OIW_DOLLAR).Value <-- this fails

objMail.Send

Set objMail = nothing

Main = DTSTaskExecResult_Success

End Function

Jonathan Stokes SSCrazy Eights Points: 9861 More actions · Answer 3

You are missing the quotes here:

objMail.TextBody = GlobalVariable (OIW_DOLLAR).Value <-- this fails

should be:

objMail.TextBody = GlobalVariable ("OIW_DOLLAR").Value

------------------------------
The Users are always right - when I'm not wrong!

finance_teacher SSC Eights! Points: 855 More actions · Answer 4

Thanks.

Here is the final code if anyone needs it.

objMail.TextBody = "Total is " & DTSGlobalVariables("OIW_DOLLAR").value