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

VBScript Discussion :

Script vbs pour modifier une base mdb


Sujet :

VBScript

  1. #1
    Candidat au Club
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Juin 2020
    Messages
    3
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 62
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Juin 2020
    Messages : 3
    Par défaut Script vbs pour modifier une base mdb
    Bonjour,

    Sous Windows 10 professionnel, je tente de créer un fichier script .vbs pour modifier des enregistrements dans une base de données .mdb mais j'obtiens toujours une erreur :
    Ligne : 3
    Erreur : Impossible de trouver le fournisseur. Il est peut-être mal installé.
    Code : 800A0E7A
    Source : ADODB.Connexion
    Voici le contenu de mon fichier .vbs :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Const strDBPath = "‪C:\xxxxxxx\MonFichier.mdb"
    Set Database_Ref = CreateObject("ADODB.Connection")
    Database_Ref.Open("Provider=Microsoft.Jet.OLEDB.12.0;Data Source=" & strDBPath)
    Database_Ref.Execute "delete from Pro"
    Database_Ref.Close
    Merci d'avance pour votre aide.
    Thierry

  2. #2
    Expert confirmé
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    Décembre 2004
    Messages
    6 124
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 69
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Décembre 2004
    Messages : 6 124
    Par défaut
    Salut

    L'erreur semble explicite, tu n'as pas le driver Microsoft.Jet.OLEDB.12.0 installé/inscrit sur ton système.
    Ou tu l'installes, ou tu peux essayer d’utiliser un autre driver
    Exemple: PROVIDER=Microsoft.Jet.OLEDB.4.0 qui, il me semble bien, est installé par défaut sous Window 10.
    :whistle:pourquoi pas, pour remercier, un :plusser: pour celui/ceux qui vous ont dépannés.
    saut de ligne
    OOOOOOOOO👉 → → Ma page perso sur DVP ← ← 👈

  3. #3
    Candidat au Club
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Juin 2020
    Messages
    3
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 62
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Juin 2020
    Messages : 3
    Par défaut
    Bonjour et merci pour ta réponse rapide.

    J'avais déjà tenté de changer de driver et au départ c'est celui que tu proposes que j'avais utilisé.
    Je viens de revérifier et avec :
    PROVIDER=Microsoft.Jet.OLEDB.4.0
    J'ai exactement la même erreur.
    Est-ce que cela pourrait provenir de mon fichier .mdb ? A priori non car si je donne un path faux, j'ai toujours cette erreur de driver.

    Si tu executes ce vbs sur ton PC, as tu cette erreur ?

    Merci d'avance,
    Thierry

  4. #4
    Expert confirmé
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    Décembre 2004
    Messages
    6 124
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 69
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : Décembre 2004
    Messages : 6 124
    Par défaut
    Salut

    En effet, j'ai la même erreur, cela semble être un problème de driver 32 bits utilisé sous window10 lui en 64 bits, mais surtout la version Acces installé pour windows 10 qui elle est en 64 bits.

    Avec un autre PC (en windows 7, 32 bits) le ConnectString PROVIDER=Microsoft.ACE.OLEDB.12.0 ou PROVIDER=Microsoft.Jet.OLEDB.4.0 fonctionnent toujours très bien.

    Je viens de passer une bonne heure a essayer de trouver une solution, mais il semblerait qu'il faille enregistrer une version redistribuable du pilote, chose que je ne veux pas faire sur le pc windows 10, étant donné que je n'utilise pratiquement plus VBScript.

    Si personne n'a de solution d'ici quelque jours, je tenterait une installation depuis un programme VB6, il m'installera peut être le bon pilote compatible avec windows 10.
    :whistle:pourquoi pas, pour remercier, un :plusser: pour celui/ceux qui vous ont dépannés.
    saut de ligne
    OOOOOOOOO👉 → → Ma page perso sur DVP ← ← 👈

  5. #5
    Candidat au Club
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Juin 2020
    Messages
    3
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 62
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Juin 2020
    Messages : 3
    Par défaut
    Merci pour ton retour.
    Par chance, les PC de production sur lesquels ce script devra fonctionner sont sous Windows 7 Pro 32bits.
    Je ne vais donc pas perdre plus de temps à essayer de le faire fonctionner sur mon PC Windows 10 64bits.

    Bonne après-midi.
    Thierry

Discussions similaires

  1. Script VBS pour modifier les options Internet
    Par rjl dans le forum Windows XP
    Réponses: 9
    Dernier message: 26/11/2009, 18h50
  2. Formulaire pour modifier une base mysql
    Par ogn123 dans le forum PHP & Base de données
    Réponses: 10
    Dernier message: 16/04/2009, 09h32
  3. Script vbs pour ajouter une combo dans Excel
    Par xant dans le forum VBScript
    Réponses: 5
    Dernier message: 11/12/2008, 10h52
  4. [Base Access] Objets pour accéder à une base mdb
    Par soso78 dans le forum VB 6 et antérieur
    Réponses: 6
    Dernier message: 24/04/2007, 13h16
  5. Réponses: 8
    Dernier message: 23/03/2005, 19h28

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