Quote:
Originally Posted by Tybr
|
Here is the VBScript files that I use to shuffle directories so I don't have to wait for the patching.
Directions
Copy VGUIAssets to VGUIAssets.live and VGUIAssets.test
Then run the correct script to launch Vanguard
StartLive.vbs (Included in zip file):
Code:
LiveDir = "C:\Program Files\Sony\Vanguard\VGUIAssets.live"
TestDir = "C:\Program Files\Sony\Vanguard\VGUIAssets.test"
UseDir = "C:\Program Files\Sony\Vanguard\VGUIAssets"
Set FileSys = CreateObject("Scripting.FileSystemObject")
Set WshShell = WScript.CreateObject("WScript.Shell")
'Check which dir is missing and rename existing use dir appropriately.
If FileSys.FolderExists(UseDir) = True Then
If FileSys.FolderExists(LiveDir) = True Then
FileSys.MoveFolder UseDir, TestDir
Else
FileSys.MoveFolder UseDir, LiveDir
End If
End If
' Move the LiveDir to UseDir
FileSys.MoveFolder LiveDir, UseDir
' Launch the launchpad
WshShell.Run """C:\Program Files (x86)\Sony\Vanguard\Vanguard.exe""", 1, False
StartTest.vbs (Included in zip file):
Code:
LiveDir = "C:\Program Files\Sony\Vanguard\VGUIAssets.live"
TestDir = "C:\Program Files\Sony\Vanguard\VGUIAssets.test"
UseDir = "C:\Program Files\Sony\Vanguard\VGUIAssets"
Set FileSys = CreateObject("Scripting.FileSystemObject")
Set WshShell = WScript.CreateObject("WScript.Shell")
'Check which dir is missing and rename existing use dir appropriately.
If FileSys.FolderExists(UseDir) = True Then
If FileSys.FolderExists(LiveDir) = True Then
FileSys.MoveFolder UseDir, TestDir
Else
FileSys.MoveFolder UseDir, LiveDir
End If
End If
' Move the LiveDir to UseDir
FileSys.MoveFolder TestDir, UseDir
' Launch the launchpad
WshShell.Run """C:\Program Files (x86)\Sony\Vanguard\Vanguard.exe"" /testserver", 1, False