質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
87.20%
MySQL

MySQL(マイエスキューエル)は、TCX DataKonsultAB社などが開発するRDBMS(リレーショナルデータベースの管理システム)です。世界で最も人気の高いシステムで、オープンソースで開発されています。MySQLデータベースサーバは、高速性と信頼性があり、Linux、UNIX、Windowsなどの複数のプラットフォームで動作することができます。

VB.NET

Microsoft Visual Basic .NETのことで、Microsoft Visual Basic(VB6)の後継。 .NET環境向けのプログラムを開発することができます。 現在のVB.NETでは、.NET Frameworkを利用して開発を行うことが可能です。

受付中

DataGridViewでDBの更新・追加・削除をしたい

PgBeginners
PgBeginners

総合スコア1

MySQL

MySQL(マイエスキューエル)は、TCX DataKonsultAB社などが開発するRDBMS(リレーショナルデータベースの管理システム)です。世界で最も人気の高いシステムで、オープンソースで開発されています。MySQLデータベースサーバは、高速性と信頼性があり、Linux、UNIX、Windowsなどの複数のプラットフォームで動作することができます。

VB.NET

Microsoft Visual Basic .NETのことで、Microsoft Visual Basic(VB6)の後継。 .NET環境向けのプログラムを開発することができます。 現在のVB.NETでは、.NET Frameworkを利用して開発を行うことが可能です。

2回答

0評価

0クリップ

8090閲覧

投稿2020/05/29 02:26

編集2022/01/12 10:55

前提・実現したいこと

DataGridViewを使用しDBからデータを取得して、表示・更新・追加・削除を行いたいと考えております。
DataGridViewにDBからデータを取得して、表示するところまではできました。

VBnet

'フォームロード Private Sub Frm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 'DB情報 Me.bindingSource = New BindingSource() Me.DataGridView1.DataSource = Me.bindingSource Me.Controls.Add(Me.DataGridView1) 'データ取得 Me.bindingSource.DataSource = CreateDataTable() End Sub 'データ取得(表示) Private Function CreateDataTable() As DataTable Dim dt As DataTable = New DataTable() 'データベース Mdl_Gnl_objConnection.ConnectionString = "Database=" + ***** + ";Data Source=" + ***** + ";User Id=" + ***** + ";Password=" + ***** '接続情報を使ってコネクションを生成 Using conn As New MySqlConnection(Mdl_Gnl_objConnection.ConnectionString) 'MySQL文とコネクションを設定 Using cmd As New MySqlCommand("SELECT カラム1,カラム2,... FORM テーブル1 LEFT OUTER JOIN...", conn) 'SELECTコマンドを設定 Mdl_DataAdapter.SelectCommand = cmd 'SELECTの実行及びフェッチ Mdl_DataAdapter.Fill(dt) 'グリッドに表示 Grd_YoteiKubun.DataSource = dt End Using End Using Return dt End Function

発生している問題

表示はできているのですが、更新・追加・削除ができていない状況です。
自分なりに調べてここまでは書きました。
これすらも当たっているのか正直分かりません…。
コードの書き方が分からない部分はソースコードに記述しました。

DataGridViewからデータを取得して、DBに反映する方法を教えていただきたいです。
また下記ソースコードじたいが間違っていればそちらの指摘もお願い致します。

vbnet

'データ更新 Private Sub BtnUpdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnUpdate.Click Dim objCommand As New MySqlCommand Dim SQL As String = "" Dim dt As DataTable = New DataTable() Dim r As DataRow dt = DataGridView1.DataSource 'データベース Mdl_Gnl_objConnection = New MySqlConnection Mdl_Gnl_objConnection.ConnectionString = "Database=" + ***** + ";Data Source=" + ***** + ";User Id=" + ***** + ";Password=" + ***** 'オープン Call Mdl_Gnl_objConnection.Open() objCommand = Mdl_Main_Gnl_objConnection.CreateCommand 'データ更新 For Each r In dt.Rows Select Case r.RowState Case DataRowState.Added '新規追加 'ここの中身が分からない Case DataRowState.Modified '修正            'ここの中身が分からない         Case DataRowState.Deleted '削除            'ここの中身が分からない Case Else '何もしない Continue For End Select objCommand.CommandText = SQL Call objCommand.ExecuteNonQuery() Next 'クローズ Call Mdl_Gnl_objConnection.Close() dt.Dispose() End Sub

補足情報(FW/ツールのバージョンなど)

.Net 2010
業務上、MySqLを使用しています。

良い質問の評価を上げる

以下のような質問は評価を上げましょう

  • 質問内容が明確
  • 自分も答えを知りたい
  • 質問者以外のユーザにも役立つ

評価が高い質問は、TOPページの「注目」タブのフィードに表示されやすくなります。

気になる質問をクリップする

クリップした質問は、後からいつでもマイページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

teratailでは下記のような質問を「具体的に困っていることがない質問」、「サイトポリシーに違反する質問」と定義し、推奨していません。

  • プログラミングに関係のない質問
  • やってほしいことだけを記載した丸投げの質問
  • 問題・課題が含まれていない質問
  • 意図的に内容が抹消された質問
  • 過去に投稿した質問と同じ内容の質問
  • 広告と受け取られるような投稿

評価を下げると、トップページの「アクティブ」「注目」タブのフィードに表示されにくくなります。

SurferOnWww

2020/05/29 02:49

TableAdapter 構成ウィザードは使えませんか?
PgBeginners

2020/05/29 03:06

SurferOnWwwさん >TableAdapter 構成ウィザードは使えませんか? 使用できなそうです、、、大変なのを覚悟でやっています、、、。

まだ回答がついていません

会員登録して回答してみよう

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
87.20%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問

同じタグがついた質問を見る

MySQL

MySQL(マイエスキューエル)は、TCX DataKonsultAB社などが開発するRDBMS(リレーショナルデータベースの管理システム)です。世界で最も人気の高いシステムで、オープンソースで開発されています。MySQLデータベースサーバは、高速性と信頼性があり、Linux、UNIX、Windowsなどの複数のプラットフォームで動作することができます。

VB.NET

Microsoft Visual Basic .NETのことで、Microsoft Visual Basic(VB6)の後継。 .NET環境向けのプログラムを開発することができます。 現在のVB.NETでは、.NET Frameworkを利用して開発を行うことが可能です。