Visual
Basic - Советы Как запустить на VB5.0 исходники, написанные на VB6.0 Kак сделать, чтобы программa перестала работать примерно через 30 дней? Вызов различных программ Чтобы Ваш EXE не был запущен одновременно два раза в событие Form_Load впишите: Private Sub Form_Load()
Назад
Kак сделать, чтобы программa перестала работать примерно через 30 дней? Сделать это очень просто. Сначала нужно либо записать в регистр либо куда-нибудь в папку Windows в файл *.ini, например дату первого запуска. Потом при каждом запуске нужно проверять разницу между текущей датой и датой первого запуска. Например так: If DateDiff("d", #11/8/99#, Date) > 30 Then ... 'если разница между датой 11 августой 1999 года
и текущей А потом можно просто закрыть программу и всё! Сделать это очень просто! Всего лишь надо вызвать команду Shell с именем нужного файла. Например при нажатии кнопки Command1 должен запускать калькулятор: Private Sub Command1_Click()
Константа, стоящая после запятой - определяет вид окна программы. Конечно есть одна проблема - как определить путь к тому или иному приложению на компьютере пользователя? Стандартные программы от Windows всегда находятся в виндовском каталоге. |