Domino 9 und frühere Versionen > ND7: Entwicklung

Löschen von mehreren privaten Ansichten

(1/2) > >>

Sommersprosse:
Hallo zusammen,

ich brauche mal wieder einen Rat von euch.

In meinem Workflow habe ich mehrere Private Ansichten (Gemeinsam, privat bei Erstbenutzung)
Diese will ich über den Query Save löschen.

Mit

--- Code: ---Sub Queryclose(Source As Notesuidatabase, Continue As Variant)
Dim session As New NotesSession     
Dim db As NotesDatabase
Dim view As NotesView
Dim strView As Boolean

Set db = session.CurrentDatabase
Set view = db.GetView("Private Requests")

strView = view.IsPrivate

If strView = True Then
      'löschen
Call view.Remove()
End If
End Sub
--- Ende Code ---

funktioniert es soweit ganz gut, aber wie kann ich Notes dazu bewegen, damit mehrere Ansichten zu löschen.  Mir ist irgendwie die Syntax nicht ganz klar, wie ich mehrere Views angeben kann. Script ist nicht so meine Stärke..

Geht das überhaupt?

Danke schon mal.

DAU-in:
Du kannst z.B. die Namen alle in einem Stringarray einlesen, und dann einen Loop durch den Array machen.


grüsse

Dau-in

Sommersprosse:

--- Zitat von: DAU-in am 12.11.08 - 13:57:22 ---Du kannst z.B. die Namen alle in einem Stringarray einlesen, und dann einen Loop durch den Array machen.

--- Ende Zitat ---

 ??? ??? ???

Sorry, genau das ist mein Problem... ich habe keine Ahnung wie ich so was mache.
Vom Prinzip her klar, aber wie kriege mache ich ein Stringarray in Script.

DAU-in:
dim strarray(2) as String

strarray(0) = "View1"
....


forall x in strarray

Set view = db.GetView("Private Requests")
   
   strView = view.IsPrivate
   
   If strView = True Then
      'löschen
      Call view.Remove()
   End If


etc.

oder for i=0 to 2

Set view = db.GetView(strarray(i))

grüsse

Dau-in

Sommersprosse:

--- Zitat von: DAU-in am 12.11.08 - 14:09:54 ---dim strarray(2) as String

strarray(0) = "View1"
....
oder for i=0 to 2

Set view = db.GetView(strarray(i))


--- Ende Zitat ---

Hab mich dafür entschieden..... und es funktioniert so wie ich es haben wollte. Werde mir das für das nächste Mal merken.

Danke!

Navigation

[0] Themen-Index

[#] Nächste Seite