Automamtion Error Calling Outlook from Access (-2147024770 (800700

N

NightZEN

I have some code that has worked well under windows2000 and windowsXP-sp1 and
Access 97, 2000, and 2002, and Outlook 2000 and 2002, and in every
configuration of the above you could assemble. We are now going to WinXP-sp2
and the code is not working - though I think it's related to sp2, I am not
sure. The debugger hilights the last line here:

Private Sub CbtnEmail_Click()
On Error GoTo err_handle

Dim strJob As String
strJob = Me.Job_


Dim doubStart As Double
Dim intCount As Integer
Dim fso As FileSystemObject
Dim Subjectline As String
Dim ToList As String
Dim MyOutlook As Object 'Outlook.Application
Dim db As DAO.Database
Dim MailList As DAO.Recordset
Dim MyMail As Outlook.MailItem
Dim strTeam As String, strCust As String

'grab the team this job belongs to and the customer
strTeam = Me.Team
strCust = Me.CustName

Set fso = New FileSystemObject

'Setup Subject line
Subjectline$ = "New Job ... Number " & strJob

'Now, we open Outlook for our own device..
'Set MyOutlook = New Outlook.Application
Set MyOutlook = CreateObject("Outlook.Application")
....

Any Idea Why? I can't find any ref. to this error number.

Thanks
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top