ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBS чтение полей форм Word из таблицы и запись в текстовый файл
7 сообщений из 7, страница 1 из 1
VBS чтение полей форм Word из таблицы и запись в текстовый файл
    #38338060
zipit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zipit
Гость
Приветствую, помогите плиз разобраться с проблемой.. сам никак не допру и сколько не гуглил, ответа не нашел.
Собственно, затык в следующем:
читаю столбцы таблицы word документа и записываю их значения(текстовые) в текстовый файл.
Если в ячейке таблицы Word обычный текст, то проблем нет. Но вот если в ячейке текст расположен в поле формы , то при записи значения в test.txt возникает ошибка.
Буду очень признателен за помощь, спасибо.
В упрощенном варианте задача выглядит так:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
set FSO=CreateObject("Scripting.FileSystemObject")
set ObjWord=CreateObject("Word.Application")
FileName="test.txt"
DocName="test.docx"
set txtObj=FSO.openTextfile (FileName,2,true)
Set File = FSO.GetFile(FileName)
folder=file.ParentFolder.Path
set ObjFile=ObjWord.Documents.open(folder+"\"+DocName)
str = ObjFile.tables.Item(1).cell(1,2).range.text 'здесь находится поле формы
file.writeLine str  ' Здесь ошибка - "Объект не поддерживает это свойство или метод"
txtObj.close
Objfile.close


Модератор: используйте тэг src vb а не vbs
...
Рейтинг: 0 / 0
21.07.2013, 01:59
| Ответить | Цитировать | Написать  
VBS чтение полей форм Word из таблицы и запись в текстовый файл
    #38338068
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
можно образец файла?
...
Рейтинг: 0 / 0
21.07.2013, 02:21
| Ответить | Цитировать | Написать  
VBS чтение полей форм Word из таблицы и запись в текстовый файл
    #38338071
zipit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zipit
Гость
Shocker.Proможно образец файла?
...
Рейтинг: 0 / 0
21.07.2013, 02:24
| Ответить | Цитировать | Написать  
VBS чтение полей форм Word из таблицы и запись в текстовый файл
    #38338111
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
zipit
Код: vbnet
1.
file.writeLine str  ' Здесь ошибка - "Объект не поддерживает это свойство или метод"

во-первых, здесь ошибка, не file, а txtObj, без этого скрипт вообще не будет работать, а не только с полями формы.

Во-вторых:
Код: vbnet
1.
txtObj.writeLine Replace(str, ChrW(8194), "")
...
Рейтинг: 0 / 0
21.07.2013, 11:20
| Ответить | Цитировать | Написать  
VBS чтение полей форм Word из таблицы и запись в текстовый файл
    #38338112
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
zipitсколько не гуглил, ответа не нашел.тут совершенно не требовалось ничего гуглить. Метод решения проблемы (как подсказка на будущее): видим, что из обычной ячейки текст пишется, а из ячейки с полем - не пишется. При этом в обоих случаях из ячейки извлекается только текст. Делаем вывод - с текстом что-то не так. Пытаемся записать только кусок текста: Mid(str,4,5) - записывается. Делаем вывод, есть какой-то символ, который не нравится Writeline. Начинаем просматривать символы с помощью AscW и сразу же натыкаемся на 8194 - явно служебный. Убиваем его с помощью Replace и - вуаля, все работает.
Для этого мне не понадобилось ни знать, что такое поле формы (потому попросил образец файла), ни как работает Writeline и какие у него ограничения.
...
Рейтинг: 0 / 0
21.07.2013, 11:26
| Ответить | Цитировать | Написать  
VBS чтение полей форм Word из таблицы и запись в текстовый файл
    #38338113
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
zipitВ упрощенном варианте задача выглядит так:надеюсь, в нормальном варианте вы не забыли про ObjWord.quit, иначе ворд остается в памяти после каждого выполнения скрипта
...
Рейтинг: 0 / 0
21.07.2013, 11:32
| Ответить | Цитировать | Написать  
VBS чтение полей форм Word из таблицы и запись в текстовый файл
    #38338154
zipit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zipit
Гость
Shocker.Pro, большое спасибо за помощь. Да в нормальном варианте там много чего накручено, objWord.quit конечно же есть.
Еще раз благодарю)
...
Рейтинг: 0 / 0
21.07.2013, 13:09
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBS чтение полей форм Word из таблицы и запись в текстовый файл
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&gotonew=1&tid=2156850]:
 0ms
get settings:
 10ms
get forum list:
 12ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 153ms
get topic data:
 10ms
get first new msg:
 6ms
get forum data:
 2ms
get page messages:
 44ms
get tp. blocked users:
 1ms
others: 253ms
total:  497ms
созд. / загр.: 497ms
x
x
Закрыть


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