Не получается открыть чертёж kViewer"ом

Автор Николай, 01.12.10, 09:44:55

« назад - далее »

0 Пользователи и 1 гость просматривают эту тему.

Николай

На одних компьютерах строка
Код VB:

ShellExecute Form1.hWnd, "open", File1.Path & "\" & File1.FileName, 0, 0, SW_SHOW

запускает Компас Вьювер и открывает в нём чертёж в . На другом компьютере ничего не происходит. Пробую по другому:
Код:

Shell "kViewer.Exe File1.Path & " \ " & File1.FileName", vbMaximizedFocus 'Показываем в "kViewer"

-Выдаёт ошибку 13- тип не определён. По первому варианту- может, где-то (не в VB), надо прописать, чтобы данные файлы ассоциировались с КОМПАСом? По второму- просто не знаю, BMP файлы таким способом открывались. Вот так:
Код:

Shell "mspaint.exe 12345.bmp", vbMaximizedFocus 'Показываем в "Paint"

Может, кто что подскажет?