Domino 9 und frühere Versionen > Entwicklung

Globale Variable

(1/1)

Rob Green:
wenn ich in den Declaration eine Variable namens
"Dim FELD_WERT as Variant" setze und dann im
QueryOpen der Maske den Wert mit
FELD_WERT = doc.FeldABC setze....

bleibt mir diese Variable nun so lange im Speicher, bis ich zB im QuerySave vergleichen möchte, ob sich das Feld verändert hat?
also im QuerySave

if Feld_WERT<>doc.FeldABC Then
...
End If

klappt das?

Rob Green:

--- Code: ---
--- Ende Code ---

--- Code: ---
--- Ende Code ---
yip..klappt..

habe das ins Postopen:

--- Code: ---              If Not Source.IsNewDoc Then   
      Wert = Source.Document.Feld
   End If

--- Ende Code ---

In den Declarations

--- Code: ---Dim Wert as Variant
--- Ende Code ---

Im Query Save:
               
--- Code: ---
               Dim ws As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
   Set uidoc = ws.CurrentDocument
   Dim doc As notesdocument
   Set doc = uidoc.Document
   
   If Not uidoc.IsNewDoc Then
      abc = doc.feld
      
      jetztele% = Ubound(abc)
      vorherele% = Ubound(Wert)
      
      
      If jetztele% > vorherele% Then
         Msgbox "neue Werte dazu eingegeben"
      Elseif jetztele%<vorherele% Then
         Msgbox "Werte entfernt"
      Else
         For i=0 To Ubound(abc)
            If Wert(i) <> abc(i) Then
               Msgbox i & {. Wert  ist nicht gleich}
            End If
         Next
      End If
      
   End If
--- Ende Code ---

Navigation

[0] Themen-Index