Shell ??!!

[kdvstat]

Объясните неучу , что не так.
програмно создаю папку и разархивирую туда файлы спомощью Shell.
при попытке открыть разархивированный файл, приходит сообщение что его нет.
Такое ощущение, что оброщение к файлу идет до того как файл полностью разархивировался и Shell еще не выполнено до конца.
/////////////////
MkDir MyDir$
Shell("c:\arc\arj.exe e -hf2" & " " & my$ & " " & MyDir$ & " -u -y")
ttlFile$ = Dir(MyDir$ & "*.*")
////////////////

[GSerg]

Поиск вверху страницы, выделен красным.
Устное предупреждение за его неиспользование даётся только один раз, первый.
http://bbs.vbstreets.ru/viewtopic.php?p=6602419#6602419

[kuhtiov]

Попробуй так:
MkDir MyDir$
Shell("c:\arc\arj.exe e -hf2" & " " & my$ & " " & MyDir$ & " -u -y")
DO
if Dir(MyDir$ & "*.*") <> "" then gosub dalee
LOOP
dalee:
ttlFile$ = Dir(MyDir$ & "*.*")

если я правильно тебя понял. Должно помоч!

[Viper]

kuhtiov, правильное решение дано в ссылке GSerg постом выше.

[kuhtiov]

Облажался