VB6 et MySQL

Question

bonjour a tous, j'aurais besoin d'une grosse aide la car je n'y comprends rien.
Bon je suis en train de développer une application en VB6, celle ci doit posseder une base de donnée online en MySQL, mon plus gros probleme est de savoir premièrement quel sont les dll et ocx a utiliser pour pouvoir utiliser ma base MySQL, mais aussi kel est la syntaxe pour s'y connecter.
Je voudrais utiliser ce type de liens avec une connection ADODC.

Merci a tout ceux ki vont repondre a cette kestion :)

cs_Esquisse · Answer

Salut ;)

Tu peux télécharger les driver ODBC pour MySQL sur le site officiel de MySQL (http://www.mysql.com/downloads/api-myodbc-3.51.html) ensuite tu créé ton DSN (comme d'habitude mais avec le driver MySQL).

Ensuite tu appelle ton DSN comme un autre. je te colle un petit exemple pour travaille sur du SQL et un recordset :

'Variable
Dim oCnn As New ADODB.Connection
Dim oCmd As New ADODB.Command

'Connection à la BD via ODBC
oCnn.Open "DSN=NOM_DE_TON_DSN;UID=UTILISATEUR;PWD=MOT_DE_PASSE;"

'Execute une commande SQL en ADO
With oCmd
    oCmd.ActiveConnection = oCnn
    .CommandText = "MA COMMANDE SQL"
    .CommandType = adCmdText
    .Execute
End With

'------------
'Utilisation d'un recordset
Dim oRST As New ADODB.Recordset

With oCmd
    .ActiveConnection = oCnn 'On dit sur quelle connection on travaille
    .CommandText "Ma Table" 'On donne la commande
    .CommandType = adCmdTable 'On définit le type de commande
    Set oRST = .Execute 'On execute et on mets le résultat dans le recordset
End With

Do Until oRST.EOF
    MsgBox oRST.Fields("Mon Champ de la table Ma Table")
    oRST.MoveNext
Loop

VB6 et MySQL

1 réponse

Discussions similaires