Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Запуск Fortran-овское приложения 10-20летней давности / 7 сообщений из 7, страница 1 из 1
27.01.2011, 13:35
    #37081714
MAGRAV
MAGRAV
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск Fortran-овское приложения 10-20летней давности
Господа помогите запустить Fortran-овское приложения 10-20летней давности посредством VB
Это досовская программа, которая вначале своей работы обращается в текстовый файл хранящий исходные данные. Закончив свою работу она создаёт выходной файл с результатами расчёта. Я пытался запустить этот файл Посредством функции Shell в VB6 и посредством функции Start() в VB NET. В обоих случаях эти подходы позволяли запускать на исполнение програмки созданные в VB, но с фортрановским файлом начинаются проблемы. Он запускается, но не выдаёт файл с результатами расчёта что свидетельствует о том что расчёт не производится. Он какбы открывается и тутже закрывается. В чём может быть причина? В чём неправильность подхода? Возможно ли вообще это осуществить в данном случае?!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2011, 13:37
    #37081732
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск Fortran-овское приложения 10-20летней давности
Попробуйте запустить через bat -файл, в котором второй строкой будет pause и посмотреть, что за ошибки выдает программа.

Попробуйте запускать через cmd.exe
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.01.2011, 13:53
    #37084238
MAGRAV
MAGRAV
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск Fortran-овское приложения 10-20летней давности
В VB6 в общем виде мои действия выглядят так:
Код: plaintext
1.
2.
3.
4.
Dim hProcess As Long
Dim AppToRun As String 'Адрес исполняемого файла
'Dim mode As VbAppWinStyle 'Характеризует состояние исполняемого приложения
AppToRun = "D:\Работа\Прочее\Профилирование\Rabota\Программа профилирования лопаток\S03244.EXE"
hProcess = Shell(AppToRun,  1 ) 'Конструкция для запуска приложения

Фортрановский файл запускается, но потом пишет что:
run-time error F6501: READ<in.dat>
-end of file encountered
in.dat - это файл исходных данных.

В VB NET делал по разному основываясь на "рецептах" найденных на этом и других форумах. Вот один из них:
Код: plaintext
1.
Dim myProcess As Process = _
Process.Start("D:\Работа\Прочее\Профилирование\Rabota\Программа профилирования лопаток\S03244.EXE")
В случае данного приложения я неизменно получаю ответ от среды что:
Код: plaintext
1.
2.
3.
4.
System.ComponentModel.Win32Exception не обработано
ErrorCode=- 2147467259 
Message="Параметр задан неверно"
NativeErrorCode= 87 
Source="System"

В случае с другими приложениями эти подходы были работоспособны.
Думали попробовать сделать это на Си, но боюсь что получу тотже результат. Видимо есть какаято особенность. В фортрановских код лезть конечно не хотелось бы. Его раздобыть можно, но фортрана я не знаю да и времени на это нет.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.01.2011, 14:03
    #37084286
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск Fortran-овское приложения 10-20летней давности
Прога точно умеет работать, находясь в путях с пробелами и русскими именами?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.01.2011, 14:04
    #37084297
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск Fortran-овское приложения 10-20летней давности
Вам программа четко и однозначно сказала, что не может прочитать файл. Думаете, если запустить ее не так, а эдак, она передумает?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.01.2011, 07:01
    #37087431
MAGRAV
MAGRAV
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск Fortran-овское приложения 10-20летней давности
Я решил эту задачку. Оказалось что моя скомпилированная программа на VB должна находиться именно в одной папке с фортрановским приложением! До этого моя программа была выполнена на VBA в Excel и находилась в той же папке. Но оказалось, что это не верное решение.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.01.2011, 11:10
    #37087708
Игорь Горбонос
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запуск Fortran-овское приложения 10-20летней давности
> Автор: MAGRAV
> Оказалось что моя скомпилированная программа на VB должна находиться именно в одной папке с фортрановским
> приложением!

Для чего? Твоя фортрановская прога не может найти файл только по тому, что текущая директория установленна не правильно.
И для нормально работы нужно всего лишь перед запуском фортрановской проги поменять текущий каталог или ChDir или
SetCurrentDirectory на каталог содержащий фортрановскую прогу.

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Запуск Fortran-овское приложения 10-20летней давности / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 434ms
Закрыть
start [/forum/topic.php?fid=60&mobile=1&tid=2159004]:
 0ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 29ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 40ms
get tp. blocked users:
 1ms
others: 324ms
total:  434ms
x
x
Закрыть


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