OleObject lole_object
string ls_file
int li_return
lole_object = CREATE OleObject
li_return = lole_object.ConnectToObject('d:\temp\data.mdb')
if (li_return <> 0) then
messagebox("Ошибка","Не смог
соединиться с акцессом" + ' ' + string
(li_return) )
return -1
end if


try
li_return = lole_object.Run("Module1.OpenTextFileTest" )
CATCH (runtimeerror er2)
return -1
end try

При запуске ругается , что не смог выполнить run , типа не знаю такой команды, как это вообще делается?

Сорри Powerbuilder -9.0; Access -2003

Спасибо всем, разобрался сам!
Вместо li_return = lole_object.Run("Module1.OpenTextFileTest" )
Надо li_return = lole_object.Run("OpenTextFileTest" )
А для для Excel или word верен первый вариант...