rs.Open sql, conn, adOpenStatic, adLockReadOnly,adCmdText

se non includi il file con le definizioni delle costanti (che non ricordo come si chiama, adoqualcosa.vbs) non è in grado di interpretare adOpenStatic, adLockReadOnly,adCmdText

Apri il recordset così:

rs.Open sql, conn, 3, 3