Multiple choice technology testing

Identify the issues in the code below

Set con = CreateObject("ADODB.Connection") 
con.Open "Provider=Microsoft.ACE.OLEDB.12.0;
Data source=C:\...\Database1.accdb" 
rs = con.Execute("select * from Table1") 
rs.MoveFirst 
Do While rs.EOF     
    Msgbox rs.Fields(0).Name & " : " &rs.Fields(0).Value & " " & rs.Fields(1).Name & " : " &rs.Fields(1).Value & " " & rs.Fields(2).Name & " : " & rs.Fields(2).Value  
Loop 
rs.Close 
con.Close  

Issue1) SQL query is issued as an argument to an incorrect method Issue2) Condition with the loop is incorrect Issue3) Code is not designed navigate to the next record in the recordset Issue4) Connection string is incorrectly formed Issue5) Msgbox cannot display data from Database Issue6) Set keyword is missing in a statement

  1. Issue2, Issue3, Issue6

  2. Issue1, Issue2, Issue3

  3. Issue2, Issue4, Issue6

  4. No issues - The code is perfect

Reveal answer Fill a bubble to check yourself
A Correct answer
Explanation

The code has three issues: (1) The loop condition 'While rs.EOF' should be 'While Not rs.EOF' to iterate while there ARE records; (2) Missing 'rs.MoveNext' inside the loop to advance to the next record; (3) Missing 'Set' keyword in 'rs = con.Execute' - should be 'Set rs = con.Execute' for object assignment.