A
Aceware
Access 2003, vmware, citrix
The test function below works happily in my development environment in my
office but under citrix, vmware returns undefined application error at the
line that attempts to add recipients to the mail item.
Works ok if outlook is already running.
Any help very gratefully received
Tony Epton
Function test()
Dim objOutlook As Object
Dim objOutlookmsg As Object
Dim objOutlookRecip As Object
Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookmsg = objOutlook.CreateItem(olMailItem)
With objOutlookmsg
' Add the To recipient(s) to the message.
Set objOutlookRecip = .Recipients.Add("(e-mail address removed)")
objOutlookRecip.Type = olTo
.Subject = "Test Header"
.Body = "Test Body"
.Save
.Send
End With
End Function
The test function below works happily in my development environment in my
office but under citrix, vmware returns undefined application error at the
line that attempts to add recipients to the mail item.
Works ok if outlook is already running.
Any help very gratefully received
Tony Epton
Function test()
Dim objOutlook As Object
Dim objOutlookmsg As Object
Dim objOutlookRecip As Object
Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookmsg = objOutlook.CreateItem(olMailItem)
With objOutlookmsg
' Add the To recipient(s) to the message.
Set objOutlookRecip = .Recipients.Add("(e-mail address removed)")
objOutlookRecip.Type = olTo
.Subject = "Test Header"
.Body = "Test Body"
.Save
.Send
End With
End Function