スポンサーリンク
明日を、もっと、ハッピーに!『ショップジャパン』
スポンサーリンク

DB接続 UPDATE (VS2005/VS2008)

VB.NET

‘コネクションストリングを用意
Dim UserID As String = "Admin"
Dim Password As String = ""
Dim cnctStr As String
Dim MDBFile As String = "C:\test.mdb"
cnctStr = "Provider=""Microsoft.Jet.OLEDB.4.0"";"
cnctStr &= "Data Source=""" & MDBFile & """;"
cnctStr &= "User ID=" & UserID & ";"
cnctStr &= "Jet OLEDB:Database Password=" & Password

‘データベースとの接続関係を設定
Dim db As New System.Data.OleDb.OleDbConnection
db.ConnectionString = cnctStr

‘UPDATEコマンドを作成
Dim cmnd As New System.Data.OleDb.OleDbCommand
cmnd.Connection = db
cmnd.CommandText = "UPDATE PurchaseHistory SET intUserID=3 WHERE intUserID=2"

‘データベースをオープン
db.Open()

‘コマンドを実行
cmnd.ExecuteNonQuery()

‘データベースをクローズ
db.Close()

コメント

スポンサーリンク
ダイレクトテレショップ 公式通販サイト_キャンペーン
スポンサーリンク
Microsoft Public Affiliate Program (JP)(マイクロソフトアフィリエイトプログラム)
タイトルとURLをコピーしました