Autor Thema: Wie kann ich ein Profiledok in einer Dialogbox anzeigen?  (Gelesen 1383 mal)

Offline TMC

  • Freund des Hauses!
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 3.660
  • Geschlecht: Männlich
  • meden agan
Hi,

habe ein Profildok, welches ich aber zum bearbeiten in einer Dialogbox anstatt normaler Maske anzeigen lassen will.

@Dialogbox will ja nur das aktuelle doc.

Hier mein Ansatz, wie komme ich an das Profile-Dok?

--------------------------------------------------
Sub Initialize

   Dim workspace  As New NotesUIWorkspace
   Dim session As New NotesSession
   Dim dbCurrent As NotesDatabase
   Dim doc As NotesDocument
   Dim myFormName As String
   Dim myTitle As String
   Dim Ok As Variant
   
   Set dbCurrent = session.CurrentDatabase
   Set doc = ???
   
   myFormName = "frm_Setup"
   myTitle = "Einstellungen"          
   
   Ok = workspace.DialogBox ( myFormName, True, True, True, False, False, False, myTitle, doc, True,True  )

End Sub
--------------------------------------------------

Grüße,
TMC
Matthias

A good programmer is someone who looks both ways before crossing a one-way street.


Glombi

  • Gast
Re:Wie kann ich ein Profiledok in einer Dialogbox anzeigen?
« Antwort #1 am: 30.08.03 - 17:41:53 »
Das geht mit

set doc = dbCurrent.GetProfileDocument("Name des Profils")

Als Beispiel kannst Du Dir den Agenten "(Preferences)" in der Mailschablone ansehen.

Mit @Dialogbox kannst Du Dir übrigens beliebige Dokument ansehen, Du musst noch zuvor das Backend-Dokument holen.

Andreas
« Letzte Änderung: 30.08.03 - 17:43:06 von Glombi »

Offline TMC

  • Freund des Hauses!
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 3.660
  • Geschlecht: Männlich
  • meden agan
Re:Wie kann ich ein Profiledok in einer Dialogbox anzeigen?
« Antwort #2 am: 30.08.03 - 18:06:45 »
Das geht mit
set doc = dbCurrent.GetProfileDocument("Name des Profils")

Danke  :) :)

Genau das hatte ich gesucht.

TMC
Matthias

A good programmer is someone who looks both ways before crossing a one-way street.


 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz