Try this and let me know!!!

Code:
Global Num1, Num2 As Integer 
Global F1, F2 As String 

num1 = 1 
Num2 = 2 
F1 = "Hello" 
F2 = "Goodbye" 

SQL = "SELECT * FROM Table1 
WHERE Field1 = '" & Num1 & "' AND Field2 = '" & Num2 
& "' AND Field3 = '" & F1 & "' AND Field4 = '" & F2 & "'" 

Set ado1rs = New Recordset 
ado1rs.Open SQL, db, adOpenStatic, adLockOptimistic