Non hai creato la connessione:

codice:
dim ConnFaq
set ConnFaq = server.createobject("ADODB.connection")