Vb myqsl

Description

LE CODE FOURNI AU PROGRAMMEUR DEBUTANT LA POSIBILITE DE SE CONNECTER A MYSQL ET AJOUTER UN ENREGISTREMENT
IL NECESSITE :
1. TELECHARGER ET INSTALLER http://dev.mysql.com/get/Downloads/MyODBC3/mysql-connector-odbc-3.51.12

2. CREER EN TANT QUE ROOT (PASSE:PATRICK )UNE BASE DE DONNEE ECOLE ET UNE TABLE INSCRIPTION(NOM,POSTNOM)

3 (Facultatif) CONFIGURATION DE LA SOURCE DE DONNEE DE MICROSOFT (ODBC DATA SOURCE ADMINISTRATOR) EN AJOUTANT LA BASE ECOLE
4. AJOUTER A VOTRE FENETRE VB: TEXT1.TEXT,TEXT2.TEXT,COMMAND BOUTON, Adodc1

Source / Exemple :


Dim conn As ADODB.Connection
    Set conn = New ADODB.Connection
     
    Dim rs As ADODB.Recordset
    Set rs = New ADODB.Recordset
     
    conn.CursorLocation = adUseClient
    conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _
            & "SERVER=127.0.0.1;" _
            & "DATABASE=ECOLE;" _
            & "UID=root;" _
            & "PWD=PATRICK;" _
            & "OPTION=" & 1 + 2 + 8 + 32 + 2048 + 16384
 
    conn.Open
    
     
    rs.Open "INSERT INTO INSCRIPTION (NOM,POSTNOM) values('" + Text1.Text + "','" + Text2.Text + "' )", conn, adOpenStatic, adLockOptimistic
 
    'rs.Close
    Set rs = Nothing
     
    conn.Close
   Set conn = Nothing

Conclusion :


POUR TOUTES LES QUESTIONS ECRIRE A patykalala@yahoo.fr

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.