[VB6] connessione a Mysql... direttamente al server

[zanlu88s]

Buona sera a tutti.

Dopo varie nottate dedicate a leggere info su vari siti (compreso il mitico html.it) ho deciso di provare a chiedere il vostro aiuto, in quanto sto per impazzire.

Il mio problema è essenzialmente questo:

Ho un DB su un server su "www.xeround.com" e vorrei utilizzare i dati con VB6.

Ovviamente devo prima connetterlo... ma io vorrei lavorarci in remoto... perchè tra i vari siti leggo solo gente che lavora con il "localhost"??

Attualmente ho pensato di fare cosi: ho scaricato il "mysql connector ODBC 5.1"... l'ho installato... e ho impostato tutti i dati:
DataSource Name, Description, TCP/IP Server, User e Password .. e facendo un test mi da "Connessione avvenuta"

Poi in vb6 inserisco questo codice, all'interno di un Cmd_Button:

Dim query As String
Set conn = New ADODB.Connection

xserver = "int.instance4765.db.xeround.com"
xdatabase = "..."
xuser = "..."
xpass = "..."


connStr = "DRIVER={MySQL ODBC 5.1 Driver};" _
& "SERVER=" & xserver & ";" _
& "DATABASE=" & xdatabase & ";" _
& "UID=" & xuser & ";" _
& "PWD=" & xpass & ";" _
& "OPTION=18475"

conn.ConnectionString = connStr

conn.Open

Mi da l'errore :"Nome origine dati non trovato e driver predefinito non specidicato"

Ho provato anche con un altro codice:

    Set conn = CreateObject("ADODB.Connection")
    
    'Inizializza le variabili
    sourced = "..."
    mysql_host = "instance4765.db.xeround.com"
    mysql_userid = "..."
    mysql_password = "..."
    mysql_database = ".."
    mysql_port = "3597"

    ' stessi dati inseriti nel mysql Connector ODBC

    'Crea la stringa di connessione
    connect_string = "Provider=MySqlProv;Data Source=" & sourced & ";server=" & mysql_host & ";DB=" & mysql_database & ";User=" & mysql_userid & ";Password=" & mysql_password & ";Option=131088; Stmt=;Port=" & mysql_port & "" & Chr(34)
    conn.Provider = "MySqlProv"
    conn.ConnectionString = connect_string
    conn.CommandTimeout = 1000
    conn.ConnectionTimeout = 1000 'Tempo in mS prima che il tentativo di connessione vada in TimeOut
    conn.CursorLocation = adUseServer

Ma non riesco MAI A CONNETTERMI A QUESTO MIO DB... Vi prego aiutatemi.. fatemi capire in cosa sbaglio...

Grazie

[gibra]

Se lo spazio web non è su un tuo server, cioè è su un server di terze parti, al 99.9% non puoi accedervi direttamente, perchè il provider non te lo permetterà mai, per questioni di sicurezza.

Ecco perchè trovi tanti esempi con 'localhost'

Infatti puoi solo accedervi tramite pagine ASP, che essendo eseguite in locale (sul server) richiedono solo localhost, a parte ovviamente i parametri di accesso (nome db, user e password).

[zanlu88s]

Dunque non potrò mai comandare un Db mysql da programma in VB6 ?

[oregon]

Mica ti hanno detto questo.

Solo se il DBMS sta sul server di terze parti che non espone il servizio su internet.

Se ti fai un tuo server e esponi su internet gestendolo in prima persona, allora lo puoi fare tranquillamente (ovviamente, i problemi di sicurezza saranno tuoi).

[zanlu88s]

Il fatto è che ho sbattuto un pò la testa per cercare un hosting che mi permettesse di connettermi ad ODBC driver MySql.. e con questo funziona...
Dunque non significa niente?
Se riesco a farlo connettere lì non significa che lo posso connettere anche con il mio programma in VB6 ?

[oregon]

Originariamente inviato da zanlu88s
Il fatto è che ho sbattuto un pò la testa per cercare un hosting che mi permettesse di connettermi ad ODBC driver MySql.. e con questo funziona...

Connetterti da dove? Dal server dell'hosting? O da internet?

[zanlu88s]

Connettersi tramite MySql Driver ODBC 5.1

[Grumpy]

Spinto da curiosità ho voluto provare il servizio offerto da xeround.com
Ho avuto qualche difficoltà, ma alla fine pare che funzioni e anche nella versione free.
La stringa di connessione è quella del tuo primo esempio con l'aggiunta del parametro PORT=...

Naturalmente non c'è da aspettarsi grandi prestazioni.

:bye:

[oregon]

Originariamente inviato da zanlu88s
Connettersi tramite MySql Driver ODBC 5.1

Ottima risposta ... ma la domanda era un'altra ...

Mi ha risposto Grumpy ... quindi PUOI collegarti da Internet con la giusta stringa di connessione, indicando la porta su cui farlo.

[zanlu88s]

Ho inserito questo codice:

 

Set conn = New ADODB.Connection

xserver = "instance4765.db.xeround.com"
xdatabase = "..."
xuser = "..."
xpass = "..."
xport = "3597"

connStr = "DRIVER={MySQL ODBC 5.1 Driver};" _
& "SERVER=" & xserver & ";" _
& "DATABASE=" & xdatabase & ";" _
& "UID=" & xuser & ";" _
& "PWD=" & xpass & ";" _
& "PORT=" & xport & ";"_
& "OPTION=18475"

conn.ConnectionString = connStr

conn.Open

Continua a darmi l'errore: "Nome origine dati non trovato e driver predefinito non specidicato"

A questo punto mi viene il dubbio che sia sbagliato proprio il mio codice per la connessione..


Please Help ME !