А из VB6 exe-шника можно получить Exit Code?
Формулировка задачи:
Поясню ситуацию.
Мне понадобились права админа для какого-то действия, например записать параметр в HKLM
Я из своего exe-шника вызвал другой (да хоть бы тот же самый с ключом) и дождался его завершения.
Вот так вот:
Вызванный exe-шник выполнил ф-цию результат которой true или false.
lExitCode по умолчанию возвращает 0.
Я пытался изменить Main() на Function но VB6 таких ньюансов не предусматривает и ругается.
В принципе понятно, что если ExecuteProcess заряженный под админа вернул true, то такая простая операция как запись в HKLM
будет выполнена 99,9%.
Но хорошо бы знать точный результат, воткнув его в lExitCode.
Мне понадобились права админа для какого-то действия, например записать параметр в HKLM
Я из своего exe-шника вызвал другой (да хоть бы тот же самый с ключом) и дождался его завершения.
Вот так вот:
Вызванный exe-шник выполнил ф-цию результат которой true или false.
Дык вот, было бы неплохо этот результат воткнуть в lExitCode
lExitCode по умолчанию возвращает 0.
Я пытался изменить Main() на Function но VB6 таких ньюансов не предусматривает и ругается.
В принципе понятно, что если ExecuteProcess заряженный под админа вернул true, то такая простая операция как запись в HKLM
будет выполнена 99,9%.
Но хорошо бы знать точный результат, воткнув его в lExitCode.
Решение задачи: «А из VB6 exe-шника можно получить Exit Code?»
textual
Листинг программы
Private Declare Sub ExitProcess Lib "kernel32" (ByVal uExitCode As Long)
Sub Main()
If InStr(Command, "/key=123") > 0 Then
'что-то делаем
ExitProcess 666
Else
Form1.Show
End If
End Sub