web-dev-qa-db-fra.com

Erreur de compilation VBScript invalide Character 800A0408

Je reçois une erreur de compilation lorsque j'essaie d'exécuter le code vbs suivant à partir d'une invite de commande dans Windows 7.

Option Explicit
Dim objNetwork, strRemotePath1, strRemotePath2, strRemotePath3
Dim strDriveLetter1, strDriveLetter2, strDriveLetter3, strUserName

Set objNetwork = CreateObject("WScript.Network")
strUserName = objNetwork.UserName 

strDriveLetter1 = "H:"
strDriveLetter2 = "P:"
strDriveLetter3 = "S:"
strRemotePath1 = "\\test\public\users\" & strUserName & "\"
strRemotePath2 = "\\test\public\groups\"
strRemotePath3 = "\\test\scans\"


'Section which maps two drives, M: and P: and S:
objNetwork.MapNetworkDrive strDriveLetter1, strRemotePath1
objNetwork.MapNetworkDrive strDriveLetter2, strRemotePath2
objNetwork.MapNetworkDrive strDriveLetter3, strRemotePath3

'Extra code just to add a message box
WScript.Echo "Map drives " & strDriveLetter1 & " & " & strDriveLetter2 & " & " & strDriveLetter3

Wscript.Quit

Il est dit que le problème concerne Ligne 1, caractère 1. Des idées?

19
Mike

Un problème possible est de savoir comment votre fichier a été encodé. essayez de le sauvegarder en tant qu'ANSI et exécutez-le à nouveau.

53
Rubens Farias

FYI pour ceux avec le même problème à l'avenir, pour résoudre ce problème:

  1. Ouvrez le fichier .vbs dans le bloc-notes
  2. Aller au fichier et "enregistrer sous"
  3. Juste sous la case du nom du fichier, vous verrez un menu déroulant pour l’encodage. ChoisissezANSI.
18
Ammar

Vérifiez que vous n'utilisez pas de caractères étendus comme á é í ó ñ dans le nom d'une variable

0
Pedro Hoton