Verständnisproblem - Auswahl von Datensatz anhand einer Aktion

[Angelos]

Hallo Leute,

Ich habe da ein kleines Problem mit einer Aktion. Und zwar habe ich eine Maske angefertigt in der es einen Button gibt, der eigentlich beim Drücken ein Pop-Up erstellen soll, damit man einen bestimmte Datensatz auswählen kann. Das Problem hierbei ist, dass ich die Aktion mit Copy & Paste übernommen habe und ich nun anstatt auf den Server zu verweisen, auf meine lokale Datenbank verweisen will. D.h. die Aktion soll nicht die Datensätze aus der Serverdatenbank anzeigen, sondern diejenigen, die ich lokal gespeichert habe.

Code

Sub Click(Source As Button)
	
	On Error Goto ERRORHANDLE
	
	Dim db As New NotesDatabase( "ax123/ABCDE/DE","dochouse\DHPro.nsf" )
.....

Nun meine Frage: Im obigen Code ist doch bei "Dim db As..." die Verzeichnissangabe der Datenbank, oder nicht?
Wie muss ich das umändern um auf meine lokale Datenbank zuzugreifen?

[klaussal]

1.Du möchtest Dir in der Designer-Hilfe mal das Thema "Notes DatabaseClass" durchlesen.

2. Solltest du mal einen Lehrgang in Notes besuchen oder Fachliteratur kaufen.

[m3]

Designer-Hilfe -> Notes Database Klasse -> Methode New

Den Text aus der Hilfe paste ich Dir hier jetzt nicht rein, damit Du das Suchen in der Hilfe ein wenig übst.

[Angelos]

ok, danke soweit. Nun weiss ich sschonmal wie ich die Verzeichnisse richtig angebe. 

Aber sobald ich jetzt auf meine Database zugreifen will, kommt eine Fehlermeldung:"Eintrag nicht in Gestaltungsliste".
Was ist das schon wieder?

@klauss:
Ein Lehrgang in Notes ist verdammt teuer für einen Erstsemstler.  Woher das Geld nehmen?

[klaussal]

Aber sobald ich jetzt auf meine Database zugreifen will,

Wie denn ? Meine Kristallkugel sonnt sich gerade......

Wenn kein Geld für einen Lehrgang, dann wenigstens ein Buch aus dem Herdt-Verlag ( ca. 30,-€).
Ohne Basics bringt das alles nix.

[WernerMo]

Hallo

Buch aus dem Herdtverlag würde ich auch empfehlen.

Und vermutlich hast Du beim "Kopieren" eine Ansicht/einen Ansichtnamen mit kopiert, den es in Deiner Datenbank nicht gibt.

Gruß Werner

[m3]

1) Wenn Du Dir als Erstsemester eine Notes Client, Designer und Server Lizenz leisten kannst, sollte auch ein Kurs drinnen sein.

2) BITTE installier Dir einen englischen Server/Client. Mit den deutschen Fehlermeldungen kann man ja nix anfangen.

[klaussal]

1) Wenn Du Dir als Erstsemester eine Notes Client, Designer und Server Lizenz leisten kannst, sollte auch ein Kurs drinnen sein.

Da wollte ich gar nicht fragen, aus welcher Quelle das kommt..... 

Könnte ja auch ne Beta sein......

[Angelos]

ICH hab mir den Notes-Client nicht gekauft.  
Ich benutz ihn im Büro bei der Arbeit. Das alles läuft ja im Rahmen einer Studienarbeit. Ja doch, ein Buch scheint echt was herzugeben. Ist das oben genannte wirklich gut?

Hmm, zum Probelm muss ich mal den Kollegen fragen, wenn er wieder da ist...

Danke soweit.

[m3]

ICH hab mir den Notes-Client nicht gekauft. 
Ich benutz ihn im Büro bei der Arbeit. Das alles läuft ja im Rahmen einer Studienarbeit.

Na dann müsste/sollte auch eine entsprechende Schulung und/oder literatur drinnen sein. Du bist ja kein dummer Leiharbeiter.

[klaussal]

Du bist ja kein dummer Leiharbeiter.

... aber vielleicht ein Praktikant, der ausgenutzt wird.....

[Angelos]

weder noch. ich bin ganz normal angestellt. Ba-Studium kennt ihr doch sicher. 3 Monate Praxis im Unternehmen, 3 Monate Studium an der Berufsakademie.

[Glombi]

Ein Tip, wie man deutsche Fehlermeldungen in Englisch ausgibt, ohne den Client neu installieren zu müssen: In den Benutervorgaben Englisch einstellen und den Client neu starten.

Mach das doch mal, vielleicht gehts dann hier fachlich weiter!

Andreas

[Angelos]

Danke soweit für eure Hilf, ich bin inzwischen weiter gekommen. Ich musste lediglich das hier

Code

Dim db As New NotesDatabase( "ax123/ABCDE/DE","dochouse\DHPro.nsf" )

entfernen und schon gings. 

Aber momentan häng ich woanders.

Code

	Set doc = ws.CurrentDocument.Document	
	back = ws.PickListStrings ( PICKLIST_CUSTOM, _
	False, _
	db.Server, _
	db.FilePath, _
	"(Projektdokumente \nach Projektnummer)", _
	"Projektauswahl", _
	"Bitte ein Projekt auswählen", _
	1, "")
	If Isempty(back) Then Exit Sub	

Und zwar kommt bei diesem Eintrag folgende Fehlermeldung:
"Variant does not contain an object"

Ich kann damit nichts anfangen. Was will mir Notes damit sagen? 

[m3]

Dass Du die eine Zeile fälschlicher Weise herausgelöscht hast.

Wie soll er auf db.Server zugreifen, wenn db nicht gesetzt ist?

[klaussal]

Ich kann damit nichts anfangen.

Ich auch nicht. Bitte den ganzen (!) Code posten.

Was will mir Notes damit sagen?

Dass Du einen Fehler gemacht hast  

[Angelos]

Es geht hier ja genau darum, dass die Aktion eben NICHT auf den Server zugreifen soll, sondern auf die Datenbank die ich lokal gespeichert habe und genau jetzt bearbeite.

Dass ich einen Fehler gemacht habe weiss ich auch. 

[m3]

Würdest Du jetzt ENDLICH bitte die Designer-Hilfe zum Thema "NotesDatabase" Klasse, Methode "New" befragen?

Da gibts die Info:

Dim variableName As New NotesDatabase( server$, dbfile$ )
server$ ... String. The name of the server on which the database resides. Use XXXXXXXXXXXXXXX to indicate a database on the current computer:

[Axel]

Auszug aus der Designer-Hilfe:

...
Syntax
Dim variableName As New NotesDatabase( server$, dbfile$ )
or
Set notesDatabase = New NotesDatabase( server$, dbfile$ )

Parameters

server$
String. The name of the server on which the database resides. Use an empty string ("") to indicate a database on the current computer: if the script runs on the workstation, the empty string indicates a local database; if the script runs on a server, it indicates a database on that server.

... und mit current computer ist die lokale Arbeitsstation gemeint.

Axel

[klaussal]

@Axel,

du verrätst aber auch alles....