Das Notes Forum
Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: pippo am 02.04.08 - 12:41:08
-
Hallo,
kann ich folgendes realisieren?
Wenn ein User eine bestimmte NotesDB auf Web öffnet (User ist in ACL als Autor eingetragen) dann sollte ein bestimmtes Dok geöffnet werden. Existiert das Doc nicht, so sollte ein Compose gemacht werden, wo der User dann eben bestimmte Daten eingeben und speichern kann.
So würde das in Script aussehen:
-----------------------------------------------
Dim ws As New NotesUIWorkspace
Dim s As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim doc As NotesDocument
Dim dc As notesdocumentcollection
Set db = s.CurrentDatabase
Set view = db.getview("lookupUser")
Set dc = view.GetAllDocumentsByKey ("misterX",True)
If dc.Count = 0 Then
'set doc = db.createdoc...
Call ws.EditDocument (True,doc)
Elseif dc.Count = 1 Then
Set doc = dc.GetFirstDocument
Call ws.EditDocument (True,doc)
Else
Msgbox "Fataler Fehler..."
'...
End If
-----------------------------------------------
ist das möglich?
schönen Tag
-
Ja. ;D
Falls Du auch nach dem "wie" fragen wolltest:
Datenbank per default auf eine Page öffnen. Die Page als HTML-Dokument definieren, mit einem redirect drinnen. Die URL des redirects als Computed Text und dort drinnen dann der Check, ob ein Dokument schon exisitiert und die URL entsprechend zusammenbauen.
Wäre mein Ansatz.
-
Hallo,
geht das nicht einfacher?
mit Agent??
-
Braucht weniger code Zeilen als die LotusScript Lösung.
-
Hallo,
geht das öffnen von Docs auf Web nur mit: sowas
http://www.quecksilber.com/verkauf.nsf/35AE8FBFA573336A852563D100741784?OpenDocument&
oder geht das auch mit Agent per Script???
-
Ich kann kein Doc auf Web aufmachen - was immer das auch ist. :-:
-
Du kannst auch Script Agenten auf einen Domino Web-Server aufrufen, die dann irgendwelche Ausgaben produzieren:
http://www.quecksilber.com/verkauf.nsf/machwas?OpenAgent
Sowohl print - Ausgaben, als auch Aufrufe von URLs sind machbar.
Hubert