ADDNEWについて

解決


Sin  2002-07-16 14:29:24  No: 104523  IP: [192.*.*.*]

ADOを使ってSQLServerと接続しています。

AddNewメソッドを使用してDBに新規登録をしたいのですが、
ボタンのクリック時に
Private Sub Command1_Click()
rs.AddNew
rs.Fields("フィールド名")    
rs.Update
End Sub


とやると新規登録ではなく一番始めのレコードを上書きしてしまいます。

このような場合、どのような記述をすればよいのでしょうか?
お願いいたします。

編集 削除
あんちゃん  2002-07-16 15:12:28  No: 104524  IP: [192.*.*.*]

DAOでコード書くとき同じような書き方しますけど、

Private Sub Command1_Click()
rs.AddNew "フィールド名","フィールド値"
End Sub

でいくと思います。


rs.Fields("フィールド名")    
rs.Update

のrs.Updateが作用してしまっているのではないでしょうか?

編集 削除
Sin  2002-07-16 16:17:40  No: 104525  IP: [192.*.*.*]

さっそくの返答ありがとうございました。

rs.AddNew "フィールド名","フィールド値"

で追加されました。

しかし、テキストボックスの内容を追加する場合はうまくいきません。

rs.AddNew "フィールド名",テキストボックス名

ではだめなのでしょうか?

編集 削除
あんちゃん  2002-07-16 16:58:34  No: 104526  IP: [192.*.*.*]

テキストボックスで引っかかるとしたら、
フォーカスを取得していないとかの問題だと思います。

テキストボックス1.SetFocus
rs.AddNew "フィールド名",テキストボックス1.Text


読み込むテキストボックス名の数が多い場合は、
別途変数を用意して代入してしまった方が楽ですよ。

編集 削除
Sin  2002-07-17 09:47:07  No: 104527  IP: [192.*.*.*]

ありがとうございました。できました。

編集 削除