Domino 9 und frühere Versionen > ND6: Entwicklung

Call uidoc.Reload - Aktualisieren eines Doks im Lesemodus

<< < (2/13) > >>

Glombi:
Wenn dann so:

Sub Click(Source As Button)
   Dim workspace As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
dim doc as NotesDocument
   Set uidoc = workspace.CurrentDocument
set doc = uidoc.Document
   If Not ( uidoc.IsNewDoc ) Then
call uidoc.Close
call ws.EditDocument(False,doc)
   End If
End Sub

lotus blue:

--- Zitat von: Glombi am 24.10.08 - 12:09:01 ---Wenn dann so:

Sub Click(Source As Button)
   Dim workspace As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
dim doc as NotesDocument
   Set uidoc = workspace.CurrentDocument
set doc = uidoc.Document
   If Not ( uidoc.IsNewDoc ) Then
call uidoc.Close
call ws.EditDocument(False,doc)
   End If
End Sub

--- Ende Zitat ---

Danke schon mal.
Hab jetzt nen Termin und darf dann ins WE.
Meld mich am Montag nochmal.
Euch ein schönes WE.
Gruß

lotus blue:
Sodala,
script läuft durch, aber es ändert nix.

Hab das entsprechende Dok geöffnet im Lesemodus.
Meine Kollegin ändert derweil einen Feldwert und speichert es ab.
Ich lass das Script drüberlaufen, aber der Feldwert ist immer noch der alte.
Benötige deshalb immer noch Eure hilfe bitte.
Mfg

Hier das Script:
Sub Click(Source As Button)
   Dim db As NotesDatabase
   Dim workspace As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
   Dim doc As NotesDocument
   Set uidoc = workspace.CurrentDocument
   Set doc = uidoc.Document
   If Not ( uidoc.IsNewDoc ) Then
      Call uidoc.Close
      Call workspace.EditDocument(False,doc)
   End If
End Sub

TRO:
UNID merken,
dann Set doc = db.GetDocumentByUNID

und dann dieses doc über ws.EditDocument öffnen

lotus blue:

--- Zitat von: TRO am 27.10.08 - 11:32:30 ---UNID merken,
dann Set doc = db.GetDocumentByUNID

und dann dieses doc über ws.EditDocument öffnen

--- Ende Zitat ---

Dann muss ich aber in alle bestehenden Doks ein Feld mit der UNID einfügen oder?

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete