Hallo,
ich hatte endlich mal wieder Zeit, an diesem Projekt weiterzuarbeiten. Ich habe es noch nicht hinbekommen. Meine Lage:
- ich habe einen Domino Server 7
- ich habe auf dem selben Rechner DB2 8.2 Enterprise Edition laufen
- ich habe einen weiteren Rechner mit einem Notes Client
- der Notes Client kann prima mit dem Domino Server kommunizieren
- Domino kann prima mit DB2 kommunizieren, Domino ist via Access Server mit DB2 verbunden
- ich habe eine DB designt und auf dem Domino Server abgelegt
- vom Client aus gestalte ich sie
Das ist das Skript (liegt in einem Button):
Sub Click(Source As Button)
Dim src As New LCConnection ("db2")
Dim fldLst As New LCFieldList
Dim fld As LCField
Dim count As Integer
Dim text As String
Dim session As New NotesSession
Dim db As NotesDatabase
Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
'set the appropriate properties to connect
src.Database = "BUCHDB"
src.Userid = "db2admin"
src.Password = "***"
src.Connect
'clear text variable
text = ""
'now connected, we can execute a selection statement
If (src. Execute ("SELECT * from ADRESSE", fldLst) = 0) Then
text = "No records were fetched."
End If
Set fld = fldLst.Lookup ("NAME")
'fetch each record from the result set
While (src.Fetch (fldLst) > 0)
count = count + 1
text = text + fld.text(0) & ","
Wend
'post text in field name
Set db = session.CurrentDatabase
Set uidoc = ws.CurrentDocument
Call uidoc.FieldSetText("Name", text)
End Sub
In den Options des Forms steht:
Option Public
Uselsx "*lsxlc"
Führe ich die DB vom Client aus auf, kommt der Fehler "Error creating product object". Führe ich sie vom Client auf dem Rechner mit dem Domino Server aus, geht alles.
Muss ich in dieser Konstellation einen DB2 Runtime Client installieren? Ich dachte immer, das braucht man nur, wenn man Domino und DB2 auf getrennten Rechnern hat?
Kann mir bitte jemand Hinweise geben?
Grüße und Danke
Björn
