Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / батники. / 22 сообщений из 22, страница 1 из 1
11.11.2012, 22:41
    #38033870
Qlewer
Qlewer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
код самоуничтожения:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
F = FreeFile
Open WhS.SpecialFolders(16) & "\Delself.bat" For Append As #F
    Print #F, "@echo off"
    Print #F, "ping 127.0.0.1 -n 5" 'и так и так пробовал
    Print #F, ":try"
    Print #F, "del " & Chr(34) & "QLWR\Sys.exe" & Chr(34)
    Print #F, "if exist " & Chr(34) & "QLWR\Sys.exe" & Chr(34) & " goto try"
    Print #F, "RmDir " & Chr(34) & "QLWR" & Chr(34)
    Print #F, "del Delself.bat"
    Close #F
    Unload Me


код не фурычит . просто создаётся батник. выключается прога. и всё. а если вручную тыкнуть на полученный батник, то всё работает, прога, папка и батник самоудаляются. в чём проблема, как исправить? есть версия, что из-за русскоязычных путей... хз
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.11.2012, 22:49
    #38033876
Qlewer
Qlewer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
вот отчёт. подскажете, как исправить? давно работаю с батниками, что-то не сталкивался с этим
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.11.2012, 22:51
    #38033881
AndreTM
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
Странный вопрос... А где вы в этом коде "тыкнули батник"?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.11.2012, 22:55
    #38033884
Qlewer
Qlewer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
AndreTMСтранный вопрос... А где вы в этом коде "тыкнули батник"?
Код: vbnet
1.
2.
Shell WhS.SpecialFolders(16) & "\Delself.bat" ', vbHide
    Unload Me

убрал vbHide, @echo off, поставил Print #F, "pause". лицезрею такую картину: 13455869
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.11.2012, 23:01
    #38033887
Qlewer
Qlewer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
а так выглядит отчёт при нажатии вручную(мышкой по батнику). так, как должно быть. а программно никак
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.11.2012, 23:35
    #38033908
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
Ну видно же на двух скриншотах. В одном случае текущая папка c:\, в другом случае "Мои документы".
Очевидно c:\QLWR просто-напросто не существует, о чем вполне по-русски выдается соответствующее сообщение.

эх, не знает нынешняя молодежь, как в ДОСе работать
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.11.2012, 16:29
    #38034943
Qlewer
Qlewer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
Shocker.Pro,

я в курсе. больше интересует, как исправить. вот вариант с указанием полного пути
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.11.2012, 16:30
    #38034945
Qlewer
Qlewer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
скрин сделан про программном открытии батника. вручную тоже не работает
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.11.2012, 16:41
    #38034964
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
ну ты ведь delself-то умудряешься запускать с полным путем
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.11.2012, 16:46
    #38034977
Qlewer
Qlewer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
Shocker.Pro,

в батниках не воспринимаются русскоязычные пути. возможно, нужно путь в батнике выразить через WhS.SpecialFolders(16) или что-то типа того. подскажешь?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.11.2012, 17:48
    #38035101
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
Возможно использовать подстановки типа %APPPATH% или что-то в этом роде. Наизусть не помню. Учи язык бат-файлов.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.11.2012, 23:29
    #38035461
Qlewer
Qlewer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
Shocker.ProВозможно использовать подстановки типа %APPPATH% или что-то в этом роде думал об этом, но не нашёл ничего походящего. пробовал варианты
del "%APP.PATH%QLWR\Sys.exe"
del "%APP.PATH%\QLWR\Sys.exe"
del "%APPPATH%\QLWR\Sys.exe"
del "%APPPATH\QLWR\Sys.exe"
del %APPPATH"\QLWR\Sys.exe"
del %APPPATH + "\QLWR\Sys.exe"
и много других. безрезультатно.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.11.2012, 00:45
    #38035525
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
ты неисправим
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.11.2012, 19:05
    #38036883
Qlewer
Qlewer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
Shocker.Proты неисправим ещё 6 лет поизучаю в универе программирование - перестану задавать глупые вопросы. а пока что:
как правильно прописать эту строчку в батнике? все найденные в инете варианты не робят
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.11.2012, 20:22
    #38036989
AndreTM
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
Shocker.Proты неисправимQlewerпока что: ... все найденные в инете варианты не робят
На что Шокер и намекает...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.11.2012, 21:09
    #38037031
Qlewer
Qlewer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
AndreTM,

т.е.? так что делать-то?
 
прога стоит, клиенты недовольны. отдаю им прогу без самоудаления, но потом будут жалобы, что почта спамом переполняется, т.к. старые версии не могут самоудалиться.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.11.2012, 00:11
    #38037213
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
Книжки читать, гугл юзать.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.11.2012, 14:38
    #38038068
Qlewer
Qlewer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
AntonariyКнижки читать, гугл юзать. хороший совет на форуме по помощи в вопросах программирования. спасибо угу
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.11.2012, 16:09
    #38038292
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
Ты им хоть раз воспользовался, чтобы иметь наглость нос воротить?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.11.2012, 21:07
    #38038799
Qlewer
Qlewer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
Antonariy,

да, книжки и гугл рулят. закрывайте форум.
 
у меня 2 варианта:
1) на форуме программисты-самоучки, не способные создать норм программу с функцией самоудаления
2) людям лень открыть код любой своей программы и скинуть функцию самоудаления
раньше при установке запихивал прогу в диск C в папки с англоязычными именами - проблем не было. а это какая-то очередная дескриминация русского языка в мировой сети
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.11.2012, 21:16
    #38038808
Qlewer
Qlewer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
 
посмотрел, как пишется "д.скриминация". через И. но это не суть важно
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.11.2012, 21:30
    #38038826
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
батники.
Qlewerзакрывайте форум...
на форуме программисты-самоучки, не способные создать норм программу с функцией самоудаленияну на форум у меня прав нет... на топик - хватит.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / батники. / 22 сообщений из 22, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 135ms
Закрыть
start [/forum/topic.php?fid=60&mobile=1&tid=2157323]:
 0ms
get settings:
 7ms
get forum list:
 11ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 29ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 55ms
get tp. blocked users:
 2ms
others: 12ms
total:  135ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]