Mike
Mike

Reputation: 2601

VBScript Invalid Character 800A0408 compilation error

I get a compilation error when I try to run the following vbs code from a command prompt in 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

It says the issue is with Line 1 Char 1. Any ideas?

Upvotes: 26

Views: 72383

Answers (3)

Pedro Hoton
Pedro Hoton

Reputation: 11

Check you are not using extended charater like á é í ó ú ñ in a variable's name

Upvotes: 0

Ammar
Ammar

Reputation: 1068

FYI for those with the same problem in the future, to fix this:

  1. Open the .vbs in notepad
  2. Go to file and "save as"
  3. Right under the file name box, you will see a drop down menu for encoding. Choose ANSI.

Upvotes: 23

Rubens Farias
Rubens Farias

Reputation: 57936

A possible problem is how your file was encoded; try to save it as ANSI and run it again.

Upvotes: 70

Related Questions