Autor Thema: Per Skript erstellte Views werden nicht sofort angezeigt  (Gelesen 1582 mal)

Offline AlexS78

  • Frischling
  • *
  • Beiträge: 40
Hi,

ich erstelle über ein Skript mehrere Views.
Set view = db.CreateView ("Viewname")

Dieses wird aber erst in der DB angezeigt wenn man die Views im Designer aktualisiert.

Gibt es eine Möglichkeit die per Skrip zu aktualisieren?

Vielen Dank
Alex

Offline doliman

  • Senior Mitglied
  • ****
  • Beiträge: 332
  • Geschlecht: Männlich
    • www.doleschel.de
Re: Per Skript erstellte Views werden nicht sofort angezeigt
« Antwort #1 am: 28.01.06 - 13:32:02 »
Hi,

folgende Script macht das, mit der Einschränkung, das die Datenbank in der die View erstellt wird im Frontend geöffnet sein sollte, sonst ist uidb leer und macht "object variable not set".

Sub Initialize
   Dim s As New NotesSession
   Dim viewAll As NotesView
   Dim viewTopics As NotesView
   
   Set viewAll = s.CurrentDatabase.GetView("($JunkMail)")
   Set viewTopics = _
   s.CurrentDatabase.CreateView("Topics", "SELECT @All")
   Call viewTopics.SetAliases("Topics|Topics")
   Set col2 = viewTopics.CopyColumn(viewAll.Columns(0), 2)
   Call viewTopics.Refresh
   
   Dim ws As New NotesUIWorkspace
   Dim uidb As NotesUIDatabase
   Set uidb = ws.CurrentDatabase
   
   Call uidb.OpenView("Topics")
End Sub


Grüßle
                           _///_
                          (o~o)
-------------oOOO--(_)--OOOo-------------
Frank Doleschel

----------------------
Ein Berufsleben ohne Notes ist zwar möglich aber die Alternativen sind erschreckend ;-)

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz