Set variable for folder path

[Jadog 0]

I would like to create a variable and so far I've had no success - I think it's because the folder path is enclosed in quotes.

I've tried the following, but when I run it nothing happens:

Dim $CPDirectory = "C:\Program Files\RadProg\Bin\"  ; If 32-bit PC

Run($CPDirectory & '"CP.exe" /Alias "AHOH" /UserID "Backroom" /Workgroup "1"')

Here's the one without the variable and it works fine:

Run('"C:\Program Files\RadProg\Bin\CP.exe" /Alias "AHOH" /UserID "Backroom" /Workgroup "1"')

[BrewManNH 978]

You're enclosing the program name in quotes, but not the folder name. What that will give you is C:Program FilesRadProgBin"CP.exe" /alias "AHOH"...

[Jadog 0]

Ok, so I changed it to:

Run('$CPDirectory & "CP.exe" /Alias "AHOH" /UserID "Backroom" /Workgroup "1"')

But it still doesn't execute the program. When I remove the outer single quotes and the parameters (see below), then it opens the program just fine.

Run($CPDirectory & "CP.exe")

I really need it to execute with the specified parameters though.

Edited November 17, 2011 by Jadog

[jbg1978 0]

Try:

chr(34) & $CPDirectory & "CP.exe" & chr(34)

[Malkey 142]

Follow the comments in this example.

; Post says this works
Run('"C:\Program Files\RadProg\Bin\CP.exe" /Alias "AHOH" /UserID "Backroom" /Workgroup "1"')
ConsoleWrite('"C:\Program Files\RadProg\Bin\CP.exe" /Alias "AHOH" /UserID "Backroom" /Workgroup "1"' & @LF)

; So, using this variable
Local $CPDirectory = "C:\Program Files\RadProg\Bin\" ; If 32-bit PC

; Next line, we have replaced  C:\Program Files\RadProg\Bin\  with  ' & $CPDirectory & '
Run('"' & $CPDirectory & 'CP.exe" /Alias "AHOH" /UserID "Backroom" /Workgroup "1"')
ConsoleWrite('"' & $CPDirectory & 'CP.exe" /Alias "AHOH" /UserID "Backroom" /Workgroup "1"' & @LF)

; The two resulting console writes are exactly the same.  And, these will be the commands that are run.

[Jadog 0]

That did the trick. Thank guys!