ChrisRChamberlain
Programmer
I am trying to automate Outlook from Visual Foxpro using the following code.
_VFP.OLEServerBusyRaiseError = .T.
_VFP.OLERequestPendingTimeout = 0
_VFP.OLEServerBusyTimeout = 5000
oOutlook = CREATEOBJECT("Outlook.Application"
oLogon = oOutlook.GETNAMESPACE("MAPI"
oLogon.LOGON()
oOutlook.CREATEITEM(1)
oMail = oOutlook.CREATEITEM(0) && olMailItem
WITH oMail
[tab].SUBJECT = [Hello World]
[tab].BODY = [This is a test]
[tab].TO = [anyone@anywhere.com]
[tab].SEND
ENDWITH
What I need would like to know is how to get Outlook to make an Internet connection, assuming it's offline, BEFORE the preceding code is executed, and thus immediately send the e-mail.
TIA
Chris
_VFP.OLEServerBusyRaiseError = .T.
_VFP.OLERequestPendingTimeout = 0
_VFP.OLEServerBusyTimeout = 5000
oOutlook = CREATEOBJECT("Outlook.Application"
oLogon = oOutlook.GETNAMESPACE("MAPI"
oLogon.LOGON()
oOutlook.CREATEITEM(1)
oMail = oOutlook.CREATEITEM(0) && olMailItem
WITH oMail
[tab].SUBJECT = [Hello World]
[tab].BODY = [This is a test]
[tab].TO = [anyone@anywhere.com]
[tab].SEND
ENDWITH
What I need would like to know is how to get Outlook to make an Internet connection, assuming it's offline, BEFORE the preceding code is executed, and thus immediately send the e-mail.
TIA
Chris
