2011年7月13日水曜日

→→→テーブルのレコードを削除する

Dim oCOm As OleDbCommand
Dim oCn As OleDbConnection = New OleDbConnection
oCn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source= " &
                                 "D:\****;Persist Security Info=False"
oCn.Open()
oCom = New OleDbCommand("DELETE FROM テスト WHERE コード=5" , oCn )
Try
        oCom.ExecuteNonQuery()
Catch ex As Exception
        MessageBox.Show( ex.Message, "エラー通知" )
End Try

oCn.Close()

0 件のコメント:

コメントを投稿