Is it possible to using the 'IN' function to find matches in a ADO recordset?

strSQL = "INSERT INTO tblMechEst (Contract, Resource, EntryDate, Hours, Amount)" _
& "SELECT Contract, Resource, EntryDate, Hours, Sell FROM tblTemp" _
& " WHERE ResourceCode IN (" & Temp2 & ")"

Set Temp = DataEnvironment1.Connection1.Execute(strSQL, , adCmdText)
Set Temp = Nothing

Something like above code...where Temp2 is a recordset created from a previous 'SELECT.... IN' query. Temp2 has a number of records containing the one field 'ResourceCode'.

I'm really stuck on this one so any help would be appreciated!!