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
    Nouveau Candidat au Club
    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
    Rédacteur/Modérateur

    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.
    Soyez sympa, pensez -y
    Balises[CODE]...[/CODE]
    Balises[CODE=NomDuLangage]...[/CODE] quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Balises[C]...[/C] code intégré dans une phrase.
    Balises[C=NomDuLangage]...[/C] code intégré dans une phrase quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Le bouton en fin de discussion, quand vous avez obtenu l'aide attendue.
    ......... et pourquoi pas, pour remercier, un pour celui/ceux qui vous ont dépannés.

  3. #3
    Nouveau Candidat au Club
    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
    Rédacteur/Modérateur

    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.
    Soyez sympa, pensez -y
    Balises[CODE]...[/CODE]
    Balises[CODE=NomDuLangage]...[/CODE] quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Balises[C]...[/C] code intégré dans une phrase.
    Balises[C=NomDuLangage]...[/C] code intégré dans une phrase quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Le bouton en fin de discussion, quand vous avez obtenu l'aide attendue.
    ......... et pourquoi pas, pour remercier, un pour celui/ceux qui vous ont dépannés.

  5. #5
    Nouveau Candidat au Club
    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