If you are using ADO to execute the Update command, you can pass the execute function a second parameter. This second parameter would indicate the number of records affected by the update statement.
Ex.
Dim DB as ADODB.Connection
Dim iRecordsAffected As Long
Set DB = CreateObject("ADODB.Connection")
DB.ConnectionString = "YourConnectionString"
Call DB.Open
Call DB.Execute("Your Update Query", iRecordsAffected)
Msgbox "Records Affected = " & CStr(iRecordsAffected)
-George
Strong and bitter words indicate a weak cause. - Fortune cookie wisdom