Domino 9 und frühere Versionen > Entwicklung

Formular nicht speichern aber als Mail senden

<< < (2/3) > >>

ata:
... bevor du den Forward verwendest kannst du im UIDOC mit uidoc.FieldSetText( ... ) Inhalte von Feldern korrigieren. Du solltest aber asuf jeden Fall die Methode des SaveOptions = "0" verwenden, da dein UIDOC bearbeitet wird...

ata

trouble:
... die lektion hab ich gelernt und (hoffentlich) für die zukunft und weitere verwendung gespeichert.  ;)

in meinem formular ist ein "SendTo" field, aber wie kann ich den inhalt in die forward-memo einfügen?

und kann ich über script auch abfragen, ob ein feld gefüllt ist, um den user zu "zwingen", es auszufüllen bevor er's abschickt?

bin soooo froh, daß es euch gibt....  :)
trouble

ata:
... ich arbeite in der Regel nicht über die Frontend-Klasse, sondern konvertiere das Dokument in das Backend

... um zu prüfen, ob ein Feld leer ist...

--- Code: ---Dim ws As New NotesUIWorkspace
Dim docThis As NotesDocument
Set docThis = ws.CurrentDocument.Document

If cstr( docThis.Feldname(0) ) = "" Then
   '# dann eben entsprechende Schritte einleiten...
End If

--- Ende Code ---

... wenn du mehrere Felder hintereinander abprüfen willst, dann würde ich den Weg über ein Array wählen...

--- Code: ---Dim ws As New NotesUIWorkspace
Dim docThis As NotesDocument

Dim i As Integer
Dim sField( 0 to 2 ) As String
Dim vWert as Variant
sField( 0 ) = "Feldname_1"
sField( 1 ) = "Feldname_2"
sField( 2 ) = "Feldname_3"
Set docThis = ws.CurrentDocument.Document

For i = 0 to UBound( sField )
   If docThis.HasItem( sField( i ) ) Then
      vWert = docThis.GetItemValue( sField( i ) )
      If IsArray( vwert ) Then
         If Cstr( vWert( i ) ) = "" Then
             bEmpty = True            
         End If
      Else
         If Cstr( vWert ) = "" Then
             bEmpty = True
         End If
      End If
      If bEmpty Then
         '#  ... eben was getan werden soll, zum Beispiel
         MsgBox "Das Feld " + sField( i ) " ist leer, geben Sie bitte einen Wert ein"
         If ws.CurrentDocument.EditMode Then ws.CurrentDocument.GoToField( sField(i) )
          Exit For
      End If
   End If
Next



--- Ende Code ---


... wären so Ansätze...

ata

trouble:
Hmmmmmm. das ist für einen script-dau dann schon etwas komplizierter........ noch nicht sicher, ob ich da durchblicke.
wenn ich ein feld abfrage und nach einer fehlermeldung die aktion abbrechen will - das hab ich jetzt noch nicht wirklich gefunden.

und wie bzw. ob ich die mail, die über forward erzeugt wird, per script adressieren kann....

trouble

trouble:
Kommando zurück, hab's gefunden wie ich die Aktion abbreche.

Nur das Adressieren fehlt mir also noch....

trouble

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete