Das Notes Forum

Domino 9 und frühere Versionen => ND8: Entwicklung => Thema gestartet von: tabama am 16.07.10 - 09:30:22

Titel: keine CurrentDatabase in WS
Beitrag von: tabama am 16.07.10 - 09:30:22

Wie ist es möglich, dass im Workspace keine Aktuelle Datenbank vorhanden ist?

Titel: Re: keine CurrentDatabase in WS
Beitrag von: Klafu am 16.07.10 - 09:37:28

Ist die nicht im Session ?

Set Maildb = session.Currentdatabase

Titel: Re: keine CurrentDatabase in WS
Beitrag von: tabama am 16.07.10 - 09:46:19

Hallo,

ich brauche aber die "uidb" aus "ws", weil ich eine Ansicht öffnen will

  Set uidb = ws.CurrentDatabase
  Call uidb.OpenView("xy")

Titel: Re: keine CurrentDatabase in WS
Beitrag von: BigWim am 16.07.10 - 09:49:59

Zitat von: Designer Hilfe

Returns a NotesUIDatabase object representing the database that's currently open.
...
Usage
The GetCurrentDatabase method supersedes this property due to the failure of the property when the user accesses the current database through View - GoTo (for example, on the workspace menu with the database selected).

Von wo aus erfolgt den der Aufruf Deiner Funktion?
Und poste mal die vollständige Initialisierung Deiner Funktion

Markus

Titel: Re: keine CurrentDatabase in WS
Beitrag von: tabama am 16.07.10 - 09:54:04

Hallo Markus,

über eine Aktion. Die vielen remarks kommen daher, dass ich noch am testen bin.


Sub Click(Source As Button)
   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim view As NotesView
   Set db = session.CurrentDatabase
'    Set view = db.GetView( "Selektionsergebnis" )
'    Call view.Remove
   
    'view privatisieren   
   Dim ws As New NotesUIWorkspace
   Dim uidb As NotesUIDatabase
   
'   Set uidb = session.CurrentDatabase
   
   Set uidb = ws.CurrentDatabase
   Call uidb.OpenView("xy")
   
    'view schließen   
'    Dim ws As New NotesUIWorkspace
   Dim uiview As NotesUIView
   Set uiview = ws.CurrentView
   Call uiview.Close
End Sub

Titel: Re: keine CurrentDatabase in WS
Beitrag von: BigWim am 16.07.10 - 10:10:17

Verhält sich bei mir genauso - kann ich Dir aber nicht erklären.

ich hole mir - wie Klafu - die Datenbank auch immer über session.

Markus

Titel: Re: keine CurrentDatabase in WS
Beitrag von: m3 am 16.07.10 - 10:10:35

Zitat von: tabama am 16.07.10 - 09:46:19

Hallo,

ich brauche aber die "uidb" aus "ws", weil ich eine Ansicht öffnen will

  Set uidb = ws.CurrentDatabase

Zitat von: Designer-Hilfe:

The GetCurrentDatabase method supersedes this property due to the failure of the property when the user accesses the current database through View - GoTo (for example, on the workspace menu with the database selected).

Titel: Re: keine CurrentDatabase in WS
Beitrag von: tabama am 16.07.10 - 10:50:45

Hallo,

habe den Verweis auf die Hilfe nicht verstanden. Habe mir nochmal die Hilfe angeschaut. Dort steht weit und breit nichts davon, dass ich die uidb nicht über eine Aktion aufrufen kann.

Nun habe ich im querryopen und postopen der Ansicht die uidb holen wollen, aber auch das geht schief.

Weiß jemand wo ich die uidb greifen kann bzw. wie ich mit script eine View öffnen kann?

Titel: Re: keine CurrentDatabase in WS
Beitrag von: BigWim am 16.07.10 - 11:05:35

Code

	Dim ws As New NotesUIWorkspace
	Dim uidb As NotesUIDatabase
	
	
	Set uidb = ws.GetCurrentDatabase
	Call uidb.OpenView("xy")

Markus

Zitat

Weiß jemand wo ich die uidb greifen kann bzw. wie ich mit script eine View öffnen kann?

