I have no idea what is my actual problem in this SQL statement if I would like to retrive all records which fulfil the particular condition:
Select Field1 from TblMenu where UserID = '"& ID & "'
In VB, it only retrive only one records as i used the loop/for loop to retrieve the data. But i tested it in Query analyser, it retrieves all record where ID = 123.
rs.Open strSQL, cn
For i = 0 To intNo_Item - 1
str = rs.Fields("Field1")