Neil,

Just plumb it into your COUNT lines and it should do the same thing.

count .... WHILE ThisForm.UpdateProgress(recno(), reccount())

You should also return .T. from the UpdateProgress method, I forgot to add this.