I need your help.

I devoloped an aplication using visual basic 6.0 and crystal report 8.5. The aplication work correctly in my machine that uses windows 98. I installed the aplication in a lot of machines that have windows 2000. The problem is that the reports sometimes doesn’t show all records. For example I run the program and this program doesn’t show all records but two minutes later it does.
Now I will show a cycle that I used to form a file that I uses to print the information. The problem is that work sometimes. I think is that by some problem the program doesn’t retrieve all records in the select.
Please help me.
example:
‘ delete all records of user that is working.
sql01 = Empty
sql01 = "delete from delbalances where fausua='" & usuarioprocesando & "'"
based1.Execute sql01, dbSQLPassThrough

‘ select only the records of the invoice choosed.
sql08 = "select * from delfact01 where facont='" & smt24501.wscodi & "' order by fadeud,mid$(fafeem,7,4),mid$(fafeem,4,2),mid$(fafeem,1,2),fanufa"
Set recordset8 = based1.OpenRecordset(sql08, dbOpenSnapshot, dbSQLPassThrough)
Do While Not recordset8.EOF
Insert ………
'execute insert to file
based1.Execute sql02, dbSQLPassThrough
recordset8.MoveNext
Loop

‘ The crystal select the records of the user that is working.