ShowAll Records

  • Thread starter Thread starter Bre-x
  • Start date Start date
B

Bre-x

how can i find if a form is showing all records?

I am using a sub to move a pop up form from
my main form, but i goes into a loop and then crash it.

if showallrecords = true
do noting
else
DoCmd.ShowAllRecords
end if

something like that i guess?

thnks

Sub LotFindme()
Dim rs As Object
DoCmd.ShowAllRecords
Set rs = Me.Recordset.Clone
rs.FindFirst "[LotID] = " & Str(Form_Main.TLotID)
Me.Bookmark = rs.Bookmark
End Sub
 
how can i find if a form is showing all records?
I am using a sub to move a pop up form from
my main form, but i goes into a loop and then crash it.

if showallrecords = true
do noting
else
DoCmd.ShowAllRecords
end if

something like that i guess?

thnks

Sub LotFindme()
Dim rs As Object
DoCmd.ShowAllRecords
Set rs = Me.Recordset.Clone
rs.FindFirst "[LotID] = " & Str(Form_Main.TLotID)
Me.Bookmark = rs.Bookmark
End Sub
Click to expand...

Try inserting the following in place of your "DoCmd" line to turn off any
filter:

Me.FilterOn = False
 
Back
Top