Autor Thema: Dokumente aktualisieren  (Gelesen 1810 mal)

Offline Raven

  • Frischling
  • *
  • Beiträge: 16
  • Geschlecht: Männlich
  • Ich liebe dieses Forum!
Dokumente aktualisieren
« am: 17.02.03 - 16:42:30 »
Hallo,

ich brauch einen Agenten, der bei seiner Ausführung alle Dokumente in der aktuellen Ansicht öffnet, in den Bearbeiten Modus setzt, speichert und schließt.

Geht das irgendwie ?

Gruß
Raven

Offline Don Pasquale

  • Freund des Hauses!
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 1.390
  • Geschlecht: Männlich
  • Don Pasquale
    • Auf Verlorenem Posten
Re:Dokumente aktualisieren
« Antwort #1 am: 17.02.03 - 17:00:51 »
Hallo Raven,

ja ich denke das müsste gehen.
Das mit dem Edit muß ich nochmal nachschauen,
ist das dringend ?

Probiers dies mal aus und gib mir eine Rückmeldung

 REM Dokument-Zugriff über NotesView...
        Dim uiws As New NotesUIWorkspace
        Dim session As New NotesSession
        Dim db As New NotesDatabase
        Dim view As New NotesView
        Dim doc As NotesDocument
        Set db = session.CurrentDatabase
        Set view = ws.CurrentView' ...View aus Frontend

       While Not doc is Nothing
       Set doc = uidoc.Document
 
        doc.Subject = "Neuer Inhalt"
        Call doc.Save(False,True)
       Set doc = view.GetNextDocument( doc ) 'das nächste Dokument
      Wend


Ciao
Don Pasquale

ps: Das hab ich alles hieraus
http://www.anton-tauscher.de/LotusScript/startdyn.htm

Offline ata

  • Moderator
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 5.092
  • Geschlecht: Männlich
  • drenaiondrufflos
    • Anton Tauscher Privat
Re:Dokumente aktualisieren
« Antwort #2 am: 17.02.03 - 17:12:34 »
@Don

... ist der Code tatsächlich 1:1 von mir - der stimmt so auf keinen Fall...


Set doc = uidoc.Document

... muß heißen

Set doc = view.getFirstDocument

... und muß vor While Not doc Is Nothing...

... würde man das Dokument öffnen, neu berechnen, speichern und wieder schließen wollen, dann muß vor Set doc = view.GetNextDocument(doc)

Set uidoc = uiws.EditDocument(True , doc)
Call uidoc.Refresh
Call uidoc.Save
Call uidoc.Close

... ich habe das jetzt nicht ausprobiert, aber so sollte es gehen...

ata
« Letzte Änderung: 17.02.03 - 17:19:13 von ata »
Grüßle Toni :)

Offline Don Pasquale

  • Freund des Hauses!
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 1.390
  • Geschlecht: Männlich
  • Don Pasquale
    • Auf Verlorenem Posten
Re:Dokumente aktualisieren
« Antwort #3 am: 17.02.03 - 17:17:06 »
@Don

... ist der Code tatsächlich 1:1 von mir - der stimmt so auf keinen Fall...

Bist Du nur bescheiden oder war das ernst gemeint ?

don pasquale

Offline Till_21

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 708
  • Geschlecht: Männlich
  • I love Germany
Re:Dokumente aktualisieren
« Antwort #4 am: 17.02.03 - 17:17:33 »
ich brauch einen Agenten, der bei seiner Ausführung alle Dokumente in der aktuellen Ansicht öffnet, in den Bearbeiten Modus setzt, speichert und schließt.

Geht das irgendwie ?

versuchs hiermit : @Command([ToolsRefreshAllDocs]);

genau dein ding

gruss

Offline ata

  • Moderator
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 5.092
  • Geschlecht: Männlich
  • drenaiondrufflos
    • Anton Tauscher Privat
Re:Dokumente aktualisieren
« Antwort #5 am: 17.02.03 - 17:20:40 »
@Don

... das hat mit Bescheidenheit weniger zu tun, wenn der Code so im Kurs hinterlegt ist, sollte ich ihn korrigieren...

... weißt du noch wo der so steht?...

ata
Grüßle Toni :)

Offline Raven

  • Frischling
  • *
  • Beiträge: 16
  • Geschlecht: Männlich
  • Ich liebe dieses Forum!
Re:Dokumente aktualisieren
« Antwort #6 am: 18.02.03 - 10:46:47 »
Danke die @Formel hat funktioniert

Gruß
Raven

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz