Цитата Vadikan:
|
Он просто указал путь к нему синхронной командой. См. Создание переменной среды, соответствующей букве установочного диска »
|
Это я читал. Но дело в том, что в моём случае мне не нужно создавать переменные среды (к тому же, по-моему, весьма "кривоватеньким" методом): я использую SetupComplete только для того, чтобы запустить Complete.vbs, а уже Complete.vbs "сам определяет" местонахождение установочных файлов. Чтобы не говорить многословно, приведу пример (фрагмент) Complete.vbs:
Код:
' Определяем букву CDROM по свойствам дисков
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
Dim WSHShell
Set WSHShell = WScript.CreateObject("WScript.Shell")
Dim dc, d
Set dc = fso.Drives
Dim LCDROM
LCDROM = ""
For Each d in dc
If d.DriveType = 4 Then
If d.IsReady Then
If fso.FileExists(d.DriveLetter & ":\$oem$\$$\Script\xp_my.txt") Then
LCDROM = d.DriveLetter
Exit For
End If
End If
End If
Next
If LCDROM="" Then
d=MsgBox("Не обнаружен CDROM", VbExclamation, "OPT_1")
Else
'Запускаем установку приложений
WshShell.Run "%windir%\regedit.exe -s " & LCDROM & ":\$oem$\$$\Script\nastr.reg", 2, true
End If
Вопрос именно в том, что SetupComplete.cmd
не запускается ВООБЩЕ.
