Filtering forms! records.. please any help...

[zidrax03]

i have trouble in filtering...

im creating a enrollment system. which filtered by school year..

how can i filtered the data. that only the active year will be displayed on the form...

please any idea..

this is my code.. but. their is an error in..


mActiveSchoolYear = "0000-0000"
Set wsp = DBEngine.Workspaces(0)
Set dbs2 = wsp.OpenDatabase("c:\mad\madthesis.mdb")
Set rstSetup = dbs2.OpenRecordset("setup")
With rstSetup
.Index = "Active"
.Seek "=", True
If .NoMatch Then
MsgBox "You must Activate the Current School Year to Continue!!!", vbExclamation + vbOKOnly, "Setup Warning"
' DoCmd.Close
Set wsp = Nothing
Set dbs2 = Nothing
Set rstSetup = Nothing
Else
mActiveSchoolYear = .Fields("[School/Year]")
Set wsp = Nothing
Set dbs2 = Nothing
Set rstSetup = Nothing
End If
End With
Me.AllowEdits = True
Set dbs = CurrentDb
Set mycform = Me
Me.Schoolyear = mActiveSchoolYear

[PEB]

hi,

this is a code in Vb or in Access basic?

If in Access why do you use those methods to filter a form? There is a specialized form property to filter on!

Have a nice day!
:)