Hallo zusammen,
ich versuche einen Befehl aus einem Word Makro per VBA auf der iseries zu starten.
Code:
Dim strSelect, strBefehl As String
Dim rsObjekt As New ADODB.Recordset
strBefehl = "WRKSPLF OUTPUT(*PRINT)"
strSelect = "CALL QSYS.QCMDEXC ('" & strBefehl & " ' " & Format(Len(strBefehl), "0000000000.00000") & ")"
rsObjekt.Open strSelect, conAuB
Dabei bekomme ich immer einen Laufzeitfehler:
-2147217887(80040e21)
Der ODBC Treiber unterstützt die angeforderte Eigenschaften nicht.
Der Connection String ist
Code:
strConnect = "Driver={iseries Access ODBC Driver};" & _
"System=10.0.30.10;" & _
"Uid=" & puser & ";" & _
"Pwd=" & pPassword & ";"
Muss ich einen anderen Treiber benutzen und wenn ja, welchen?
Installiert ist Iseries Access für Windows 6.0
Bookmarks