Array per E-Mail versenden

[Gravedigger]

Hallo,

mit folgendem Script möchte ich gerne eine E-Mail versenden.
<START>
Sub MailSend
   
   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim doc As NotesDocument
   Dim maildoc As Notesdocument
   
   Set db = session.CurrentDatabase
   Set doc = session.DocumentContext
   Set maildoc = New NotesDocument(db)
   
   maildoc.form="(frmMail)"
   maildoc.SendTo = "test@test.com"
   maildoc.Subject = "Useränderung"
   maildoc.Body = "Hallo," & Chr(13) & "folgende Änderungen wurden am User " & doc.fdFirstName(0) & " " & _
   doc.fdLastName(0) & " vorgenommen:" & Chr(13) & change & Chr(13) & Chr(13) & "Einen schönen Tag"
   
   Call maildoc.send(False)
   
End Sub
<ENDE>

Das funktioniert soweit alles wunderbar, nur das die Variable "change" in der E-Mail leer ist.
Bei "change" handelt es sich um ein Array, welches in Initialize gefüllt wird.

Schonmal danke für eure Hilfe.

[Till_21]

ist change denn global definiert, oder nur lokal in der initialize-prozedur ? wenn zweiteres, dann kann deine prozedur SendMail nicht auf diese zugreifen...

gruss

[Gravedigger]

changed ist unter "(Declarations)" definiert und zwar als
Dim changed() as String

Aber es funktionert trotzdem nicht.  

[meichhorner]

Hy,

ist es nun eine einfache String Variable oder ein String Array ?

du musst doch angeben was aus dem Array du verwenden möchtest.

Versuchs mal mit change(0) und wen's mehrere sind dann eben in einer Schleife durch alle Einträge durch.

Cu
Martin

[Gravedigger]

Ich möchte gerne das ganze Array versenden.

Die Deklaration ist als String Array erfolgt.

[ata]

... du kannst nicht einen String mit einem Array verketten, das geht nun mal definitiv nicht. Wenn du die Inhalte des Arrays witergeben willst, dann mußt du das Array in einen String aufdröseln...

Dim sArray As String
Dim i as Integer
' # das Array aufdröseln...
For i = LBound(change) to UBound(change)
    sArray = sArray + ", "
Next
' # das letzte Komma wieder entfernen
sArray = Left( sArray , Len( sArray ) - 2 )

... und anstelle von change jetzt sArray verwenden und das Array ist draußen...

ata

[meichhorner]

Hy,

und mach dir ein dynamisches Array nicht das du bei zu vielen Änderungen einen Überlauf bekommst.

Cu
Martin

[Gravedigger]

Dank euch allen. Es funktioniert.