有啊,ADO对象.RECORDSET.???不好意思忘了,呵呵,可以获得当前的焦点记录,然后可以删除啊。
明天到公司看看程序再跟贴啊。:)

解决方案 »

  1.   

    ado.recordset.delete
    datagrid会自动刷新
    有什么不方便的?
      

  2.   

    我现在就是很难到当前的焦点呀,当在datagrid中定位指针,执行删除时,可删除的总是第一行,按说从前台移动指针定位没错呀,我的代码如下:
    Dim adc As New ADODB.Recordset
    Dim con As New ADODB.Connection
    Dim tt As String
    tt = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=mis;Data Source=jm01"
    adc.CursorLocation = adUseClient
    adc.CursorType = adOpenDynamic
    adc.LockType = adLockOptimistic
    con.Open tt
    adc.Open "select * from login", ttadc.Delete (adAffectCurrent)
    adc.Update