IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Requêtes MySQL Discussion :

Convertir d'Access en MySql


Sujet :

Requêtes MySQL

  1. #1
    Membre régulier
    Homme Profil pro
    Étudiant
    Inscrit en
    Avril 2016
    Messages
    275
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 34
    Localisation : France, Essonne (Île de France)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Avril 2016
    Messages : 275
    Points : 76
    Points
    76
    Par défaut Convertir d'Access en MySql
    Bonjour, ayant finis les database dans mysql j'aimerais convertir du sql access en mysql voici le code:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    48
    49
    50
    51
    52
    53
    54
    55
    56
    57
    58
    59
    60
    61
    62
    Private Sub Suprimer_Affectation_Click()
    Dim OuiNon As Integer
    Dim strmysql As String
    Dim Numero_puce As String
    Dim MyDate As Date
    Dim RunMySQL As String
    DoCmd.SetWarnings False
     
    Numero_puce = Me.Num_SIM
     
    OuiNon = MsgBox("Est-ce que le matériel est déjà retourné ?", vbYesNo)
    If OuiNon = vbYes Then
        strmysql = "UPDATE Abonnements SET Abonnements.Statut_Abo = ""Non Affecté"""
        strmysql = strmysql & " WHERE (Abonnements.Num_SIM = """
        strmysql = strmysql & Numero_puce
        strmysql = strmysql & """);"
    '    DoCmd.RunSQL strmysql
        Me.Statut_Affectation = "Non Affecté"
            DoCmd.RunCommand acCmdSaveRecord
     
    MyDate = Date$
    User = Environ("USERNAME")
        RunMySQL = "INSERT INTO [Arch_Affectation] (Or_Affectation, USER_ID, PIN_Terminal, PIN_SIM, Coque, Vitre, Support_Vehicule, Num_EMEI,Num_SIM, Date_Début, Date_Fin, Actif, Statut_Affectation, Commentaire, Auteur, Date_Maj, Desc_Action )"
        RunMySQL = RunMySQL & " select Or_Affectation, USER_ID, PIN_Terminal, PIN_SIM, Coque, Vitre, Support_Vehicule, Num_EMEI,Num_SIM , Date_Début, #"
        RunMySQL = RunMySQL & MyDate
        RunMySQL = RunMySQL & "#, Actif, Statut_Affectation, Commentaire, """
        RunMySQL = RunMySQL & User
        RunMySQL = RunMySQL & """, #"
        RunMySQL = RunMySQL & MyDate
        RunMySQL = RunMySQL & "#, ""Supprimer Affectation"""
        RunMySQL = RunMySQL & " FROM [Affectation] WHERE [Affectation].Or_Affectation =" & Me.Or_Affectation & ";"
            DoCmd.RunSQL RunMySQL
     
            DoCmd.RunSQL " UPDATE [Equipement] INNER JOIN [Affectation] ON [Equipement].Num_EMEI = [Affectation].Num_EMEI SET [Equipement].Statut_Equipement =""Non Affecté""" _
             & " WHERE Equipement.Num_EMEI='" & Me.Num_EMEI & "'"
     
    ElseIf OuiNon = vbNo Then
        strmysql = "UPDATE Abonnements SET Abonnements.Statut_Abo = ""Attente Retour"""
        strmysql = strmysql & " WHERE (Abonnements.Num_SIM = """
        strmysql = strmysql & Numero_puce
        strmysql = strmysql & """);"
    '    DoCmd.RunSQL strmysql
        Me.Statut_Affectation = "Attente Retour"
            DoCmd.RunCommand acCmdSaveRecord
     
    MyDate = Date$
    User = Environ("USERNAME")
        RunMySQL = "INSERT INTO [Arch_Affectation] (Or_Affectation, USER_ID, PIN_Terminal, PIN_SIM, Coque, Vitre, Support_Vehicule, Num_EMEI,Num_SIM, Date_Début, Date_Fin, Actif, Statut_Affectation, Commentaire, Auteur, Date_Maj, Desc_Action )"
        RunMySQL = RunMySQL & " select Or_Affectation, USER_ID, PIN_Terminal, PIN_SIM, Coque, Vitre, Support_Vehicule, Num_EMEI,Num_SIM , Date_Début, #"
        RunMySQL = RunMySQL & MyDate
        RunMySQL = RunMySQL & "#, Actif, Statut_Affectation, Commentaire,"""
        RunMySQL = RunMySQL & User
        RunMySQL = RunMySQL & """, #"
        RunMySQL = RunMySQL & MyDate
        RunMySQL = RunMySQL & "#, ""Supprimer Affectation - Attente Retour"""
        RunMySQL = RunMySQL & " FROM [Affectation] WHERE [Affectation].Or_Affectation =" & Me.Or_Affectation & ";"
            DoCmd.RunSQL RunMySQL
     
            DoCmd.RunSQL " UPDATE [Equipement] INNER JOIN [Affectation] ON [Equipement].Num_EMEI = [Affectation].Num_EMEI SET [Equipement].Statut_Equipement =""Attente Retour""" _
             & " WHERE Equipement.Num_EMEI='" & Me.Num_EMEI & "'"
     
    End If
    Merci de vos réponse

  2. #2
    Modérateur
    Avatar de escartefigue
    Homme Profil pro
    bourreau
    Inscrit en
    Mars 2010
    Messages
    10 088
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Loir et Cher (Centre)

    Informations professionnelles :
    Activité : bourreau
    Secteur : Finance

    Informations forums :
    Inscription : Mars 2010
    Messages : 10 088
    Points : 38 393
    Points
    38 393
    Billets dans le blog
    9
    Par défaut
    Quels problèmes rencontrez vous ? quels sont les messages d'erreur si message il y a ?

  3. #3
    Membre régulier
    Homme Profil pro
    Étudiant
    Inscrit en
    Avril 2016
    Messages
    275
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 34
    Localisation : France, Essonne (Île de France)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Avril 2016
    Messages : 275
    Points : 76
    Points
    76
    Par défaut
    j'aimerais juste savoir si le code est juste pour mysql ou des modification a faire et savoir les quels ?
    merci

  4. #4
    Modérateur
    Avatar de al1_24
    Homme Profil pro
    Retraité
    Inscrit en
    Mai 2002
    Messages
    9 080
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 63
    Localisation : France, Val de Marne (Île de France)

    Informations professionnelles :
    Activité : Retraité
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Mai 2002
    Messages : 9 080
    Points : 30 778
    Points
    30 778
    Par défaut
    Dans cette requête la première chose que je remarque ce sont les chaines encadrées de guillemets doubles (Access) alors que MySQL respecte la norme sur ce point et attend des guillemets simples.
    Code VBA : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    strmysql = "UPDATE Abonnements SET Abonnements.Statut_Abo = 'Non Affecté'"
        strmysql = strmysql & " WHERE (Abonnements.Num_SIM = '" & Numero_puce & "');"
    Modérateur Langage SQL
    Règles du forum Langage SQL à lire par tous, N'hésitez pas à consulter les cours SQL
    N'oubliez pas le bouton et pensez aux balises
    [code]
    Si une réponse vous a aidé à résoudre votre problème, n'oubliez pas de voter pour elle en cliquant sur
    Aide-toi et le forum t'aidera : Un problème exposé sans mentionner les tentatives de résolution infructueuses peut laisser supposer que le posteur attend qu'on fasse son travail à sa place... et ne donne pas envie d'y répondre.

  5. #5
    Modérateur
    Avatar de escartefigue
    Homme Profil pro
    bourreau
    Inscrit en
    Mars 2010
    Messages
    10 088
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Loir et Cher (Centre)

    Informations professionnelles :
    Activité : bourreau
    Secteur : Finance

    Informations forums :
    Inscription : Mars 2010
    Messages : 10 088
    Points : 38 393
    Points
    38 393
    Billets dans le blog
    9
    Par défaut
    Soyez vigilants le cas échéant sur les jointures multiples, access utilise une syntaxe très particulière en emboitant les jointures, ce que ne font pas les autres SGBD

  6. #6
    Membre régulier
    Homme Profil pro
    Étudiant
    Inscrit en
    Avril 2016
    Messages
    275
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 34
    Localisation : France, Essonne (Île de France)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Avril 2016
    Messages : 275
    Points : 76
    Points
    76
    Par défaut
    merci pour la modification du code
    c'est les seuls modifications a apporté?
    comment puis-je faire pour mettre plusieurs jointure?

  7. #7
    Modérateur
    Avatar de escartefigue
    Homme Profil pro
    bourreau
    Inscrit en
    Mars 2010
    Messages
    10 088
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Loir et Cher (Centre)

    Informations professionnelles :
    Activité : bourreau
    Secteur : Finance

    Informations forums :
    Inscription : Mars 2010
    Messages : 10 088
    Points : 38 393
    Points
    38 393
    Billets dans le blog
    9
    Par défaut
    Pour les jointures multiples, alors qu'Access utilise une syntaxe non normée :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
    Select ...
    from ...
    inner join table1
         (inner join table 2
             on ...)
       on ...
    MySQL utilise la syntaxe standard

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    Select ...
    from ...
    inner join table1
       on ...
    inner join table2
       on ...

Discussions similaires

  1. convertir fichier access MDB en base mysql
    Par ps3user dans le forum Décisions SGBD
    Réponses: 0
    Dernier message: 14/10/2008, 18h38
  2. Convertir une BDD Access en Mysql
    Par ntahi dans le forum Migration
    Réponses: 1
    Dernier message: 16/05/2007, 16h36
  3. convertir access en mysql
    Par LeXo dans le forum Outils
    Réponses: 2
    Dernier message: 08/02/2007, 17h14
  4. Convertir une requête Access en MySQL
    Par iomega dans le forum Langage SQL
    Réponses: 5
    Dernier message: 06/03/2004, 10h47
  5. Export base Access vers MySql
    Par jjn1er dans le forum Outils
    Réponses: 7
    Dernier message: 11/03/2003, 00h50

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo