Hallo,
kurz vor der Verzweiflung - vielleicht gibts ja jemand der mir damit helfen kann:
In meiner Web-Anwendung sollen mehrere Felder meiner Dokumente wie mit InViewEdit bearbeitbar sein. Dazu hab ich mir eine Sample-DB von William Be (http://notesweb2.blogspot.com/2006/06/inviewedit-on-web.html) ausgeliehen und angepasst. Die hat am Anfang auch schonmal sehr gut funktioniert.
Darin hab ich dann ein Knöpfchen zum Anlegen neuer Dokumente eingebaut und jetzt fängt das leidige lfd.-Nr.-Problem an. Dafür rufe ich folgenden Agenten als WebQuerySave auf:
Sub Initialize
Dim s As New notessession
Set db = s.currentdatabase
Set view = db.getview("Abw_sort_nach_lfd")
Call view.refresh
Set doc = view.getfirstdocument
If doc Is Nothing Then
number = 1
Else
number = Cint(doc.lfd_nr(0)) + 1
End If
Set doc = source.document
doc.lfd_nr = number
Call doc.save(True,False,True)
End Sub
(Dasselbe verwende ich für den NotesClient als QuerySave und da funktionierts einwandfrei)
Wenn ich jetzt im Web ein Dokument anlege sagt mir die Conosle Agent 'WebSave' error: Variant does not conain an object!
Das Dokument ist zwar da, allerdings ganz ohne Nummer
Die Designelemente von WebInViewEdit scheinen jetzt auch nur noch oberflächlich zu funktionieren - es wird tatsächlich nichts mehr gespeichert. Auch die neu angelegten Dokumente sehe ich erst wenn ich den Browser beende und die Datenbank neu öffne.
Ich hoffe es weiss jemand rat... :-?
Herbert :-?