Well everything was fine for this computer then god knows what happened. All other pcs running the same work fine without any issues.
Pc is running office 2000 with outlook 2000 aswell, exactly the same version as the other pcs.
The problem arises from trying to send an email from within an access form, it goes to send and then prettymuch says "unable to initialize outlook" and that it. Outlook works fine on its own, it opens, sends/receives email.
Pressing Ctrl + G to get the code screen, then tools > references shows the reference it uses: Microsoft Outlook 9.0 Object Library linking to: C:\Program Files\Microsoft Office\Office\MSOUTL9.OLB which is the same on all pcs.
The first 2 lines of code here are where the problem lies I think:
Function CreateMail(varRecip As Variant, strSubject As String, strMessage As String, Optional VARattachment As Variant) As Boolean
Dim objNewMail As Outlook.MailItem
MsgBox(objNewMail)
and I added the message box as a test, which shows null or nothing has been created.
which then runs the following code:
If golApp Is Nothing Then
If InitializeOutlook = False Then
MsgBox "Unable to initialize Outlook. "
Exit Function
which is where that error message i get is coming from.
Now i've uninstalled office completely, all registry entries, ran office removal from add/remove and a seperate MS product to remove it. Restarted > reinstalled, same problem.
I've even copied the whole Microsoft Office folder from one working pc to this one, which does exactly the same. Anyone got any ideas as i'm now totally out of solutions.
Cheers
Pc is running office 2000 with outlook 2000 aswell, exactly the same version as the other pcs.
The problem arises from trying to send an email from within an access form, it goes to send and then prettymuch says "unable to initialize outlook" and that it. Outlook works fine on its own, it opens, sends/receives email.
Pressing Ctrl + G to get the code screen, then tools > references shows the reference it uses: Microsoft Outlook 9.0 Object Library linking to: C:\Program Files\Microsoft Office\Office\MSOUTL9.OLB which is the same on all pcs.
The first 2 lines of code here are where the problem lies I think:
Function CreateMail(varRecip As Variant, strSubject As String, strMessage As String, Optional VARattachment As Variant) As Boolean
Dim objNewMail As Outlook.MailItem
MsgBox(objNewMail)
and I added the message box as a test, which shows null or nothing has been created.
which then runs the following code:
If golApp Is Nothing Then
If InitializeOutlook = False Then
MsgBox "Unable to initialize Outlook. "
Exit Function
which is where that error message i get is coming from.
Now i've uninstalled office completely, all registry entries, ran office removal from add/remove and a seperate MS product to remove it. Restarted > reinstalled, same problem.
I've even copied the whole Microsoft Office folder from one working pc to this one, which does exactly the same. Anyone got any ideas as i'm now totally out of solutions.
Cheers