Unspecified Error

mvermeulen · #1 10-09-2003, 10:57 AM

I am receiving the following error:

Error loading info for custom action 'Run Script': Unspecified error

The step generates a fail message but actually completes. I have written a script that I have reduced down to try and locate any possible errors. It almost seems to be dependent on the lenght of the script. As I have backed out more of the comments and additional check functions (IF Exists for example), I progressed further. Since it is actually sending the e-mail (somewhat ugly at this point), I am hoping to isolate the error.

Function vbld_SendMail()

Dim objMail
Dim strSubject
Dim strBody
Dim strToAddr
Dim strFromAddr
Dim logFile

' determine the log filename, retrieve with all macros/script expanded
logFile = Application.ExpandMacrosAndScript("%LOGFILE%")
strToAddr = "Mark.Vermeulen@cbs.fiserv.com"
strFromAddr = "test@cbs.fiserv.com"
strSubject = "This is a test email in HTML format"
strBody = vbld_FSO.OpenTextFile(logFile).ReadAll()
MsgBox strBody

' First create an instance of the NewMail Object
Set objMail = CreateObject("CDONTS.NewMail")
objMail.From = strFromAddr
objMail.To = strToAddr
objMail.Subject = strSubject
objMail.Body = "<html><head></head><body><b>" + strBody + "</b></body>"
objMail.MailFormat = 0
objMail.BodyFormat = 0

objMail.Send
MsgBox "Step Five"

'Set objMail = Nothing

End Function