Probleme bei der Namensauflösung

[CLI_Andreas_Schmidt]

Hi @all,

ich habe ein kleines Problem.

Ich sammel aus vielen Dokumenten (aus einer View) die Autorennamen und lege sie in eine Variable. Die Namen sollen jetzt als Emailadresse benutzt werden. Nur wenn ich dann die Variable in das SenTo lege, dann kommt die Fehlermeldung " Kann Namen nicht im Adressbuch finden". Sie werden nicht richtig als Emailadresse erkannt. Mehr als die Autoren habe ich leider nicht.

Gruss

Andreas

[Glombi]

Wann kommt die Meldung genau?

Du könntest noch die Maildomäne an jeden Eintrag hängen. Das mache ich oft, um den Stress mit dem privaten NAB zu umgehen...

Andreas

[koehlerbv]

Herrjeh, was für eine geniale Fehlermeldung ...  Welche eMail-Adresse verursacht denn die Fehlermeldung ? Erst dann findet man doch einen Ansatz ...

Bernhard (wieder mal kopfschüttelnd)

[Bruce Willis]

Hast du einen der Namen in deinem persönlichen Adressbuch names.nsf ?...

[umi]

Wie legst Du die Namen in der variable ab? als Array oder als String?

[CLI_Andreas_Schmidt]

Das mit der Domain wäre eine Idee. Die Fehlermeldung kommt genau beim senden, wenn der Router das Sendto-Feld ausliest und die Namen auseinander nimmt.

Ich melde mich.

[CLI_Andreas_Schmidt]

Das ist alles was ich habe

mailadress = MailResourceDoc .RessourceBenutzer

Forall mailadressen In mailadress
mailadressen2 = mailadressen2 + " " + mailadressen +"@Domain "
End Forall

Set mailitem =  MailstartDoc.appenditemvalue("sendto",mailadressen2)

[koehlerbv]

SendTo erwartet ein Array. Dein skalarer String kann also nicht funktionieren.

HTH,
Bernhard

[CLI_Andreas_Schmidt]

Wenn ich das Feld direkt ins Sento übertragen will, dann bekomme ich auch eine Fehlermeldung.

Was tun ?

[koehlerbv]

Vielleicht die Fehlermeldung mal aufmalen - und mal ein paar Beispieleinträge kund tun.

[CLI_Andreas_Schmidt]

Fehlernummer 13 Type mismatch

hier mein Code für die Picklist

If mailabfrage = 2 Then
      Msgbox ("Es wird keine Person benachrichtigt")
      Exit Function
   Else
      
      picklist = ws.Pickliststrings(0,True)
      
      If picklist = "" Then
         Msgbox ("Sie haben Keinen Empfänger ausgewählt. Es werden keine Personen benachrichtigt")
         Exit Function
      Else      
         
         Set Maildoc  =  db.createdocument
         Maildoc.form = "Memo"
         Maildoc.Subject = MailBetreff
         Maildoc.Body = Mailinhalt
         Maildoc.sendto = picklist
         Maildoc.send(True)
         
         Forall MailVar In Maildoc.sendto
            MailVar2 = MailVar2 + " , " + MailVar
         End Forall
         
         Msgbox ("Folgende Personen wurden benachrichtigt /  " + Chr(10) & MailVar2)
         
      End If
      
   End If

und der andere Code s.o.

Ich denke es ist die Array Problematik.

[koehlerbv]

In welcher Zeile kommt denn der Fehler ?

Bernhard

PS: Das hier sieht aus wie der Kandidat:
If picklist = "" Then

Reif für 'nen Type mismatch.

[CLI_Andreas_Schmidt]

Es war tatsächlich ein Problem im Array. Ich habe jetzt den appenditemvalue genommen schon lief es. Danke für die Teilnahme.

Das mit dem Picklist = "" war für mich die einzige Lösung, da picklist keine Button-nr. zurückgibt.

Gruss

Andreas