タイトル : ACCESSのテーブル追加 投稿日 : 2003/09/18(Thu) 15:58 投稿者 : たつびん
[OSのVer]:WindowsXp [VBのVer]:VB.NET Professional 2003 MSDN Deluxe Edition ACCESSのテーブルにデータを追加しようと思いまして以下のような プログラムを書いてみたのですが、フィールドに値を受け渡すところで "プロパティ'Fields'は'ReadOnly'です。"とエラーになってしまいます。 参照の追加で何か必要なものがあるのでしょうか? ご存知の方がいらっしゃいましたら、よろしくお願いします。 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim cnn As New ADODB.Connection Dim rst As New ADODB.Recordset cnn.Open("Provider=Microsoft.jet.OLEDB.4.0;Data Source=c:\TEST\SAMPLE.mdb" ;) rst.Open("SELECT * FROM t_顧客", _ cnn,ADODB.CursorTypeEnum.adOpenKeyset,ADODB.LockTypeEnum.adLockOptimistic) rst.AddNew() rst!ID = 5 rst!NAME = "TEST" rst.Update() rst.Close() End Sub |