Страница: 1 |
Вопрос: а как сделать так шоб прога.... | Добавлено: 03.06.03 23:03 |
Автор вопроса: ![]() |
А как сделать так шоб прога при первом (!) запуске скопировала себя в какой-нибуть каталог, типа "C:\WINDOWS" ,a??? прога кстати 40кб, не большая... |
Ответы | Всего ответов: 2 |
Номер ответа: 1 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Администратор ICQ: 201502381 Вопросов: 15 Ответов: 737 |
Профиль | Цитата | #1 | Добавлено: 04.06.03 01:34 |
При запуске проги проверяешь, есть ли в этом каталоге копия твоей проги, если нет, то копируешь FileCopy или API CopyFile ![]() |
Номер ответа: 2 Автор ответа: ![]() ![]() Вопросов: 10 Ответов: 109 |
Профиль | Цитата | #2 | Добавлено: 04.06.03 12:28 |
Sub CopyTo() On Error GoTo Err If LCase(MyPath) <> LCase(NewLocation) Then If Dir(NewLocation) <> "" Then Kill NewLocation FileCopy MyPath, NewLocation Shell NewLocation,vbHide DoEvents Unload Me End If Err: End Sub |
Страница: 1 |
|