
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)
-
DataGridViewの内容をDBに反映する時
Visual Basic(VBA)
-
プロシージャからイベントをコールする
Visual Basic(VBA)
-
-
4
この行は既に別のテーブルに属しています
Visual Basic(VBA)
-
5
<VB.NET>INSERT文でDBにデータを入れたい
Visual Basic(VBA)
-
6
DataTableから条件を満たした行を別のDatatableへコピーしたい
その他(プログラミング・Web制作)
-
7
「タイプ初期化子が例外をスローしました」エラー何?
Visual Basic(VBA)
-
8
DataGrdViewに関連付けたデータの更新
C言語・C++・C#
-
9
VB.NETでODBC接続のデータベースの更新方法について
Visual Basic(VBA)
-
10
複数のtextboxの処理を一括で行えませんか?
Visual Basic(VBA)
-
11
DataGridViewの、選択されている行を取り出したい
Visual Basic(VBA)
-
12
DataTableに特定のフィールドが存在するかどうか調べるには?
Visual Basic(VBA)
-
13
CloseとDisposeの違い
Visual Basic(VBA)
-
14
DataGridViewでyyyy/MM/dd
Visual Basic(VBA)
-
15
VB.net 引数で配列変数を渡す際の要素数
Visual Basic(VBA)
-
16
VB.NETでDataTableにデータ追加したい
Visual Basic(VBA)
-
17
★お手上げ状態です。助けてください。ActiveReportについて
IT・エンジニアリング
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ADO VBA 実行時エラー3021
-
ヘッダレコードとトレーラレコ...
-
ワードの差込印刷で教えて下さ...
-
データセットのレコード更新が...
-
レコードが存在しなかった場合
-
Access でレコードセレクタが押...
-
ACCESSで大量の更新を行うと「...
-
[VBA] ADOの Clone と AddNew
-
vbからmdbのレコード削除
-
固有レコード識別子の選択とは
-
Oracleでの文字列連結サイズの上限
-
実績累計の求め方と意味を教え...
-
GROUP BYを行った後に結合した...
-
SELECTで1件のみ取得するには?
-
select句副問い合わせ 値の個...
-
OracleのSQL*PLUSで、デー...
-
集計後の数値が倍になる
-
エラー2「無効な識別子です」
-
Oracle8iでSQL文の引数について
-
Excelでセルの書式設定を使用し...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ADO VBA 実行時エラー3021
-
差し込み印刷のレコード数について
-
レコードが存在しなかった場合
-
アクセスでレポートの1印刷内...
-
DataGridViewの、選択されてい...
-
JSPのNULLレコード表示について...
-
ヘッダレコードとトレーラレコ...
-
ACCESSで大量の更新を行うと「...
-
サブレンジ分割されたNDB(富士...
-
カレントレコードが無い事を判...
-
ワードの差込印刷で教えて下さ...
-
固有レコード識別子の選択とは
-
Access でレコードセレクタが押...
-
[VBA] ADOの Clone と AddNew
-
ファイル書込みで一行もしくは...
-
DataGridViewの内容をDBに反映...
-
VB6.0のIsNull関数に相当するもの
-
Access を×ボタンで閉じ...
-
Accessデータシートビューの行...
-
Line Inputで文字化け(助けて...
おすすめ情報