E' da mesi che uso lo stesso metodo per la connesione a mysql, ora però mi da il seguente errore:

Tipo di errore:
Errore di compilazione di Microsoft VBScript (0x800A0411)
Nome ridefinito
/catalogo.asp, line 35, column 4
dim co

per la connessione uso:
codice:
  dim co 
  set co = server.createObject("ADODB.Connection") 
  co.Open "Driver={MySQL ODBC 3.51 Driver};port=3306;Database=prova;UID=root;PWD=;" 
  dim rs 
  set rs = server.createObject("ADODB.Recordset") 
  strq = "select * from catalogo where ((categoria='" & categoria & "') or (categoria2='" & categoria & "') or (categoria3='" & categoria & "') or (categoria4='" & categoria & "') or (categoria5='" & categoria & "')) and abilitato='S'"
  rs.Open strq,co,2,3 
  dim rs2 
  strq2 = "select count(*) as totrec from catalogo where ((categoria='" & categoria & "') or (categoria2='" & categoria & "') or (categoria3='" & categoria & "') or (categoria4='" & categoria & "') or (categoria5='" & categoria & "')) and abilitato='S'"
  set rs2 = co.execute(strq2)
Fatemi sapere
Grazie.