Hallo, ich habe über den unten stehenden Code (Excel VBA) eine Email erstellt und verschickt. Dieses Funktionierte auch ohne Probleme. Jetzt habe ich bei einem Rechner das Problem, das der Code bei folgender Zeile Set oAccount = oApp.Logon("", "", "", "", "", "AUTH") nicht weiter ausgeführt wird. Hat da jemand eine idee zu?
Dim oApp As DvApi32.IApplication
Dim oAccount As DvApi32.Account
Dim oArchive As DvApi32.Archive
Dim oMailItem As DvApi32.MailItem
Dim oAttachment As DvApi32.Attachment
Dim sMontNr As String
Dim sAdresse As String
Dim sName As String
Dim sEmail As String
Set oApp = CreateObject("DVOBJAPILib.DvISEAPI")
Set oAccount = oApp.Logon("", "", "", "", "", "AUTH") 'in dieser Zeile geht es nicht weiter
Set oArchive = oAccount.GetSpecialArchive( _
DvApi32.DvArchiveTypes.DvArchivePersonalOut)
Set oMailItem = oArchive.NewItem(DvApi32.DvItemTypes.DvEMailItem)
Vielen dank für die Unterstützung!