Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для Ramzes_

Старожил


Сообщения: 203
Благодарности: 42

Профиль | Сайт | Отправить PM | Цитировать


Так?

Код: Выделить весь код
If (MsgBox("Установить программу XXX?", vbYesNo) = vbOK) Then
  RetCode = WshShell.Run("XXX", 1, vbTrue)
End If


If (MsgBox("Установить программу YYY?", vbYesNo) = vbOK) Then
  RetCode = WshShell.Run("YYY", 1, vbTrue)
End If

-------
Хотите, чтобы девушка сказала вам «Да!»? Спросите, принимает ли она условия лицензионного соглашения.


Отправлено: 16:54, 17-11-2007 | #4