Autor Thema: Agent - öffnen und wieder speichern  (Gelesen 2157 mal)

Offline Gandalf

  • Junior Mitglied
  • **
  • Beiträge: 83
  • Geschlecht: Männlich
  • Alles wird gut - nur weiss halt keiner wann
    • Unterwegs-im.net
Agent - öffnen und wieder speichern
« am: 26.05.03 - 14:23:56 »
Hallo,

hab mittlerweile nen Brett vor dem Kopf und seh nur noch notes notes notes

Hilfe - ich brauche einen Agenten der markierte Dokumente öffnet und einfach wieder abspeichert.
Kann mir da jemand helfen  ???

Wäre klasse
Bye
Gandalf in Nöten

Offline MrMagoo

  • Senior Mitglied
  • ****
  • Beiträge: 359
  • Geschlecht: Männlich
  • AAAhhh
Re:Agent - öffnen und wieder speichern
« Antwort #1 am: 26.05.03 - 14:29:32 »
als @Befehl in einen Agenten schreiben:

@Command([ToolsRefreshAllDocs])

Gruß

Offline Gandalf

  • Junior Mitglied
  • **
  • Beiträge: 83
  • Geschlecht: Männlich
  • Alles wird gut - nur weiss halt keiner wann
    • Unterwegs-im.net
Re:Agent - öffnen und wieder speichern
« Antwort #2 am: 26.05.03 - 14:42:59 »
Hi MrMagoo,

läuft wunderbar mit der Einstellung "einmal ausführen"
läuft aber nicht bei "Ausgewählten Dokumenten"
die Einstellung lässt den @Befehl nicht zu.

Bitte bitte noch einmal helfen

Bye
Gandalf

Offline MrMagoo

  • Senior Mitglied
  • ****
  • Beiträge: 359
  • Geschlecht: Männlich
  • AAAhhh
Re:Agent - öffnen und wieder speichern
« Antwort #3 am: 26.05.03 - 14:54:31 »
fürs BackEnd müsste dieser hier laufen
   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim collection As NotesDocumentCollection
   Dim doc As NotesDocument
   
   Set db = session.CurrentDatabase
   Set collection = db.AllDocuments
   
   Set doc = collection.GetFirstDocument
   
   While Not (doc Is Nothing)
      Call doc.ComputeWithForm(True,False)
      Call doc.Save(True,False)
      Set doc = collection.GetNextDocument(doc)
   Wend

Offline Rob Green

  • Freund des Hauses!
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 2.651
  • Geschlecht: Männlich
    • Meipor
Re:Agent - öffnen und wieder speichern
« Antwort #4 am: 26.05.03 - 15:00:26 »
Vorsicht, das compute with form berechnet leider in den Docs berechnete Werte nicht neu. Dazu muß man wirklich toolsrefreshselected nehmen, also ein @command.

Oder aber das o.g. Script so umstricken, das es berechnete Werte selbst ausrechnet und neu ablegt.
Vielleicht verdirbt Geld wirklich den Charakter.
Auf keinen Fall aber macht Mangel an Geld ihn besser.
(John Steinbeck)

Meiporblog: http://www.meipor.de/blog
allg. Unternehmerblog: http://www.m-e-x.de/blog

Offline eknori

  • @Notes Preisträger
  • Moderator
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 11.730
  • Geschlecht: Männlich
Re:Agent - öffnen und wieder speichern
« Antwort #5 am: 26.05.03 - 15:13:25 »
wie wäre es denn mit @Command([ToolsRefreshSelectedDocs]); ??
Egal wie tief man die Messlatte für den menschlichen Verstand auch ansetzt: jeden Tag kommt jemand und marschiert erhobenen Hauptes drunter her!

Offline Axel

  • Moderator
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 8.658
  • Geschlecht: Männlich
  • It's not a bug, it's Notes
Re:Agent - öffnen und wieder speichern
« Antwort #6 am: 26.05.03 - 15:46:44 »
Hi,

so was hab ich vor kurzem erst gebraucht.

Hier ist das Teil:

Zitat
Dim session As New NotesSession
Dim db As NotesDatabase
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Dim uidoc As NotesUIDocument
Dim workspace As New NotesUIWorkspace


Set db = session.CurrentDatabase
Set collection = db.UnprocessedDocuments

Set doc = collection.GetFirstDocument
   
While Not (doc Is Nothing)
  Set uidoc = workspace.EditDocument( True, doc)
  Call uidoc.Save
  Call uidoc.Close
      
  Set doc = collection.GetNextDocument(doc)
Wend  'While Not (doc Is Nothing)


Pack den Code in einen Agenten und setze die Option "Für ausgewählte Dokumente".

Axel

Ohne Computer wären wir noch lange nicht hinterm Mond!

Offline harkpabst_meliantrop

  • Senior Mitglied
  • ****
  • Beiträge: 463
  • Geschlecht: Männlich
  • I love!
    • Heute schon gelebt?
Re:Agent - öffnen und wieder speichern
« Antwort #7 am: 26.05.03 - 15:49:12 »
Jepp! Diesen Agenten (unter anderem) packe ich (mit ner Entwicklerrolle vor Missbrauch geschützt) erstmal in jede neue Datenbank, wenn ich ein Projekt anfange. Extrem praktisch.

edit:
Ups, wieder mal zu lange das Fenster aufgehabt. Bezog sich ebenfalls auf Eknoris Posting ...
« Letzte Änderung: 26.05.03 - 17:08:56 von harkpabst_meliantrop »

Offline Gandalf

  • Junior Mitglied
  • **
  • Beiträge: 83
  • Geschlecht: Männlich
  • Alles wird gut - nur weiss halt keiner wann
    • Unterwegs-im.net
Re:Agent - öffnen und wieder speichern
« Antwort #8 am: 26.05.03 - 16:10:34 »
Thx @all
Enknoris weg war für mich der einfachere
da ich ein Scriptdau bin
werd es aber auch ohne Zeitdruck mal an der Datenbank testen

Bye
gandalf
DerjetztinRuheFeierabendmachenkann :-)

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz