
No.1ベストアンサー
- 回答日時:
>データセットのレコード更新がしたい
データセット?データセットにはレコードはありません
データテーブルにレコードがあります
こんな感じ
Dataset
└─DataTable
└─DataRowCollection
新規追加ができているなら更新は簡単です
まず更新したいレコードを検索する
検索できたら、そのレコードをDataRowにて取得する
その後、対象フィールドを上書きしてからDataTableのUpdateメソッドにて更新する
[例]
Dim dRow As DataRow
'主キーにて検索(※123は検索項目値)
dRow = dTbl.Rows.Find(New Object() {123})
If Not dRow Is Nothing Then
'フィールド更新
dRow.Item("hogehoge") = "ほげほげ"
dTbl.Update()
End If
No.3
- 回答日時:
こんな感じですかね
Dim strConn As String '接続文字列
Dim oleConn As OleDbConnection 'コネクション
Dim oleDa As OleDbDataAdapter 'データアダプタ
Dim oleCb As OleDbCommandBuilder 'コマンドビルダ
Dim strSQL As String 'SQL
Dim dttable As DataTable
Dim dtrow As DataRow
strConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=c:\test.mdb"
oleConn = New OleDbConnection(strConn)
strSQL = "SELECT * FROM " & TableName
oleDa = New OleDbDataAdapter(strSQL, oleConn)
oleCb = New OleDbCommandBuilder(oleDa)
dttable = New dttable
oleDa.Fill(dttable)
oleDa.FillSchema(dttable)
dtrow = dttable.NewRow
dtrow("日付") = "20050401"
''行を追加
dttable.Rows.Add(dtrow)
''データソースを更新
oleDa.Update(dttable)
コマンドビルダは、データアダプタの「SelectCommand」を基にして
「InsertCommand」「UpdateCommand」「DeleteCommand」に自動でSQLを設定してくれます
まだ慣れないうちは、このコマンドビルダを使用してもよいでしょうが、
慣れてきたら個別に記述するのがよろしいでしょう
HOME > VB.NET Tips HOME > コントロール > DataSet
http://vbdotnet.fc2web.com/vbnet/control/DataSet …
この回答への補足
新規作成はできました。
更新は・・・
oleCmd.CommandText = "SELECT * FROM ファイル WHERE 日付 = '20050320';"
oleDa.SelectCommand = oleCmd
oleDa.Fill(dttable)
If dttable.Rows.Count > 0 Then
dtrow.BeginEdit()
End if
dtrow.BeginEdit()でエラーがでます。
オブジェクト参照がオブジェクト インスタンスに設定されていません。
新規作成ではdtrow = dttable.NewRowとしているので更新の場合もdtrow = ??としなければならないと思いますが・・・何をしたら良いかわかりません。
No.2
- 回答日時:
>Dataset
>└─DataTable
> └─DataRowCollection
Dataset
└─DataTableCollection
└─DataRowCollection
間違えました orz
この回答への補足
新規追加できてると思ったらできていなかったです・・・。データソースを更新する時に、
更新には、新しい行を含む DataRow コレクションが渡されたとき、有効な InsertCommand が必要です。
のエラーが出ます。
追加したい項目の書き方は・・・
dtrow = dttable.NewRow
dtrow("日付") = "20050401"
''行を追加
dttable.Rows.Add(dtrow)
''データソースを更新
oleDa.Update(dttable)
ではダメですか?
INSERT文でするのでしょうか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教える店舗&オフィスのセキュリティ対策術
中・小規模の店舗やオフィスのセキュリティセキュリティ対策について、プロにどう対策すべきか 何を注意すべきかを教えていただきました!
-
VB.NETで DataRow()を利用して、値からコードを取得したい。
Visual Basic(VBA)
-
<VB.NET>INSERT文でDBにデータを入れたい
Visual Basic(VBA)
-
DataGrdViewに関連付けたデータの更新
C言語・C++・C#
-
4
VB.NET Excelを読み込んでDataTableに格納し、DBにデータをINSERTする
Microsoft ASP
-
5
【VB】コンボボックスにデータベースから取り出した値を入れたい
Visual Basic(VBA)
-
6
vb.netで画面のコントロールId名を変数で動的に制御し処理する方法
Visual Basic(VBA)
-
7
Loadイベント中にほかのイベントを発生したくない
その他(プログラミング・Web制作)
-
8
VB.NETでコンボボックスの1行目を空白にしたい
Visual Basic(VBA)
-
9
DataTableから条件を満たした行を別のDatatableへコピーしたい
その他(プログラミング・Web制作)
-
10
VB.NETで小数点以下の桁数を取得したい
その他(ソフトウェア)
-
11
この行は既に別のテーブルに属しています
Visual Basic(VBA)
-
12
DataSetから、DataTableを取得したい。
C言語・C++・C#
-
13
VB.NET getとsetの概念がわかりません。
Visual Basic(VBA)
-
14
DataGridViewの内容をDBに反映する時
Visual Basic(VBA)
-
15
String"から型'Double'への変換は無効です。 とエラーが出ます。
Visual Basic(VBA)
-
16
DBから取得した値を配列へ代入する
Visual Basic(VBA)
-
17
DataGridViewで変更した値を反映させたい。
Visual Basic(VBA)
-
18
VB.NET2003 テキストボックスに半角英数字以外入力させない
Visual Basic(VBA)
-
19
VBでの日付入力値のフォーマットに関して
Visual Basic(VBA)
-
20
VB.net 引数で配列変数を渡す際の要素数
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
人気Q&Aランキング
-
4
レコードセット(ADO.Recordset)...
-
5
レコードが存在しなかった場合
-
6
アクセスでレポートの1印刷内...
-
7
ADO VBA 実行時エラー3021
-
8
データセットのレコード更新が...
-
9
Line Inputで文字化け(助けて...
-
10
DataGridViewの内容をDBに反映...
-
11
カレントレコードが無い事を判...
-
12
2CPUマシンのDBアクセス...
-
13
JSPのNULLレコード表示について...
-
14
ワードの差込印刷で教えて下さ...
-
15
ACCESSで大量の更新を行うと「...
-
16
DataGridViewの、選択されてい...
-
17
[VBA] ADOの Clone と AddNew
-
18
GROUP BYを行った後に結合した...
-
19
CREATE テーブルでの複数外部...
-
20
SQL文で右から1文字だけ削除す...
おすすめ情報
公式facebook
公式twitter