im trying to refresh certain columns from another table and i get error
Code:
the select statement includes a reserved word or an argument name that is misspelled or missing or the punctuation is incorrectCode:
Sub LoadEntries()
Set rs = CN.Execute("SELECT FullName, DateBirth, Email, Cellular, FROM Customers")
LsVw.ListItems.clear
While Not rs.EOF
Set itm = LsVw.ListItems.Add(, , rs!FullName, , "cake")
itm.Bold = True
itm.SubItems(1) = Year(Now) - Year(rs!DateBirth)
itm.SubItems(2) = rs!Email
itm.SubItems(3) = rs!Cellular
itm.SubItems(4) = Format(rs!DateBirth, "dd/mm/yyyy")
rs.MoveNext
Wend
End Sub