Vc precisa definir o objeto Recordset também. Pelo que vi no seu codigo vc definiu apenas o objeto connection. Abaixo eu tenho uma parte do código que fiz onde ele verifica no banco mysql se o usuário existe ou não existe.
'Criação do Objeto Connection
Set conexao = Server.CreateObject("ADODB.Connection")
'Criação do Objeto Recordset
Set RS =Server.CreateObject("ADODB.Recordset")
sConnection = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=banco;USER=root;PASSWORD=;OPTION=3;"
conexao.ConnectionString = sConnection
conexao.open()
Set RS.Activeconnection = conexao