Fehlermeldung öffnen einer View per Script

[awagner]

Hallo zusammen,

seit gestern beschäftigt mich folgendes Problem:
Wir haben ein eigenentwickeltes Adressbuch im Einsatz, welches auch so ne Pickerfunktionalität mit drin hat.
Allerdings ist die bis jetzt mit Profildokumenten gelaufen, aber das ganze sollte jetzt umgebaut werden,
dass die Profildoc's nicht mehr benötigt werden.

Ich habe mir jetzt eine Funktion gebastelt, die den Buchstaben übergibt, der gerade angeklickt wurde.
Die Funktion macht folgendes:

Code

Function pickIt(Buchstabe As String)
	Dim session As New notessession
	Dim workspace As New NotesUIWorkspace
	Dim uiview As NotesUIView
	Dim uidb As NotesUIDatabase
	
	Call workspace.SetTargetFrame("RightFrame")
	
	Set uidb = workspace.CurrentDatabase	
	Set uiview= workspace.CurrentView
	
	Call uidb.OpenView(uiview.ViewName, Buchstabe)
End Function

Eigentlich sollte dann der gleiche View wieder aufgerufen werden und eben dann oben das erste Dokument mit dem angeklickten Anfangsbuchstaben anzeigen.
Nur leider kommt in der Zeile "Call uidb.openview(uiview.viewName, Buchstabe)" die Fehlermeldung "Objectvariable Not Set"

Notes kann hier nicht zuordnen, welcher View gerade geöffnet ist...

Kann mir jemand weiterhelfen, wo der Fehler liegt?

Viele Grüße
Andi

[gossifu]

Hallo,

ich hab Deinen Code mal in einen Agenten gepackt und er funktioniert ohne Fehler.
Wo führst Du denn die Funktion aus?

mfg

Kjeld

[awagner]

Der Code wird in einer Maske ausgeführt.
Diese Maske beinhaltet die Picklist

und dann kommt es zu einer Fehlermeldung

[gossifu]

Hallöle,

schau Dir mal die Picklistfunktion in Script mal genauer an.
Da kannst Du beim Aufruf eine Kategorie mitgeben.
Also mach doch einfach für die Picklist eine Ansicht,
welche in der ersten Spalte nach Anfangsbuchstaben der Namen kategorisiert ist.
Beim Aufruf der Picklist gibst Du dann den Buchstaben mit.
Evtl. diese Spalte verbergen,sollte sie in der Picklist mit angezeigt werden.

Wär das was?

mfg

Kjeld

[awagner]

Hi,

das hab ich ja eigentlich schon gemacht.
Nur kann ich aus der Maske heraus, wo ich meine Picklist hinterlegt habe, nicht feststellen,
welcher View gerade geöffnet ist.
Weil diesen aktuell geöffneten View muss ich ja wieder öffnen und dem View einen Buchstaben mitgeben,
welcher gedrückt worden ist.
Die Funktionalität selbst funktioniert bereits, nur muss ich herausfinden, welcher View momentan geöffnet ist.

Grüße

[Driri]

Wenn Du ein Dokument im Fokus hast, kann Dir workspace.CurrentView nichts zurückliefern.

[awagner]

gibt es da überhaupt keine möglichkeit?
kann ich den fokus irgendwie auf die view setzen oder sonst irgendwas machen???

[Driri]

Hmm, ich glaub, ich hab mich verlesen. Du hast vermutlich ein Frameset und z.B. im linken Frame ist eine Maske mit Hotspots oder so und im rechten Frame wird eine View geöffnet.

Wie genau soll denn der Aufbau sein ? Du hast verschiedene Views, die im rechten Frame geöffnet werden können und dann kann der Benutzer dafür jeweils zu einem Anfangsbuchstaben springen ?

Kannst Du evtl. einen Screenshot anhängen ? Das würde die Sache etwas klarer machen.

[awagner]

ja genau so ist es!
hab jetzt mal nen screenshot angehängt!
hoffe das reicht so.

in dem RightFrame werden dann die Views aufgerufen und in der Maske "Picklist" kann der User dann einen Buchstaben auswählen. Dann sollte der aktuelle View nochmal aufgerufen werden (über script oder formel) und eben dann den ausgewählten Buchstaben als Parameter mitgeben

[Driri]

Was mir so spontan einfällt :

- Erstell in der Maske ein verstecktes Feld "ViewName"
- Erstell in der Maske ein verstecktes berechnetes Feld "SaveOptions", Wert "0"

- Bau die Gliederung so um, daß dort nicht ein Element direkt verlinkt wird, sondern über eine Formel die View angesteuert wird.

Die Formel müßte in etwa so aussehen :
@SetField("ViewName", "Ansichtenname");
@SetTargetFrame("RightFrame");
@PostedCommand([OpenView]; "Ansichtenname")

- Bau anschließend die Scriptfunktion so um, daß aus dem UIDocument das Feld "ViewName" ausgelesen wird.

Also in etwa so :

Code

Function pickIt(Buchstabe As String)
Dim session As New notessession
Dim workspace As New NotesUIWorkspace
Dim uidb As NotesUIDatabase
Dim uidoc As NotesUIDocument
Dim Ansicht as String
	
Set uidb = workspace.CurrentDatabase	
Set uidoc = workspace.CurrentDocument
Ansicht = uidoc.FieldGetText("ViewName")

Call workspace.SetTargetFrame("RightFrame")
Call uidb.OpenView(Ansicht, Buchstabe)
End Function

Der Effekt ist, daß beim Auswählen einer View aus der Gliederung der Ansichtenname in das versteckte Feld geschrieben wird. Diesen liest Du wiederum aus, wenn der Picker aktiviert wird.

Edit : Ist ungetestet, könnte aber funktionieren 

[Axel]

Dem Screenshot nach arbeitest du mit einem 8er - Client. Du bist hier aber im 6er-Forum. Für welche Version entwickelst du denn?


Axel

[awagner]

 

ich hab mir gestern den 8er client installiert und bis zu diesem zeitpunkt noch mit dem 6er entwickelt.
Deswegen hab ich dieses Thema im 6er Forum platziert

[gossifu]

Hast Du Dir einmal die pernames.ntf angesehen? Da ist das so eingebaut.

Kjeld

[awagner]

Hallo zusammen,

nachdem mir die vorgeschlagenen Lösungen leider nicht so recht hinhauen wollten,
habe ich das Ganze jetzt über einen Eintrag in die Notes.ini gelöst.

Bei jedem Öffnen von ner View wird eine Variable in der Notes.ini mit dem
View-Namen gefüllt und beim Klick auf einen Hot-Spot Button wird die Variable abgerufen
und der entsprechende View über einen übergebenen Parameter neu geöffnet.

Trotzdem danke für die Hilfe

Grüße