Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Steffen_Albrecht am 21.01.03 - 07:05:54

Titel: @DialogBox
Beitrag von: Steffen_Albrecht am 21.01.03 - 07:05:54
Hallo,

ich möchte aus einer Ansicht heraus mit hilfe einer Dialogbox ein neues Doc erstellen.
Wenn bereits ein Doc erstellt wurde, soll es in der Dialogbox geöffnet werden.
In der Dialogbox sollen nur 2 Angaben gemacht werden ("Server" und "Datenbank").

Hat evtl. jemand eine Idee wie ich das bewerkstelligen kann?

Danke und Gruß
   Steffen
Titel: Re:@DialogBox
Beitrag von: dirk_2909 am 21.01.03 - 08:28:43
Moin!

Versuch mal im Ansichtsereignis "QueryopenDocument" das entsprechende Dok mit der Dialogbox zu öffnen. Wenn keins da ist muss ein neues created werden.
Bsp:

......
Dim doc As NotesDocument
Set doc = uidoc.Document
Set coll = Source.Documents
Set docpos = coll.GetFirstDocument
if docpos is Nothing Then
   'hier neues Dic erzeugen
End if
Dim intFlag As Integer
If uidoc.Editmode And uidoc.FieldGetText("Server")<>"" Then
      docpos.Server=doc.Server      
      intFlag=ws.DialogBox( "MAskenname", True, True, False, False, False, False, "Titel", docpos, True)



Ich hoffe das Hilft. Oder habe ich das falsch verstanden?

Dirk
Titel: Re:@DialogBox
Beitrag von: Steffen_Albrecht am 22.01.03 - 09:40:28
Danke!

Hat mir weitergeholfen!

Gruß
    Steffen