rs.Open SQL,Con, 2,1

Non hai definito SQL

dovresti scrivere prima

SQL="select * from nometabella"

Quello scritto in verde è codice vbscript che scorre il recordset e alla fine lo chiude.