Test di connessione al Database

[Mauro74]

Ciao,

avrei bisogno di testare prima di fare la query se il server mysql è up o meno.

Avete idea di come fare.

esempio

Set connp = Server.CreateObject("ADODB.Connection")
connp.open "Driver={MySQL ODBC 3.51 Driver};Server=SERVER1;Port=3306;Database=esigenzeg;User=XXXX;Password=XXXXX;Option=3;"

if (ilserver1 è up) then 

connessione = "ok"

else 

connessione = "ko"
connp.open "Driver={MySQL ODBC 3.51 Driver};Server=SERVER2;Port=3306;Database=esigenzeg;User=XXXX;Password=XXXXX;Option=3;"

end if

mi dite che devo metter al posto di (ilserver1 è up)

grazie Mauro

[Mauro74]

ho risolto,

allora il check si fa cosi

Set connp = Server.CreateObject("ADODB.Connection")
connp.open "Driver={MySQL ODBC 3.51 Driver};Server=SERVER1;Port=3306;Database=esigenzeg;User=XXXX;Password=XXXXX;Option=3;"

if connp.state = 1 then 

connessione = "ok"

else 

connessione = "ko"
connp.open "Driver={MySQL ODBC 3.51 Driver};Server=SERVER2;Port=3306;Database=esigenzeg;User=XXXX;Password=XXXXX;Option=3;"

end if

scusate il disturbo

ciao Mauro