Hallo zusammen!
Ich habe ein kleines Problem:
In meinem Notes Adressbuch habe ich ein zusätzliches Profildokument angelegt:
"(parameter)"
In diesem gibt es das Feld: "produktgruppe"
Ich versuche nun in LS wie folgt das Feld "Produktgruppe" auszulesen:
Dim Session As New NotesSession
Dim db As NotesDatabase
Set db = Session.currentdatabase
Dim param_prgr As String
Dim ergdoc As NotesDocument
'Vorgabewerte aus Profildokument holen
Set ergdoc = db.GetProfileDocument("(parameter)")
param_prgr = ergdoc.GetItemValue ("produktgruppe")
In "param_prgr" möchte ich den Wert des Feldes "produktgruppe" aus dem Profildokument schreiben. Später möchte ich "param_prgr" in eine SQL als Textwert einfügen:
In etwa so: "SELECT * FROM KUNDEN WHERE PRODUKGRUPPE = " & param_prgr & " AND ..."
Ich erhalte aber bei:
param_prgr = ergdoc.GetItemValue ("produktgruppe")
ein "TypeMissmatch"!
Habe schon ein paar Sachen versucht, aber leider keinen Erfolg.
Das Feld "produktgruppe" enthält den Wert "30" und ist ein Textfeld.
Habe Testweise mal den Inhalt aus "produktgruppe" in das Feld einer anderen Maske
geschrieben. Tast hat funktioniert.
Was mache ich falsch?
Vielen Dank im Voraus!
Gruß René