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

Macros et VBA Excel Discussion :

[VBA-E] Requête ODBC


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Inscrit en
    Juin 2003
    Messages
    156
    Détails du profil
    Informations forums :
    Inscription : Juin 2003
    Messages : 156
    Par défaut [VBA-E] Requête ODBC
    Bonjour,

    Je suis souvent présent sur les forum de developpez.net mais pour la 1ère fois sur ce sous forum VBA. J'ai un traitement à développer dans cette technologie et je sollicite votre aide car j'ai un problème pour établir la liaison via ODBC à ma base Oracle.

    Alors ci dessous du code simplifié

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
        Set wrkJet = CreateWorkspace("ODBCDirect", "", "", dbUseODBC)    
        Set db = wrkJet.OpenConnection("", dbDriverNoPrompt, False, "ODBC;SERVER=gfia2.ad.canam.net;DSN=Oracle Files;UID=webcmurp;PWD=webcmurp")
    Puis

    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
     
            Set qd = db.CreateQueryDef("")
            qd.Sql = "INSERT INTO RDD_DAD (" & _
                        "NUM_CMR," & _
                        "NAT_DEM," & _
                        "NIR_DEM," & _
                        "TYPE_DEM," & _
                        "DATE_REC," & _
                        "CODE_INST," & _
                        "DATE_FIN_INST," & _
                        "CODE_DEC," & _
                        "DATE_DEC," & _
                        "CODE_FILTRE," & _
                        "RESS)" & _
                    "VALUES (" & _
                        "numCmr," & _
                        "natDem," & _
                        "nirDem," & _
                        "typDem," & _
                        "datRec," & _
                        "codIns," & _
                        "datIns," & _
                        "codDec," & _
                        "datDec," & _
                        "codFil," & _
                        "ressrc);"
            qd.Execute dbRunAsync
    Et ça se plante avec un code 3146 (appel ODBC) précisément sur la ligne qd.Execute.dbRunAsync. Quelques investigations plus tard et il semble que l'erreur survienne au niveau Oracle au travers du code "ORA-00911 caractère non valide"...

    J'ai plus trop d'idées pour corriger ça ; toute aide serait largement apprécié ! Je ne vois vraiment plus car même le "SELECT * FROM RDD_DAD" me ramène la même erreur et là, aucun doute possible la syntaxe est bonne et aucun caractère ne semble invalide.

    Merci, Frédéric

  2. #2
    Membre confirmé
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    150
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2006
    Messages : 150
    Par défaut
    Il ne faut pas mettre le point virgule à la fin de ta requête, j'avais eu le même probléme au début.

  3. #3
    Membre confirmé
    Inscrit en
    Juin 2003
    Messages
    156
    Détails du profil
    Informations forums :
    Inscription : Juin 2003
    Messages : 156
    Par défaut
    MERCI !!

    Ca n'était en effet que ça !!

    Frédéric

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

Discussions similaires

  1. Réponses: 6
    Dernier message: 09/06/2006, 00h19
  2. [VBA-E] Requète SQL avec chemin de base de données variable
    Par Svart26 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 26/05/2006, 13h29
  3. Réponses: 5
    Dernier message: 29/01/2006, 23h45
  4. [VBA-A] Requête SQL
    Par Berny03 dans le forum Requêtes et SQL.
    Réponses: 7
    Dernier message: 24/11/2005, 21h16
  5. [VB.NET] [ODBC] Récupérer des valeurs avec requête ODBC?
    Par Pleymo dans le forum Windows Forms
    Réponses: 5
    Dernier message: 04/03/2005, 16h38

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