With the new era of mobile computing, smartphones and tablets, wireless communications and cloud services, the USDA sought to take advantage of a mobilized workforce and the blurring lines between personal and corporate computing resources.
Private Sub Btn_Search_Click() If Me.LstAnalystName = "(ALL)" Then Me.Frm_Search2.Form.RecordSource = "SELECT * FROM qry_AllData " Else ' Update the record source Me.Frm_Search2.Form.RecordSource = "SELECT * FROM qry_AllData " & BuildFilter End If ' Requery the subform Me.Frm_Search2.Requery End Sub
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
25 Experts available now in Live!