Vbs ошибка 800a0408

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 = "\testpublicusers" & strUserName & ""
strRemotePath2 = "\testpublicgroups"
strRemotePath3 = "\testscans"


'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?

Help, I’m trying to run a stored procedure, but i’m getting
the following error —

«Microsoft VBScript compilation error ‘800a0408’

Invalid character

/admin/afterreviewupdatepricing.asp, line 39

if(Request.QueryString(“day7“) <> «») then
updatepricingCommand__7dayrate =
Request.QueryString(“day7“)»

Where row 39 is —

if(Request.QueryString(“day7“) <> «») then
updatepricingCommand__7dayrate =
Request.QueryString(“day7“)

I’ve attached the code —

Any ideas as to what I’m doing wrong????

Thanks

• 

  In the command line or a batch file try using «type old.vbs > new.vbs» to convert the file(s) to ansi.

  http:/ Opens a new window/www.robvanderwoude.com/type.php#Unicode

  
  Was this post helpful?
  thumb_up
  thumb_down
  

• You need to post a snippet of your code, maybe the line and character referenced in the error?
  We do not have enough information to help with just the error.

  EDIT:
  After searching the error, it does seen to be an encoding issue.
  I have never seen that with NotePad++.

  
  Was this post helpful?
  thumb_up
  thumb_down
  

• 

  AdamRPL wrote:

  In the command line or a batch file try using «type old.vbs > new.vbs» to convert the file(s) to ansi.

  http:/ Opens a new window/www.robvanderwoude.com/type.php#Unicode

  Tried that and when I run the new file I get the same message.  Notepad++ is showing that it is ANSI.

  attach_file
  Attachment
  
  2014-01-23_13_34_…ection.png
  41.1 KB
  
  

  
  Was this post helpful?
  thumb_up
  thumb_down
  

• 

  Dave Rossi wrote:

  You need to post a snippet of your code, maybe the line and character referenced in the error?
  We do not have enough information to help with just the error.

  EDIT:
  After searching the error, it does seen to be an encoding issue.
  I have never seen that with NotePad++.

  It’s always line 1 character 1.

  Here is the beginning of the code:

  ‘——————————————————————————–
  ‘declare variables
  ‘——————————————————————————–
  
  Const ForAppending = 8
  
  Const LogFile = “c:tempjavauninstall.txt”
  
  ‘——————————————————————————–
  ‘create log file
  ‘——————————————————————————–
  
  Set objFSO = CreateObject(“Scripting.FileSystemObject”)
  
  Set objLogFile = objFSO.CreateTextFile(LogFile)
  
  sLog = “Started Java Uninstall”
  
  Call WriteLog(sLog)
  

  This script worked just fine until I edited it recently.

  
  Was this post helpful?
  thumb_up
  thumb_down
  

• 

  So I had to go through the whole file and replace invalid characters.  This is rather frustrating.  What I think happened is I edited in Notepad at one point rather than Notepad++.

  I’ll have to change the default editor for vbs files or I’m going to do that again I’m sure of it.

  
  Was this post helpful?
  thumb_up
  thumb_down