コマンドに未登録のフレーズ/キーワードが含まれています

Question

vb6プロジェクトがあり、レコードセットから視覚的なfoxproテーブルを更新する必要があります。私の問題は、テーブルを更新しようとしたときです。エラーmsg：コマンドに未登録のフレーズ/ keywords.My日付フィールドがconcern.I iはright.Hereが私のコードで、コードの最後の部分を書かれた場合は知らないされるという問題が位置しています：

rs2.Open "update transac set no_ot_1_5 = " & rs1.Fields("ovt1") & ", no_ot_2_0 = " & rs1.Fields("ovt2") & ", no_ot_3_0" _ 
& "= " & rs1.Fields("ovt3") & "where code = '" & rs1.Fields("emp_code") & "and transac.date = & trans.txtend &", cn1, adOpenDynamic, adLockPessimistic 

Answer 1

G Mastrosのソリューションがまだ完全でない場合は、「日付」フィールドのデータタイプが正しくない可能性があります。あなたは、テキスト文字列で送信しているかのように

transac.date = CTOD（ '」& trans.txtend &「'）」

に変更する必要があるかもしれませんが、日付は、DATE型のフィールドでありますVFPで認識される関数に変換する必要があります... CTOD（）は文字列を日付に変換します

Answer 2

これを試してみてください：

rs2.Open "update transac set no_ot_1_5 = " & rs1.Fields("ovt1") & ", no_ot_2_0 = " & rs1.Fields("ovt2") & ", no_ot_3_0" _ 
& "= " & rs1.Fields("ovt3") & " where code = '" & rs1.Fields("emp_code") & "' and transac.date = '" & trans.txtend &"'", cn1, adOpenDynamic, adLockPessimistic 

それはあなたのように見えますWHEREキーワードの前に空白がなく、emp_codeの後に一重引用符がありませんでした。それはまた、あなたがトランクの日付に問題があるように見えます。