Group: microsoft.public.access.reports · Group Profile · Search for Syrelle in microsoft.public.access.reports
Author: Syrel
Date: Sep 11, 2008 07:37
Here's an example code: sSQL = "Select actionqueue from dpldata where actionqueue = 'Reject'" Call DbConn rs.Open sSQL, Dbase, adOpenForwardOnly, adLockOptimistic If rs.RecordCount 0 Then rs.MoveFirst i = 0 Do While Not rs.EOF i = i + 1 rs.MoveNext Loop TxtDReject.Value = i End If Call RsClose Call DbClose THe rs.recordcount has a value of -1 eventhough
|