Hi All, The following code is only showing me one message box with one idInvoice. Yet the SQL behind it returns 4 distinct rows, each with a different idInvoice. Set conn = CurrentDb Set RSCheckCurrentReadings = conn.OpenRecordset(strSQL) Do While Not RSCheckCurrentReadings.EOF MsgBox (CInt(RSCheckCurrentReadings("idInvoice"))) RSCheckCurrentReadings.MoveNext Loop Any ideas will be much appreciated! Thanks! Simon. -- - * Please reply to group for the benefit of all * Found the answer to your own question? Post it! * Get a useful reply to one of your posts?...post an answer to another one * Search first, post later : http://www.google.co.uk/groups * Want my email address? Ask me in a post...Cos2MuchSpamMakesUFat!