Search results

Private Sub Form_Load() Dim Sql As String If cn.State = adStateOpen Then cn.Close Set cn = CurrentProject.AccessConnection If rs.State= adStateOpen Then rs.Close With rs Sql = “SELECT tblSubCategory.SubCategoryID,tblSubCategory.SubCategoryName as...