VB6でのSQLでのアクセスデーターの追加について

abc = "insert into 社員テーブル(コード,名前) values ('0002','Takeda')"
c1.Execute abc

上記のようにプログラムで直接データーを入力すると
データーは追加で登録できるのですが

下記のように、テキストボックス１(tx1.Text)とテキストボックス２(tx2.Text)にデーターを入力して、入力した
内容を追加しようとするとエラーになります。
どこが間違っているのでしょうか？

abc = "insert into 社員テーブル(コード,名前) values (tx1.Text,tx2.Text)"
c1.Execute abc

No.4 回答者： fortranxp 回答日時： 2005/04/20 17:08

abc = "insert into 社員テーブル(コード,名前)values (" & "'" & Cstr(tx1.Text) & "'" & "," & "'"

Cstr(tx2.Text) & "'" & ")"
c1.Execute abc
では。

No.3 ベストアンサー 回答者： iiikkk 回答日時： 2005/04/20 17:00

#2です。

間違えてました。
下記が正解です。

"insert into 社員テーブル(コード,名前) values ('" & tx1.Text & "','" & tx2.Text & "')"

この回答へのお礼

早速の回答、有難うございました。

回答通り実行しましたら、うまく追加登録が出来ました。

VB6を勉強中でいろいろとわからな

い事が多くて、今後もよろしくお願いします

お礼日時：2005/04/20 18:08

No.2 回答者： iiikkk 回答日時： 2005/04/20 16:56

これでは、'tx1.Text'をコードに、'tx2.Text'を名前に登録しようとしていますよ？

正しくは、
"insert into 社員テーブル(コード,名前) values (" & tx1.Text & "," & tx2.Text & ")"
です。

No.1 回答者： akey 回答日時： 2005/04/20 16:49

abc = "insert into 社員テーブル(コード,名前) values ('" & tx1.Text & "','" & tx2.Text &"')"

c1.Execute abc

では如何？

この回答へのお礼

有難うございました。回答通り実行しましたら、うまく

追加登録が出来ました。今後もよろしくお願いします

お礼日時：2005/04/20 18:09