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 件のコメント:
コメントを投稿