Versand von e-Mail aus MS Access via LN 6.5

[lalo]

Hallo,
ich habe in Access2000 unter Windows2000 mit VBA eine Anwendung die LN-Mails verschickt.

Nun habe ich auf Win XP gewechselt und nun kommt in Access der VBA-Fehler 429 Kann Objekt nicht erstellen.
Verweis auf die Datei notes32.tlb steht !

Hier der Code:

Public Function SendNotesMails(Subject As String, Attachment As String, Recipient As String, BodyText As String, SaveIt As Boolean)

Dim notesdb As Object           '... Notes datenbank ...
Dim notesdoc As Object          '... Dokument ..........
Dim notesrtf As Object          '... RichTextItem ......
Dim notessession As Object      '... Session ...........
Dim I As Integer
Dim answer As String
Dim Mldg As String
Dim Stil As Long
Dim Titel As String

'---------------------------------
' Ist Notes gestartet ?
'---------------------------------
Do While fIsAppRunning("NOTES") = False

Mldg = "Zum E-Mail-Versand müssen Sie Lotus Notes starten," & vbCrLf & "anschließend ja drücken"
Stil = vbYesNo + vbCritical + vbDefaultButton1
Titel = "MDO-Versand per e.mai"
answer = MsgBox(Mldg, Stil, Titel)
    If answer = vbNo Then
        SendNotesMails = -1
        Exit Function
    End If
Loop

'-----------------------------------
' Start a session to notes
'-----------------------------------
Set notessession = CreateObject("Notes.Notessession")  <<<<<<< Fehler
....
....

Freundliche Grüße
Lalo

[Axel]

Ist der Notes-Client richtig registriert. Schau mal in der Registry unter HKEY_CLASSES_ROOT ob's da Notes.NotesSession gibt.

Wenn nicht, dann schau mal hier: http://atnotes.de/index.php?topic=28569.0. Da gibt's Infos wie man den Client nachträglich registriert.


Axel