Bonjour , je suis en train d'écrire un code vbscript qui lit les informations dans un fichier excel . Mais j'ai le message d'erreur suivante dans monfichier.vbs : fin d'instruction attendue(erreur 800A0400 ) en vbscript
Pouvez vous me dire ce qui ne va pas .
Voici mon code

Code vbscript : 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
 
Sub  lire_excel()
Dim connexion as adodb.connection
Dim fichier as String 
'On va chercher le lien vers le fichier excel 
fichier="SPACE_MUTASIR2\FICHIERS_EXCELS\code_libelle_pret.xlsx"
'On établit la connexion maintenant
With connexion
provider="microsoft.jet.oledb.4.0"
connectionstring="provider=microsoft.ace.oledb.12.0 ; data source="&fichier&"; 
extended properties="excel 12.0 ;hdr=yes;"  "
open 
End With 
connexion.close
Set connexion=nothing
End Sub