
INSERT INTOステートメント構文エラーについての質問です
VB6.0+Access2003で開発を行っていますがInsert文の発行で上記のエラーメッセージが表示されます。
エラーとなっている部分は
Set rst = Ado_connect.Execute(strINS)
です。
rstはDim rst As ADODB.Recordsetと宣言しています。
Debug.Print strINSでinsert文を取得し、クエリでSQLを実行したところ、正常に追加されました。
様々なサイト等を調べて単純にSQLがおかしいだけだと思って修正をしていたのですがクエリでSQLが正常に実行できたということはSQLに問題がないということでしょうか?
正直手詰まりといった感じでSQL以外に何を修正すれば良いかわからないというのが現状でこちらに質問させていただきました。
皆様の知恵を貸してください。どうかよろしくお願い致します。
No.3ベストアンサー
- 回答日時:
No.4
- 回答日時:
SQL文はパラメータを含んでいるので
パラメータを宣言しておく必要が
あるのでは。
http://support.microsoft.com/kb/181782
また、Parameters.Addメソッドでググってみてください。
Parameters.Add()の設定は単に
obj.Parameters.Add(パラメータ名、データ型)
です。
設定は単純なものですが、設定には少し
とまどうものがあるかもしれません。
参考 VB.NETでのやりとりです。OKWAVEでも過去ログにあるでしょう。
http://bbs.wankuma.com/index.cgi?mode=al2&namber …
No.2
- 回答日時:
通勤時間の最後のカンマは不要です。
strINS = strINS + "'" & .Combo(1).Text & "',"
↓
strINS = strINS + "'" & .Combo(1).Text & "'"
あと、数値型に文字型を代入しても大丈夫だったっけ?
'年齢
strINS = strINS + .Combo(0).Text & ","
'通勤時間
strINS = strINS + .Combo(1).Text
としたほうがいいのでは?
nag0720様>
回答ありがとうございます。
>通勤時間の最後のカンマは不要です
ご指摘ありがとうございます。カンマは消し忘れていました。
>あと、数値型に文字型を代入しても大丈夫だったっけ?
ACCESSのDBをテキスト型に変更しました。
ご指摘いただいた点を変更し、再度実行してみましたが、やはり同じところで同じメッセージがでてきます。
もうちょっと過去ログやプログラムを洗い直して検証しなおしてみます。
ありがとうございました。
No.1
- 回答日時:
その「上記のエラー」やSQLそのものを書いてくれないと、答えようがないんですけど・・・
確かに、SQLを直接実行して成功するが、プログラムからだと失敗する、というケースはあります。
たとえば、SQLに余計な区切り文字(Oracleなら;)を書いているとか・・・
この回答への補足
kotoby2003様>
早速の回答ありがとうございます。
>その「上記のエラー」やSQLそのものを書いてくれないと、答えようがないんですけど・・・
申し訳ございません。記述を忘れていました。
SQLはこのように記述しています。
With aaa
strINS = "INSERT INTO TEST1 ("
strINS = strINS + "NAME,"
strINS = strINS + "INITIAL,"
strINS = strINS + "COUNTRY,"
strINS = strINS + "AGE,"
strINS = strINS + "JIKAN"
strINS = strINS + ") VALUES ("
'名前
strINS = strINS + "'" & .Txt(0).Text & "',"
'名前(イニシャル)
strINS = strINS + "'" & .Txt(1).Text & "',"
'国籍
strINS = strINS + "'" & .Txt(2).Text & "',"
'年齢
strINS = strINS + "'" & .Combo(0).Text & "',"
'通勤時間
strINS = strINS + "'" & .Combo(1).Text & "',"
strINS = strINS + ")"
Set rst = Ado_connect.Execute(strINS)の部分で
「INSERT INTOステートメントの構文エラー」です。とエラーメッセージが表示されます。
>確かに、SQLを直接実行して成功するが、プログラムからだと失敗する、というケースはあります。
勉強になりました。エラーメッセージでもそう言っているのでやはりinsert文がどこかプログラムから実行する上でおかしいのかなと思います。
もう一つ補足ですが、Combo()は年齢(18~60)、通勤時間(5,10,15,20....)とコンボボックスで作成し、DBは数値型にしています。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
先着1,000名様に1,000円分もらえる!
教えて!gooから感謝をこめて電子書籍1,000円分プレゼント
-
INSERT INTOステートメント構文エラー
Visual Basic(VBA)
-
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
抽出条件でデータ型が一致しません。のエラーメッセージが出る
Microsoft ASP
-
4
VBとアクセスでSQL文に変数を使いたいのですが
Visual Basic(VBA)
-
5
アクセス VBAについて FROM句の構文エラー
Access(アクセス)
-
6
アクセスVBAのMe!と[ ]
Access(アクセス)
-
7
accessの SQL文 INSERT命令
Access(アクセス)
-
8
VBAのAccessでDATE型のINSERT
その他(データベース)
-
9
Accessで数値型にNULLをInsertするとエラー
その他(データベース)
-
10
実行時エラー -2147217900 ADODBでレコードセットオープン時エラー
Access(アクセス)
-
11
ACCESS2007 VBA 「INSERT INTO~」について
PowerPoint(パワーポイント)
-
12
Accessのテーブルデータを一気にVBAで追加したい・・
その他(データベース)
-
13
日付型のフィールドに空白を入れる方法を教えてください
その他(データベース)
-
14
Access サブフォームでの選択行の取得
その他(データベース)
-
15
構文エラー:演算子がありません。 ACCESS SQL
その他(データベース)
-
16
VBでSQL文のUPDATE構文を使った時のエラーについて
Visual Basic(VBA)
-
17
AccessのRefresh・Requery・Repaintの違い
Access(アクセス)
-
18
「Nullの使い方が不正です」のエラー
Visual Basic(VBA)
-
19
SQLの構文エラー??
Microsoft ASP
-
20
アクセスで数値型のフィールドにNullをいれたい
その他(データベース)
関連するQ&A
- 1 INSERT INTOステートメント構文エラー
- 2 SQL構文のINSERT INTOエラーについて
- 3 1+(1+2)+(1+2+3)....+(1+2+...+N)の計算式をVBで・・
- 4 VB6.0 →VB2005 のアップグレードでエラー表示
- 5 構造体に関するエラーについて(VB6.0→VB.NET)
- 6 VB6.0をインストールしている環境でVB.NetをインストールしてもVB6.0は動かせるでしょうか?
- 7 VB6.0 VB.NET2003とのクラスの違い
- 8 VB6.0とVB.NET2003の共存は可能ですか?
- 9 VB6.0で作成したプロジェクトのVB.NETへのアップグレードでエラー発生
- 10 VB6.0とaccessのDBを接続する
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
人気Q&Aランキング
-
4
VBS実行時エラー オブジェクト...
-
5
VBSで変数の宣言はできないので...
-
6
EXCEL VBAマクロ中断でデバッグ...
-
7
トランスポートレベルのエラー
-
8
実行時エラー -'-2147417848
-
9
VBAがブレークモードになっ...
-
10
インデックスが有効範囲にあり...
-
11
『実行時エラー 5 プロシージャ...
-
12
VBA 別シートのセルから、文字...
-
13
ADODB.Streamを使用してUTF-8を...
-
14
VB6+SQL サーバー 2000 で 実行...
-
15
VBAでピボットテーブルの作成(...
-
16
IEのダウンロード通知バーのVBA...
-
17
「コンパイルエラー:プロシー...
-
18
「実行時エラー3001」のポップ...
-
19
EXCEL/VBAで、自分のPCだけエラ...
-
20
実行時エラー48発生時のDLL特定...
おすすめ情報