ADOを用いたデータの追加について

解決

稲兎 2003-05-27 23:47:51 No: 107307

ＡＤＯを用いて、ＡＣＣＥＳＳへレコード追加しようと思っています。
ＶＢのフォーム上にあるテキストボックスやコンボボックス等に値が無い場合、
種類が一致しません等のエラーが表示されてしまいます。
テキストボックス等に何も値が無い状態でも追加するにはどうようにすれば良い
のでしょうか？

    Dim rsStorage As New ADODB.Recordset

    rsStorage.Open "T_EmployeeMaster", cnn, , adLockOptimistic, adCmdTable

    With rsStorage
        .AddNew
        .Fields!eCD = txtEmployeeNo.Text
        .Fields!LoginID = txtLoginID.Text
        .Fields!Name = txtName.Text
        .Fields!PhoneticSymbols = txtPhoneticSymbols.Text
        .Fields!Birthday = txtBirthday.Text
        .Update
        .Close
    End With

ヘイルストン 2003-05-28 00:44:39 No: 107308

値をセットしていないフィールドがNull或いはLength=0の文字列を拒否している
構造なのでは？
テーブルのフィールド属性を変更してみては。

だっちゃん 2003-05-28 00:45:05 No: 107309

こんちは。

記述されている内容からの推測なんですが、
ＡＣＣＥＳＳの設定に問題があるような気がします。

事前に言っておくとフィールドの型が【テキスト】の場合だけですが、
追加しようとしているテーブルのフィールドプロパティに
【空文字列の許可】ってプロパティがあってこれを「はい」に
設定してないと空文字を挿入することができないですよ。

また、数値型の場合は "0" を設定してあげたほうが良いです。

推測が間違ってたらごめんなさいです。

稲兎 2003-05-28 01:11:15 No: 107310

ヘイルストン様。だっちゃん様。
回答ありがとうございます！
ＡＣＣＥＳＳのＤＢを指導頂いた通り、見直して再度やってみたら空白を
登録する事が出来ました。
何が間違っているのか分からずに、困っていたので本当に助かりました。
ありがとうございました！