Aufrufen Zugriff sub von Outlook - Methode Run des Objekts _Application ist fehlgeschlagen

Ich versuche, eine Unterroutine ausführen in MS Access, wenn Sie eine E-Mail in Outlook empfangen haben.

Ich bin mit einem Zugang.Application-Objekt und seiner Run-Methode.

Bekomme ich folgende Fehlermeldung: die Methode Run des Objekts _Application ist fehlgeschlagen.

Private Sub Application_newmail()
    MsgBox "New mail"
    Dim accessdb As Access.Application
    Set accessdb = CreateObject("Access.Application")

    accessdb.opencurrentdatabase "C:/Camps.accdb", False

    accessdb.Run "test"

    accessdb.CloseCurrentDatabase

    Set accessdb = Nothing

End Sub

Den "test" - Unterroutine ist eine leere sub (nachdem ich versucht und sind gescheitert zu nennen, eine tatsächliche sub) in den Checkdb-Modul.

Ich bin mit Office 2007.

InformationsquelleAutor bsg | 2012-04-29
  1. 1

    Getestet habe ich Ihren code mit VBScript anstelle von Outlook. Dein code funktionierte gut für mich, außer ich habe Ihre forward-slash ein backslash in einer Datenbank Pfad: "C:\Camps.accdb"

    Stellen Sie sicher, Sie haben Ihre "Test" - Funktion/sub als Public markiert.

    Public Function Test()
    MsgBox "Test Works"
End Function
    • Das ist unglaublich! Ich kann nicht glauben, dass so eine dumme Sache war das problem, aber es war. Ich änderte meine Schrägstriche (Slash zu Backslash im Pfad, und jetzt läuft es wunderbar. Vielen Dank!
    InformationsquelleAutor HK1
Schreibe einen Kommentar