• 0

[VBScript] Change working directory


Question

I store several portable applications on my external drive and I use a VBScript to launch a select few of them. Heres what the script looks like:

Set WSHShell = WScript.CreateObject("WScript.Shell")
LaunchDir = WSHShell.CurrentDirectory

wSHShell.Run """" & LaunchDir & "\Applications\PrivaZer\PrivaZer.exe"

Unfortunately, this script does not work well for PrivaZer. I need a way to change the working directory to E:\Applications\PrivaZer\ first before launching the program. However I do not want to hardcode the letter of my drive since it may change depending on the machine I'm on. Any ideas?

Link to comment
https://www.neowin.net/forum/topic/1155804-vbscript-change-working-directory/
Share on other sites

5 answers to this question

Recommended Posts

  • 0

Maybe this might work

Set WSHShell = WScript.CreateObject("WScript.Shell")

Dim App :App = WSHShell.CurrentDirectory & "\Applications\PrivaZer\PrivaZer.exe"

WSHShell.CurrentDirectory=Replace(App,"\PrivaZer.exe","")

WSHShell.Run(App),1,True

This topic is now closed to further replies.
  • Recently Browsing   0 members

    • No registered users viewing this page.
  • Posts

  • Recent Achievements

    • Contributor
      GravityDead went up a rank
      Contributor
    • Week One Done
      BlakeBringer earned a badge
      Week One Done
    • Week One Done
      Helen Shafer earned a badge
      Week One Done
    • First Post
      emptyother earned a badge
      First Post
    • Week One Done
      Crunchy6 earned a badge
      Week One Done
  • Popular Contributors

    1. 1
      +primortal
      663
    2. 2
      ATLien_0
      269
    3. 3
      Michael Scrip
      236
    4. 4
      Steven P.
      164
    5. 5
      +FloatingFatMan
      150
  • Tell a friend

    Love Neowin? Tell a friend!