 Вопрос о запуске из Pascal-программы Net.exe |
Правила раздела!
1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!
| Касатка |
  23.05.2005 2:48
Сообщение
#1
|
 Новичок  Группа: Пользователи Сообщений: 37 Пол: Мужской Репутация:  0   |
 Я замучался с попытками запустить из Pascal-программы модуль Windows NET.EXE. Мне это нужно для написания проги для сканирования расшареных дисков в Интернете. Нужно запустить ДОС-команду "net use <имя диска>: \\<ip-адрес>\C><имя файла>". Я подставляю эту команду в процедуру EXEC: EXEC('net','use '+'<команда>'), EXEC('net use','<команда>'), EXEC(getenv('COMSPEC'),'net use '+'<команда>'), и.т.д. , но программа net с командной строкой (и без) не запускается, не выводит сообщений и не создает файла на моем диске, хотя в самой ДОС команда работает корректно. Кто подскажет и покажет, в чем тут дело (среда-BP7, ОС-WIN 98+Far)? |
   |
 
|
  |
Ответов
| Romtek |
26.05.2005 1:35
Сообщение
#2
|
 Знаток Группа: Пользователи Сообщений: 303 Пол: Мужской Реальное имя: Роман Репутация: 2 |
Касатка, а не проще ли создать BAT-файл с таким содержимым?
 Код NET use J: \\213.67.87.78\C>messfile и запускай его, сколько душа пожелает...А для применения разных параметров к нему можно сделать так: Код net use %1: \\%2\C>%3 Запускать тогда так: x.bat j 213.67.87.78 messfile Сообщение отредактировано: Romtek - 26.05.2005 1:38 -------------------- Romiras HomeLab- материалы и статьи по разработке ПО, моделирование алгоритмов, обработка и анализ информации, нейронные сети, машинное зрение и прочее.
|
|
|
|
Сообщений в этой теме
Касатка Вопрос о запуске из Pascal-программы Net.exe 23.05.2005 2:48
SKVOZNJAK Нужно сохранить вектор прерывания. Поищи по форуму... 23.05.2005 3:54 Касатка :blink: Векторы я сохранял (вызывал Swapvectors до... 23.05.2005 4:36
hiv
Защищать нужно программу, через которую вводятся ... 23.05.2005 8:58 volvo
Как завершается процесс? Что DOSError возвращает,... 23.05.2005 16:43 Касатка :blink: Тогда поподробнее объясните, как паролить ... 23.05.2005 16:54 volvo Вообще-то значение DOSError = 8 говорит о необходи... 23.05.2005 18:02 Касатка :blink: Grand Merci Volvo за совет. Теперь команды... 23.05.2005 23:34 hiv По поводу защиты программ почитай здесь:
Защита от... 24.05.2005 9:19 Касатка :blink: Благодарю hiv за информацию. Но все-таки, ... 24.05.2005 19:59 volvo Ну, ты бы код-то свой показал, как ИМЕННО ты это п... 24.05.2005 20:16 Касатка :blink: Да хотя бы сделать так, чтобы заработало в... 24.05.2005 21:53 hiv Я не знаю как это реализовывать на BP7, а в Delphi... 25.05.2005 7:57 Касатка :blink: Все-таки нужно на BP7. Дельфи у меня есть,... 25.05.2005 20:42 Касатка :p2: O'Key, попробую. Но почему же в этом журн... 26.05.2005 12:39 Romtek Для того, чтобы набраться опыта... А так нет особо... 26.05.2005 13:17 Касатка :D А как же тогда "вытащить" нужную подс... 27.05.2005 18:16 Romtek Readln (F, str);
copy(), pos()
на компьютере в л... 29.05.2005 23:47 Касатка :o Ладно проехали. Romtek, раз уж ты сейчас на фор... 30.05.2005 0:39 Atos Можно попробовать считать инфу на другом компе... ... 30.05.2005 11:46 Касатка :huh: Давно хотел спросить: как с помощью стандарт... 30.05.2005 21:50 SKVOZNJAK Насчёт кряков - осёл тебе поможет :lol: fgngffcyg... 31.05.2005 4:27 volvo Что-то вы, ребята, от темы отклонились... По-видим... 1.06.2005 16:18 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 16.07.2025 20:53 |