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

VB 6 et antérieur Discussion :

Correspondance code CR de ACCESS vers MySQL


Sujet :

VB 6 et antérieur

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé Avatar de bruce207
    Inscrit en
    Novembre 2007
    Messages
    319
    Détails du profil
    Informations forums :
    Inscription : Novembre 2007
    Messages : 319
    Par défaut Correspondance code CR de ACCESS vers MySQL
    Bonjour,
    j'ai changé le SGBDR de mon application de ACCESS vers MySQL. Sur une feuille j'ai un bouton, un textbox dans lequel on entre un matricule puis apres avoir cliquer sur le bouton on a l'etat correspondant à ce matricule. Voici le code de command_click du bouton :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    CrystalReport1.DataFiles(0) = App.Path + "\FIFERPRO.mdb"
    CrystalReport1.ReportFileName = App.Path + "\emprunt.rpt"
    CrystalReport1.SelectionFormula = "{emprunt.mat_empt}='" + Text1.Text + "'"
    CrystalReport1.WindowState = crptMaximized
    CrystalReport1.DiscardSavedData = True
    CrystalReport1.Action = 1
    la base ici est Fiferpro, le rapport ici concerne les emprunts et est fait avec crystal report 8.5
    mon probleme est que je voudrais savoir comment faire pour transformer ce code afin que ça marche maintenant avec ma base de données Fiferpro sous MySQL, serveur localhost, user root, mot de passe ""(aucun), driver 3.51
    Merci d'avance.

  2. #2
    Membre éclairé Avatar de bruce207
    Inscrit en
    Novembre 2007
    Messages
    319
    Détails du profil
    Informations forums :
    Inscription : Novembre 2007
    Messages : 319
    Par défaut
    J'ai pu résoudre mon problème en procédant comme suit :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    CrystalReport1.Connect = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=127.0.0.1;DATABASE=Fiferpro;UID=root;PWD=;OPTION=" & 1 + 2 + 8 + 32 + 2048 + 16384 & ";"
    CrystalReport1.ReportFileName = App.Path + "\emprunt.rpt"
    CrystalReport1.SelectionFormula = "{emprunt.mat_empt}='" + Text1.Text + "'"
    CrystalReport1.WindowState = crptMaximized
    CrystalReport1.DiscardSavedData = True
    CrystalReport1.Action = 1
    j'ai juste changé la 1ere ligne

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. base access vers mysql
    Par chiarde dans le forum Débuter
    Réponses: 1
    Dernier message: 14/03/2006, 12h59
  2. [Migration] Access vers MySQL
    Par EL BEGHDADI dans le forum Migration
    Réponses: 1
    Dernier message: 09/02/2006, 17h07
  3. Copie champs Access vers MySQL
    Par DrSlump dans le forum SQL Procédural
    Réponses: 7
    Dernier message: 02/11/2005, 17h31
  4. Export base Access vers MySql
    Par jjn1er dans le forum Outils
    Réponses: 7
    Dernier message: 10/03/2003, 23h50

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