oApp.Logon klappt nicht

  • 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!

Participate now!

Don’t have an account yet? Register yourself now and be a part of our community!