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
Voici le contenu de mon fichier .vbs :Erreur : Impossible de trouver le fournisseur. Il est peut-être mal installé.
Code : 800A0E7A
Source : ADODB.Connexion
Merci d'avance pour votre aide.
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
Thierry
Partager