Connessione a mysql

[carlostefano]

Ciao,
stavo provando on vbscript ad effettuare una connessione ad un database mysql.
A tale scopo ho scritto la seguente subroutine:

sub openMysql(strsql)

dim objconn, objRecordset

CONST DATABASE_NAME = "pippo"
CONST STR_SERVER = "29.156.65.64"
CONST STR_DATABASE_USER = "pippo
CONST STR_DATABASE_PWD = "miapwd"


set objconn = server.createobject("adodb.connection")

objconn.connectionstring = "server=" & STR_SERVER & ";db=" & DATABASE_NAME & ";uid=" & STR_DATABASE_USER _
& ";pwd="& STR_DATABASE_PWD & ";driver=MySQL ODBC 3.51 Driver"

On Error Resume Next
objconn.open
If Err.Number <> 0 Then
response.Redirect("/index.asp")
else
set objRecordset = server.createobject("adodb.recordset")
objRecordset.open strsql, objconn
end if
end sub


Però ottengo il seguente errore:



Descrizione: [MySQL][ODBC 3.51 Driver]Can't connect to MySQL server on '75.126.65.69' (10060)
Numero: -2147467259
Origine: Microsoft OLE DB Provider for ODBC Drivers


Qualcuno ha idea di dove potrebbe essere il problema?

Saluti,
carlostefano

[-AA-]

Prova così

http://www.lukeonweb.net/245.asp

[isaya]

prova a modificare così:

CONST DATABASE_NAME = "pippo"
CONST STR_SERVER = "29.156.65.64"
CONST STR_SERVER_PORT = "3306" ' è la porta di default
CONST STR_DATABASE_USER = "pippo
CONST STR_DATABASE_PWD = "miapwd"


set objconn = server.createobject("adodb.connection")

objconn.connectionstring = "server=" & STR_SERVER & "; port=" & STR_SERVER_PORT & "; db=" & DATABASE_NAME & ";uid=" & STR_DATABASE_USER _
& ";pwd="& STR_DATABASE_PWD & ";driver=MySQL ODBC 3.51 Driver"