VBScript no válida error de carácter 800A0408 compilación

Question

me sale un error de compilación cuando trato de ejecutar el siguiente código VBS desde un símbolo del sistema en 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 

Se dice que el problema es con la línea 1 Char 1. Cualquier ideas?

Answer 1

Un posible problema es cómo se codificó el archivo; intente guardarlo como ANSI y ejecutarlo nuevamente.

Answer 2

FYI para los que tienen el mismo problema en el futuro, para solucionar este problema:

1. Abiertas .vbs en libreta
2. vaya a Archivo y "guardar como"
3. derecho bajo el nombre de archivo cuadro, verá un menú desplegable para la codificación. Elija ANSI.

Answer 3

Comprobar que no está utilizando charater extendida como N en el nombre de una variable