powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Открыт ли файл в Excel
10 сообщений из 10, страница 1 из 1
Открыт ли файл в Excel
    #39321988
-tim-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Здравствуйте!
Помогите пожалуйста. Я выгружаю данные в Excel имя файла "Chablon.xlsx"
Как мне определить что этот файл открыт?
Спасибо Вам за потраченное время!
...
Рейтинг: 0 / 0
Открыт ли файл в Excel
    #39322001
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Просто открыть файл fopen("Chablon.xlsx", 2) если открылся, значит закрыт. fclose() не забудь сразу после проверки.
...
Рейтинг: 0 / 0
Открыт ли файл в Excel
    #39322377
-tim-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Здравствуйте!
Спасибо Dima T. Но мне не это нужно.
Есть шаблон "Chablon.xlsx"
Есть форма где пользователь нажимает на командную кнопку "Excel"
Я делаю копию файла "CopyChablon.xlsx" из шаблона "Chablon.xlsx"
Копию делаю, чтобы пользователь не мог повредить шаблон

COPY FILE pat1 + '\Chablon.xlsx' TO pat1 + '\CopyChablon.xlsx'

Далее передаю данные в "CopyChablon.xlsx" и пользователь видит эти данные в Excel
Далее пользователь сворачивает Excel и давит опять на командную кнопку "Excel"

И здесь возникает ошибка т.к. файл "CopyChablon.xlsx" открыт.
То есть мне нужно перед командой
COPY FILE pat1 + '\Chablon.xlsx' TO pat1 + '\CopyChablon.xlsx'
Сделать проверку. Как мне определить что этот файл открыт?

Помогите пожалуйста.
Спасибо
...
Рейтинг: 0 / 0
Открыт ли файл в Excel
    #39322383
Фотография Redrik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
-tim-,

Не спешите с выводами - Dima T дал именно ТО, что нужно!
...
Рейтинг: 0 / 0
Открыт ли файл в Excel
    #39322398
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Дополнительно еще надо проверять что файл существует.
Попробуй так
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
if !IsFileOpen(addbs(pat1) + 'CopyChablon.xlsx')
	COPY FILE (addbs(pat1) + 'Chablon.xlsx') TO (addbs(pat1) + 'CopyChablon.xlsx')
endif
...

* Проверка что файл открыт
func IsFileOpen
lpara tcFile
local lnH
lnH = 0
if file(tcFile)
	lnH = fopen(tcFile, 2)
	if lnH != -1
		fclose(lnH)
	endif
endif
return lnH = -1


для путей лучше использовать ADDBS() - убирает пробелы в конце и добавляет слэш если его нет.
...
Рейтинг: 0 / 0
Открыт ли файл в Excel
    #39322452
-tim-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Большое спасибо.
Вы мне помогли, я всё понял.
...
Рейтинг: 0 / 0
Открыт ли файл в Excel
    #39322610
Fffffffffffff
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
-tim-Копию делаю, чтобы пользователь не мог повредить шаблон


Шаблон это файл xlts в вашей версии Excel.
Его пользователь никак не может повредить.
...
Рейтинг: 0 / 0
Открыт ли файл в Excel
    #39322802
-tim-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Здравствуйте Fffffffffffff
Спасибо за ваше мнение.

Повредит как нечего делать, так как в шаблоне есть диаграмма.
Когда был Excel 2003 г. проблем не было я строил диаграмму без шаблона.
И не было необходимости проверять на открытый файл.
Но теперь Excel 2007 там по другому, я не стал сильно мудрить и сделал просто.

Спасибо Dima T , он мне очень помог.
...
Рейтинг: 0 / 0
Открыт ли файл в Excel
    #39322815
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Fffffffffffff правильно советует, сохрани свой Chablon.xlsx как шаблон экселя: "Сохранить как ..." и тип файла "Шаблон Excel". Получишь Chablon.xltx

Дальше давай его пользователю, при его запуске эксель его откроет, но при сохранении спросит куда сохранить, причем сохранит именно в xlsx, а Chablon.xltx останется неизменным.
...
Рейтинг: 0 / 0
Открыт ли файл в Excel
    #39323552
-tim-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо.
Я обязательно попробую, то что мне предложил Fffffffffffff, но не сейчас т.к. много других задач.
Очень Вам признателен за оказанную помощь.
Спасибо
...
Рейтинг: 0 / 0
10 сообщений из 10, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Открыт ли файл в Excel
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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