ADO und SETVAR bei STRQMQRY

[padawan]

sehr gerne, ich hoffe, daß Dir der ODBC-Treiber-Fehler CPF0006 etwas sagt:


Serverfehler in der Anwendung /IMHO.

[IBM][iSeries Access ODBC-Treiber][DB2 UDB]CPF0006 - Im Befehl ist ein Fehler aufgetreten.

Beschreibung: Unbehandelte Ausnahme beim Ausführen der aktuellen Webanforderung. Überprüfen Sie die Stapelüberwachung, um weitere Informationen über diesen Fehler anzuzeigen und festzustellen, wo der Fehler im Code verursacht wurde.

Ausnahmedetails: System.Runtime.InteropServices.COMException: [IBM][iSeries Access ODBC-Treiber][DB2 UDB]CPF0006 - Im Befehl ist ein Fehler aufgetreten.

Quellfehler:

Zeile 116: CallCmd = Replace(CallCmd, "'", "''")
Zeile 117:
Zeile 118: cnn.Execute("CALL QSYS.QCMDEXC('" & CallCmd & "', " & Format(Len(CallCmd), "0000000000.00000") & ")")
Zeile 119: 'cnn.Execute(CallCmd)
Zeile 120:

Stapelüberwachung:

[COMException (0x80004005): [IBM][iSeries Access ODBC-Treiber][DB2 UDB]CPF0006 - Im Befehl ist ein Fehler aufgetreten.] ADODB.ConnectionClass.Execute(String CommandText, Object& RecordsAffected, Int32 Options) +0 AÜA.btn_aüa_Click(Object sender, EventArgs e) in C:\Dokumente und Einstellungen\trumpfheller\Eigene Dateien\Visual Studio 2008\WebSites\IMHO\AÜA.aspx.vb:118 System.Web.UI.WebControls.Button.OnClick(EventArgs e) +111 System.Web.UI.WebControls.Button.RaisePostBackEven t(String eventArgument) +110 System.Web.UI.WebControls.Button.System.Web.UI.IPo stBackEventHandler.RaisePostBackEvent(String eventArgument) +10 System.Web.UI.Page.RaisePostBackEvent(IPostBackEve ntHandler sourceControl, String eventArgument) +13 System.Web.UI.Page.RaisePostBackEvent(NameValueCol lection postData) +36 System.Web.UI.Page.ProcessRequestMain(Boolean includeStagesBeforeAsyncPoint, Boolean includeStagesAfterAsyncPoint) +1565

[Fuerchau]

CPF0006 ist ein Syntaxfehler im Kommando.

Nimm also dein Kommando und kopiere es in eine Befehlszeile auf der AS400.

Ist die Zeile zu klein, einfach CALL QCMD aufrufen und F11 drücken.
Ggf. zu viele/zuwenige Hochkommas ?