Web Dokument umwandeln

[TomLudwig]

Hallo zusammen,

ich habe ein "Web-Dokument".
Zuerst möchte ich überprüfen ob alle Felder gefüllt sind und dann die Feldinhalte in ein zweites Dokument übernehmen, wobei das "Web-Dokument" nicht gepeichert werden soll.

Zur Überprüfung der Feldinhalte würde ich JavaScript benutzen. Leider ist die im WebQuerySave nicht möglich. Wie kann ich die Werte dann überprüfen?
Zum Übernehmen der Feldinhalten muss ich denke ich per Agenten auf den DocumentContext des "Web-Dokumentes" zugreifen. Dieses dann speichern, sodass ich auf die Feldinhalte zugreifen kann. Und anschließend wieder löschen.
Ist das richtig, oder gibts noch ne andere (einfachere) Möglichkeit?

Vielen Dank schon mal im Vorraus...
Gruß, Tom

[Glombi]

JavaScript geht im OnSubmit Event.

Wenn Du dann noch ein Feld namens SaveOptions mit dem Wert "0" in die Maske einbaust, wird es nicht gespeichert.

Andreas

[TomLudwig]

Gut, aber ich muss dann den Agenten auch im OnSubmit Event aufrufen mit Parametern die mir die Feldinhalte übergeben. Oder kann ich anders drauf zugreifen?

[Glombi]

Du kannst doch im OnSubmit ein

frm=window.document.forms[ 0 ];

if ( validation(frm.Name, "Name") && ...
{
   return true;
}
else
{
   return false;
}

machen und den Agenten im WebQuerySave aufrufen.

Bei [ 0 ] bitte die Blanks wegdenken!

Andreas

[TomLudwig]

Gut die Validierung ob Felder gefüllt sind hat jetzt einwandfrei geklappt. Vielen Dank deswegen schon mal...

Aber mit folgendem Code hab ich noch Probleme die Feldinhalte in ein neues Notesdokument zu übernehmen.
Die zu Übernehmenden Felder sind berechnet mit "[<input type="text" readonly]"
Und genau diesen String bekomme ich in die Felder des neuen Dokumentes geschrieben.

   Dim session As New NotesSession
   Dim db As NotesDatabase   
   Dim doc As NotesDocument   
   Dim process_doc As NotesDocument
   
   
   Set doc = session.DocumentContext            
   Call doc.ReplaceItemValue("SaveOptions","1")   
   Call doc.Save(True, False)
   Call doc.ReplaceItemValue("SaveOptions","0")   
   
   Set db = session.CurrentDatabase
   Set process_doc = db.CreateDocument            
   
   process_doc.Form = "access_process"
   process_doc.title = doc.GetItemValue("title")
   process_doc.path = doc.GetItemValue("path")
   process_doc.server = doc.GetItemValue("server")
Call process_doc.Save(True,False)
   
   doc.Remove(True)
   Print |'Juhu'|

Kann mir da jemand vielleicht noch mal kurz helfen ?!? thx...

[TomLudwig]

Hat keiner einen Tipp parat, was ich falsch mache wenn ich auf die Feldinhalte zugreifen will?