比如我执行了“delete from table”
在查询分析器中会返回“(所影响的行数为 X 行)”,我也想在程序中执行后返回给用户这些信息,如何实现?

解决方案 »

  1.   

    我没干过这种事,也没想过但如果急着要用的话可以先执行一次相同条件的 select ...
    然后再执行你要干的插入或删除程序
      

  2.   

    dim n    as integer
    dim sSQL as stringsSQL = "Delete From ..."
    n = cnn.Execute(sSQL)debug.print "所影响的行数为 " & n & " 行"
      

  3.   

    啊抱歉,应该是cnn.Execute sSQL, n
      

  4.   

    Dim Cnns As New ADODB.Connection
    Dim i As Integer
    Dim rs As New ADODB.Recordset
    Dim sql As String
    Cnns.CursorLocation = adUseClient
    Cnns.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Test;Data Source=ukyo"sql = "delete from test"Set rs = Cnns.Execute(sql, i, adCmdText)MsgBox ii就是你要的东西