Вопрос о запуске из Pascal-программы Net.exe Опции

[Касатка]

Я замучался с попытками запустить из 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)?

[Касатка]

Векторы я сохранял (вызывал Swapvectors до и после Exec'а), также пробовал указать в начале проги директиву вроде {$M 8000,0,8000} (округлил до 8000 b размер экзешника проги). Забыл сказать, что при использовании команды с использованием "COMSPEC", в начале ДОС-команды писал "/C ". Что касается способа с *.bat-файлом, то что-то это слишком сложно и наворочено. Может все же есть способ сделать все в самой проге? Например, как-то раз я написал процедуру для автоотключения компа, где Exec'ом вызывались другие модули Windows и она сразу заработала. Привожу листинг:

Function Autostop:Boolean;
Begin
Exec('C:\WINDOWS\RUNDLL32.EXE','shell32.dll,SHExitWindowsEx 1')
End;

Еще один вопросик.
Я хочу защитить файл-базу данных одной проги, так чтобы другие могли свободно пользоваться этой прогой (без базы она не работает), на компе, где она установлена, не вводя паролей, не запуская дешифровщики и пр., но не могли ее (хотя бы базу) скопировать или перенести на болванки, стримеры, дискеты, через сеть и.т.д. Как это сделать?

Сообщение отредактировано: Касатка - 23.05.2005 5:30