〜〜〜〜〜〜〜〜〜
ElseIf Text1.Text > rs.RecordCount Then '社員番号(データ)が存在しない場合
If MsgBox("登録しますか?", vbYesNo) = vbYes Then
strSql = "INSERT INTO SYAIN(iSyainNo,sSyainNm,iSyainAge) VALUES(" & Text1.Text & "," & Text2.Text & "," & Text3.Text & ")"
cn.Execute strSql
〜〜〜〜〜〜〜〜〜
テーブルに追加しようとすると
「1つ以上の必要なパラメータの値が設定されていません」
というエラーが出ます。
原因は何でしょうか?
指定したSQLが、パラメータクエリとして認識されています。
SQL文の中で未定義の文字列が使われています。
フィールド名が間違っているか、VALUE 指定のデータの中に文字列データがあるにも関わらず
シングルクォーテーションで挟まれてないのでしょう。
一番怪しいのが sSyainNm (多分[社員氏名])ですが、
このようなプログラムを書く場合、Text2 でちゃんと
エラーチェックして無いと↓のような場合にエラーでますので。
http://madia.world.coocan.jp/cgi-bin/VBBBS2/wwwlng.cgi?print+200406/04060132.txt
おそらく、シングルクォーテーションで挟まれてない。
ありがとうございました
ツイート | ![]() |