在VB中如何用SQL语句删除数据库中的记录?
fwjyz 2003-08-31 10:23:15 ①问题1
我用rs.delete删除当前记录,在datagrid中显示已经删除,但数据库中数据没有删除,错误在那里?
public CN As New ADODB.Connection
public Rs As New ADODB.Recordset
Const ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\jsc.mdb;Persist Security Info=False"
Private Sub Command1_Click()
CN.Open ConnectionString
Rs.CursorLocation = adUseClient
Rs.Open "select * from sheet", CN, adOpenDynamic, adLockBatchOptimistic
Set DataGrid1.DataSource = Rs
End Sub
Private Sub Command3_Click()
Rs.Delete
End Sub
②如何在VB中定义游标?以及利用游标取值?