Mal ehrlich. Wenn nicht hier wer dann? Aber das funktioniert besser, wenn Du z. B. das hier (http://atnotes.de/projekte/bp/team/tmc/_forumsregeln/rules001.html#22) beachten würdest ...

Titel: Re: keine CurrentDatabase in WS
Beitrag von: S2000 am 16.07.10 - 11:07:49

Hallo,

also die currentview hast du ja im zugriff (siehe dein screenshot) und für jede weitere View kannst du über das database object der session gehen.

Gruß
Armin

Titel: Re: keine CurrentDatabase in WS
Beitrag von: tabama am 16.07.10 - 11:12:06

Hallo Armin,

mein Ziel ist es aber, eine View im Frontend zu öffnen. Dazu gibts die Methode "uidb.OpenView". Und dazu brauche ich halt die "uidb".

Trotzdem Danke

Titel: Re: keine CurrentDatabase in WS
Beitrag von: S2000 am 16.07.10 - 11:16:33

... ok, und soll dann in der ansicht gemacht werden (könntest ja auch ne form nehmen mit ner embedded view und die view über ein feld in der form bestimmen).

Gruß
Armin

Titel: Re: keine CurrentDatabase in WS
Beitrag von: Klafu am 16.07.10 - 11:19:15

Code

This example gets the current database and opens the By Category view.
Dim workspace As New NotesUIWorkspace
Dim db As NotesUIDatabase
Set db = workspace.GetCurrentDatabase
Call db.OpenView("By Category")

Chris

Titel: Re: keine CurrentDatabase in WS
Beitrag von: BigWim am 16.07.10 - 11:25:23

@Chris

Vielleicht hätte ich in meinem Post noch beschreiben müssen, dass statt xy noch der Name der View einzusetzen ist. Aber ich dachte, weil es sein Beispiel war, wäre das nicht nötig ....

Ich hoffe, Dein Beispiel macht es deutlicher

Markus

Titel: Re: keine CurrentDatabase in WS
Beitrag von: Klafu am 16.07.10 - 11:30:18

Hallo Markus,

Jetzt fällt mir erst auf, das wir praktisch das selbe geposted haben.
Aber wir werden sehn, ob dies den Threadersteller auf die richtige Bahn bringt  ;)

Chris

Titel: Re: keine CurrentDatabase in WS
Beitrag von: tabama am 16.07.10 - 11:42:41

Hallo Chris und Markus,

zuerst habe ich gedacht, nun habe ich den Fehler.
Ich habe nämlich nicht die Methode mit "get" aufgerufen, sondern die Eigenschaft benutzt.

Aber es kommt das gleiche raus: CurrentDatabase ist leer.

Titel: Re: keine CurrentDatabase in WS
Beitrag von: Klafu am 16.07.10 - 11:57:41

Geh in deine Maildatenbank - erstelle eine neue E-Mail.
In dieser erstellst du einen Button der folgendes LS ausführt:

Zitat

Sub Click(Source As Button)
   Dim workspace As New NotesUIWorkspace
   Dim db As NotesUIDatabase
   Set db = workspace.GetCurrentDatabase
   Call db.OpenView("($All)")
End Sub

Dann geht die Ansicht: Alle Dokumente auf.
Klappt reibungslos.

Chris

Titel: Re: keine CurrentDatabase in WS
Beitrag von: tabama am 16.07.10 - 12:48:09

Hallo,

@Chris: Es ist aber nicht mein Ziel in der Mail-DB eine Ansicht zu öffnen, sondern in der gerade aktuellen (was nicht die Mail-DB ist).

Ich habe es nun geschafft, die uidb in meiner Aktion zu haben. Ich ermittle diese in einer scriptbibliothek und binde diese in die Aktion ein.
Wie ihr sehen könnt, ist die uidb da und die Views sind auch drin. Nun bekomme ich aber eine Fehlermeldung, wenn ich eine der views öffnen will.

Titel: Re: keine CurrentDatabase in WS
Beitrag von: Klafu am 16.07.10 - 12:57:39

Davon, das du nich aus der Maildb die "Alle Dokumente" Ansicht öffnen willst, bin ich ausgegangen.
Ich wollte dir nur ein Beispiel zeigen, wie du diese Funktion einsetzen kannst.
Du musst praktisch nur statt wie bei mir "($All)" "0Gesamt\Nach Instiut" einsetzen und es muss gehen.
Da brauchst du auch keine Scriptbibliothek.

Willst du nicht mal deinen ganzen Code posten ?

Chris