Record Count 1

[jon92]

I have a table that is populated by a text import, I then run an update query to add data to the records just imported. I would like to have the default confirmation messages turned off ( for the update query) but have a custom message box telling the user how many records have just been updated. Is this possible?

Regards Jon

 

[jebry]

Hi Jon!

Before you run the update query use the line:

DoCmd.SetWarnings False

and then after put:

DoCmd.SetWarnings True

Then add the following

Dim rst As DAO.Recordset

Set rst = CurrentDb.OpenRecordset("YourTable", dbOpenDynaset)

rst.MoveLast
Call MsgBox("There were " & rst.RecordCount & " records imported&quot

hth


Jeff Bridgham
bridgham@purdue.edu

 

[jon92]

Thanks Jeff

Exactly what I wanted

have a star!

Jon