[Resolvido] [] Erro de conexão MySQL (800a0401)

Olá pessoal, estou com tal erro ao conectar meu banco de dados:

Erro de compilação do Microsoft VBScript erro '800a0401'

Fim da instrução esperado

/INC/conexao.inc, line 5

conexaodb.open "Driver=MySQL ODBC 3.51 Driver; DATABASE=vitorluis; SERVER=mysql.vitorluis.com.br; UID=vitorluis; PASSWORD=******";

---------------------------------------------------------------------------------------------------------------------------------^

Alguem poderia me ajudar a tratar este erro?

O codigo da pagina indicada é:

<%
Dim conexaodb
Sub AbreConexao
set conexaodb = Server.CreateObject("ADODB.Connection")
conexaodb.open "Driver=MySQL ODBC 3.51 Driver; DATABASE=vitorluis; SERVER=mysql.vitorluis.com.br; UID=vitorluis; PASSWORD=******";
end sub
Sub FechaConexao
conexaodb.close
set conexaodb = nothing
end sub
%>