Minimal SQL needs<br><br> Dim db as database, rst as recordset, SQL as string<br> Set db = CurrentDb<br> ' SQL string.<br> SQL = "SELECT * FROM Orders WHERE OrderDate >= #1-1-95#;"<br> Set rst = db.OpenRecordset(SQL) <p>DougP<br><a href=mailto: dposton@universal1.com> dposton@universal1.com</a><br><a href= > </a><br> Ask me how Bar-codes can help you be more productive.