|
Вопрос # 4 152/ вопрос открыт / |
|
Здравствуйте, как можно открыть открыть файл эксел по сети через дельфи? снизу я добавил фрагмент кода, но при открытий у меня выходить ошибка, не может найти файл по указанному пути.
Заранне спасибо за ответ!
Приложение: Переключить в обычный режим- function excelopen(eXLApp:variant):variant;
- begin
- tvardata(result).vdispatch:=nil;
- if tvardata(eXLApp).vdispatch=nil then
- exit;
- result:=eXLApp.WorkBooks.open('\\master\share\test.xls');
- end;
 |
Вопрос задал: Beras Kinis Olim (статус: 1-ый класс)
Вопрос отправлен: 13 мая 2010, 08:49
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Всего сообщений: 7; последнее сообщение — 13 мая 2010, 10:20; участников в обсуждении: 2.
|
min@y™ (статус: Доктор наук), 13 мая 2010, 09:19 [#1]:
А файл там точно есть?
Может для начала проверить?
if FileExists(...)
then ...
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
Beras Kinis Olim (статус: 1-ый класс), 13 мая 2010, 09:28 [#2]:
файл там есть! он нормально открывается, мне нужно чтоб открывался компонентами excel!
|
|
|
Beras Kinis Olim (статус: 1-ый класс), 13 мая 2010, 09:29 [#3]:
function formactivate1():variant;
begin
tvardata(result).vdispatch:=nil;
result:=CreateOleObject('Excel.Application');
result.visible:=false;
end;
//îòêðûòèå ýêñåë
function excelopen(eXLApp:variant):variant;
begin
tvardata(result).vdispatch:=nil;
if tvardata(eXLApp).vdispatch=nil then
exit;
result:=eXLApp.WorkBooks.open(MyDir+'здесь указываем сетевой файл');
end;
//// когда указываешь локальный файл он нормально запускается
|
|
|
min@y™ (статус: Доктор наук), 13 мая 2010, 09:50 [#4]:
Тогда создай в той же папке простой текстовый файл текст.txt и попробуй в программе загрузить его в мемо или stringlist.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
Beras Kinis Olim (статус: 1-ый класс), 13 мая 2010, 10:11 [#5]:
assignfile(f,'\\Master\share\readme.txt');
reset(f);
readln(f,n);
showmessage(n);
/////////////
текстовый файл читает без проблем!
у меня в программе открывается через компонент эксел!
XLApp=CreateOleObject('Excel.Application');
XLapp.workbook.open(path);
|
|
|
Beras Kinis Olim (статус: 1-ый класс), 13 мая 2010, 10:18 [#6]:
все решил проблему))))) спасибо за ваш ответ
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
