|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
29.09.2008, 14:05 | #1 |
Пользователь
Регистрация: 21.01.2008
Сообщений: 98
|
изменение пути к файлу
Вопрос звучит просто:
Есть: Private Sub Workbook_Open() Open ThisWorkbook.Path & "\info.log" For Append As #1 Print #1, Application.UserName, Application.ThisWorkbook.Name; Now Close #1 End Sub Хочется сделать: Private Sub Workbook_Open() Open ThisWorkbook.Path & "С:\протоколирование\info.log" For Append As #1 Print #1, Application.UserName, Application.ThisWorkbook.Name; Now Close #1 End Sub но работает только тогда, когда лог-файл находится в одной папке с Workbook заранее спасибо! |
29.09.2008, 15:31 | #2 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,238
|
Вы определитесь! Либо путь к вашему info.log задаётся относительно книги (ThisWorkbook.Path ) - либо - ПОЛНЫЙ (С:\протоколирование\)...
т.е. чтобы файл ifo.log создавался в папке протоколирование (не зависимо от того, где лежит XLS) попробуйте код: Код:
|
30.09.2008, 13:16 | #3 | |
Пользователь
Регистрация: 21.01.2008
Сообщений: 98
|
Цитата:
|
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Определение пути к файлу | Pinya | Общие вопросы Delphi | 1 | 07.08.2008 12:22 |
Изменение пути к таблице .dbf | Tanuska___:) | БД в Delphi | 16 | 22.04.2008 15:52 |
Пути к данным | Лубышев | Общие вопросы Delphi | 3 | 21.01.2008 18:56 |
Системные пути | Lonix | Общие вопросы Delphi | 8 | 14.09.2007 17:10 |