ADO.NET Accessのホームへ戻る

SQLUpdateステートメントでレコードを更新するサンプル

 

 SQLUpdateステートメントでレコードを更新するサンプル

 

このサンプルは、SQLUpdateステートメントでAccessNwind.mdbデータベースの得意先テーブルを更新します。実行結果として更新したレコード件数を表示します。

 

このサンプルでは、以下のノウハウを習得するこtができます。

 

  OleDbConnectionOpen(),Close()メソッドの使い方

  OleDbCommandExecuteNonQuery()メソッドの使い方

  SQLUpdateステートメントの使い方

 

サンプルのPage_Load()イベントでは、Nwind.mdbデータベースの得意先テーブルのレコードを更新します。行7-9では、SQLUpdateステートメントを生成しています。

 

Update Customers
Set Phone='0480-88-8888'
Where CompanyName='
フレンドリーソフト'

UpdateWhere句では、CompanyName=”フレンドリーソフトを指定していますので、フレンドリーソフトの電話番号が更新されます。

 

10では、OleDbConnectionのインスタンスを生成しています。行12では、OleDbCommandのインスタンスを生成しています。行15では、OleDbConnectionOpen()メソッドでAccessNwind.mdbデータベースを開いています。行16では、OleDbCommandExecuteNonQuery()メソッドで、Updateステートメントを実行して得意先レコードを更新しています。ExecuteNonQuery()メソッドの戻り値として更新されたレコード件数が返されます。行17では、OleDbConnectionClose()メソッドでAccessNwind.mdbデータベースを閉じています。行18-20では、LabelTextプロパティに更新されたレコード件数を設定して表示しています。

 

  6: Sub Page_Load()
  7:   Dim strSqlUpdate As String = "Update Customers " & _
  8:     "Set Phone='0480-88-8888' " & _
  9:     "Where CompanyName='
フレンドリーソフト';"
 10:   Dim con As New OleDbConnection( _
 11:     ConfigurationSettings.AppSettings("conStringAccNw"))
 12:   Dim cmd As New OleDbCommand(strSqlUpdate, con)
 13:   Dim intUpdateCount As Integer
 14:
 15:   con.Open()
 16:   intUpdateCount = cmd.ExecuteNonQuery()
 17:   con.Close()
 18:   lblMessage.Text = _
 19:     String.Format("<b>{0}</b>
件の得意先を更新しました.", _
 20:     intUpdateCount.ToString())
 21: End Sub

 

ADO.NET Accessのホームへ戻る