Recordset for Existing Data in Form - Access Developer Forum


	Back to Access Developer Forum Comments List

Upload Images @Reply Bookmark Link Email Next Unseen

Recordset for Existing Data in Form

Sami Shamma

14 months ago

Greetings friends

I have the Form in the image below. I would like to run an after-update event on the Shift Combo box that will read the records selected in the detail section (in a record set) and update the "Print All" flag.

Does Access have a method to read what is already selected in the form?

Many Thanks

	Sami Shamma OP @Reply 14 months ago

Adam Schwanz @Reply

14 months ago

That is filtered down right? By your combo boxes above?

You just need to use the same filter in making a recordset.

For instance, in this kind of search setup.

    If EntityNameSearch <> "" Then

        If Wh <> "" Then Wh = Wh & " " & "AND" & " "

        Wh = Wh & "EntityName LIKE '*" & EntityNameSearch & "*'"

    End If

    If RegionSearch <> "" Then

        If Wh <> "" Then Wh = Wh & " " & "AND" & " "

        Wh = Wh & "Region LIKE '*" & RegionSearch & "*'"

    End If

You can use the same

    If EntityNameSearch <> "" Then

        If Wh <> "" Then Wh = Wh & " " & "AND" & " "

        Wh = Wh & "EntityName LIKE '*" & EntityNameSearch & "*'"

    End If

    If RegionSearch <> "" Then

        If Wh <> "" Then Wh = Wh & " " & "AND" & " "

        Wh = Wh & "Region LIKE '*" & RegionSearch & "*'"

    End If



Currentdb.openrecordset("Select * From Table Where " & Wh)

	Adam Schwanz @Reply 14 months ago
Its actually easier nvm. `Dim X X = Me.RecordSource Dim rs As Recordset Set rs = CurrentDb.OpenRecordset(X, dbOpenDynaset, dbSeeChanges) While Not rs.EOF MsgBox rs!EntityName rs.MoveNext Wend rs.Close Set rs = Nothing`

	Sami Shamma OP @Reply 14 months ago
Thank you Adam That is filtered down right? By your combo boxes above? YES Come to think of it, why not store the WhereStr in the initial search in a TempVars and just use it in the record set. I was hoping there is a special method that Access has something like: `Currentdb.openrecordset(SelectedRecord)`

	Sami Shamma OP @Reply 14 months ago
Oh, I like that second solution I will try it now, Thanks Adam

	Sami Shamma OP @Reply 14 months ago
Adam It worked like a charm Thanks

This thread is now CLOSED. If you wish to comment, start a NEW discussion in Access Developer Forum.

Next Unseen

New Feature: Comment Live View