Fix error in vbscript
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.8@16366 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
7731929803
commit
3456243248
@ -15,11 +15,11 @@ Do While Not netuse.StdOut.AtEndOfStream
|
||||
Loop
|
||||
instdrv = myshell.ExpandEnvironmentStrings ( "%INSTALLTO%" )
|
||||
if InStr(instdrv,"%INSTALLTO%") Then
|
||||
Set myenv=wshShell.Environment("User")
|
||||
Set myenv=myshell.Environment("User")
|
||||
instdrv = myenv("INSTALLTO")
|
||||
End If
|
||||
if instdrv = "" Then
|
||||
Set myenv=wshShell.Environment("System")
|
||||
Set myenv=myshell.Environment("System")
|
||||
instdrv = myenv("INSTALLTO")
|
||||
End If
|
||||
if instdrv = "" Then
|
||||
|
Loading…
Reference in New Issue
Block a user