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 :

[Debutant] connection ADODB et remplissage de feuille


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    in
    in est déconnecté
    Membre Expert Avatar de in
    Profil pro
    Inscrit en
    Avril 2003
    Messages
    1 612
    Détails du profil
    Informations personnelles :
    Localisation : France, Finistère (Bretagne)

    Informations forums :
    Inscription : Avril 2003
    Messages : 1 612
    Par défaut [Debutant] connection ADODB et remplissage de feuille
    Bonjour,

    j'ai un existant avec des feuilles remplies à partir d'une base Oracle. La connexion est pour le moment effectuée grâce à une connexion odbc, déclarée dans les sources de données de Windows.

    on me demande de modifier le comportement pour que les informations de connexion soient récupérées depuis un fichier INI.

    J'ai donc suivi des tutos de lecture dans un fichier INI et de connexion par ADODB.

    question 1 : est ce bien un objet adodb que je dois utiliser ? J'ai fait ceci :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
     Dim cnx As ADODB.Connection
     Set cnx = New ADODB.Connection
     Dim SERVER As String, UID As String, PWD As String, DB As String, pathToFile As String
     
     pathToFile = ThisWorkbook.Path & "\config.ini"
     
     SERVER = LitDansFichierIni("bdd", "SERVER", pathToFile, "Saturne")
     UID = LitDansFichierIni("bdd", "UID", pathToFile, "THALES")
     PWD = LitDansFichierIni("bdd", "PWD", pathToFile, "PMC")
     DB = LitDansFichierIni("bdd", "DB", pathToFile, "P5INT")
     
    ' ouverture de la connection à la base de données
    cnx.ConnectionString = "UID=" + UID & ";PWD=" & PWD & ";" & "DRIVER=msdaora;Server=" & SERVER & ";Database=" & DB & ";"
    cnx.Open
    Helas j'ai comme message d'erreur :
    Type défini par l'utilisateur non défini
    question 1bis : suis-je indéfini ? (non je plaisante )

    question 2 : mes feuilles sont remplies de la façon suivante :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    ThisWorkbook.Worksheets("setting").QueryTables("date_fin").Refresh BackgroundQuery:=False
    quand j'aurais réglé la question 1, est ce que la requête à utiliser est seulement du type
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    select * from tableConcernee
    ?
    ou alors il faut que j'arrive à trouver la requete qui doit être définie quelque part. Helas (encore) je ne sais pas comment la récupérer.

    En espérant avoir été assez clair, je m'impatiente de vos réponse

    merki

  2. #2
    Expert éminent


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Par défaut
    1bis : As tu activer les référence à ADO

  3. #3
    in
    in est déconnecté
    Membre Expert Avatar de in
    Profil pro
    Inscrit en
    Avril 2003
    Messages
    1 612
    Détails du profil
    Informations personnelles :
    Localisation : France, Finistère (Bretagne)

    Informations forums :
    Inscription : Avril 2003
    Messages : 1 612
    Par défaut
    désolé, comme tout le monde est en vacance ici, en fait je me retrouve avec ce dvpt excel à réaliser mais je débute. disons que j'ai une expérience cumulée de 4 heures.

    Donc, non je n'ai pas dû activer ces références ... mais comment fait on ?

  4. #4
    Expert éminent


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Par défaut
    dans l'editeur VBE (ALT-F11) ... menu outils références .. puis cas à cocher "Microsoft AdO 2..."

  5. #5
    in
    in est déconnecté
    Membre Expert Avatar de in
    Profil pro
    Inscrit en
    Avril 2003
    Messages
    1 612
    Détails du profil
    Informations personnelles :
    Localisation : France, Finistère (Bretagne)

    Informations forums :
    Inscription : Avril 2003
    Messages : 1 612
    Par défaut
    bon ben désolé mais je ne trouve pas.

    j'ai des trucs comme ça :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Microsoft ADO Ext. 2.8 for DDL and Security
    Microsoft DAO ...
    Microsoft OLE DB ...
    mais pas de Ado 2

    ça dépend de ma version de VB ? j'ai la 6.0
    il y a quelque chose à installer ? Si oui, si je distribue l'appli, les utilisateurs auront aussi à l'installer ?

    Sinon que puis-je utiliser à la place d'ADODB ?


    [EDIT] Autant pour moi ... c'est ActiveX Data Object ok c'est bon.

    bon ben il me reste la question 2 ...

Discussions similaires

  1. Connexion ADODB et remplissage de combobox
    Par trotters213 dans le forum VBA Access
    Réponses: 4
    Dernier message: 26/06/2007, 09h40
  2. [Debutant]Connection a une Base de Donnees: NullPointerException
    Par Romain93 dans le forum Tomcat et TomEE
    Réponses: 14
    Dernier message: 04/07/2006, 18h10
  3. [debutant]connection osql sur msde
    Par ChristopheOce dans le forum Outils
    Réponses: 2
    Dernier message: 15/02/2006, 15h53
  4. [debutant] connection à une BDD MySQL
    Par Golork dans le forum Bases de données
    Réponses: 1
    Dernier message: 11/03/2005, 16h51
  5. Réponses: 5
    Dernier message: 21/04/2004, 11h43

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