Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Caché Новый топик    Ответить
 Чтение из Word, Excel  [new]
nurlybekovnt
Member

Откуда:
Сообщений: 9
Приветствую! Разрабатываем тестирование(40 вопросов, в каждой по 5 вариантов ответа и все такое). Базу вопросов(примерно 200-500 вопросов с вариантами ответов) загружает преподаватель. Базу они делают, естественно, в Word или Excel. Формат в Word таков: <question>Как?<variant>Никак</variant><variant>Вот так</variant></question>. В Excel в первом столбце вопрос, а в последубщих варианты ответов. Теперь к сути вопроса, необходимо с помощью CACHE' прочитать эти Word файлы и Excel файлы. Как прочитать? В .NET есть библиотека Interop, а здесь?
10 июн 17, 09:20    [20554895]     Ответить | Цитировать Сообщить модератору
 Re: Чтение из Word, Excel  [new]
Блок А.Н.
Member

Откуда: Новосибирск
Сообщений: 3518
nurlybekovnt,

в ваших объемах проще в текстовый файл сохранить и прочитать из текста.
10 июн 17, 18:10    [20555613]     Ответить | Цитировать Сообщить модератору
 Re: Чтение из Word, Excel  [new]
Sheonn
Member

Откуда:
Сообщений: 7
nurlybekovnt,
Если установлен офисный пакет, то можно word и excel подключить как com-объект и работать с документами
10 июн 17, 21:02    [20555777]     Ответить | Цитировать Сообщить модератору
 Re: Чтение из Word, Excel  [new]
Александр GAGADDDOC
Member

Откуда: Скейп gabagaga
Сообщений: 164
Добрый день !
Делали так.

ИЗ Excel

Dim objExcel As Excel.Application
Set objExcel = New Excel.Application
i = "1"
i1 = 1
objExcel.Visible = True
objExcel.SheetsInNewWorkbook = 1
Path = IIf(Right(App.Path, 1) = "", App.Path, App.Path & "")
path_to_file = Path & "\TABREGL.xls"
objExcel.Workbooks.Open (path_to_file)
' прочитать из таблицы
Do Until i = ""
With objExcel.ActiveSheet
i4 = Cells(i1, 1)
If i4 <> "" Then
i = Cells(i1, 1) & "*" & Cells(i1, 2) & "*" & Cells(i1, 3)
VisM1.P0 = i
Value = ""
'Запись в базу
VisM1.Code = "$$Ex^PRG(.P0)"
VisM1.ExecFlag = 1
i1 = i1 + 1
End If
End With
Loop
objExcel.Quit
Set objExcel = Nothing

По примеру Из Ворд и текстового...
12 июн 17, 15:06    [20558071]     Ответить | Цитировать Сообщить модератору
 Re: Чтение из Word, Excel  [new]
drakut
Member

Откуда: Москва
Сообщений: 77
nurlybekovnt,
Вы можете создать необходимые классы из XML-схем через надстройку студии, и удобно образаться с каждым отдельно взятым файлом как с совокупностью объектов (например, объект-стиль, объект-рабочий лист и т.д.), предварительно скоррелировав нужные классы с xml-содержимым файла xlsx. Если данный вариант приемлем (есть небольшие хлопоты с созданием классов - нужно проимпортировать и создать много классов) - подскажу как конкретно действовать. Принцип работы посмотрите тут
13 июн 17, 18:48    [20561554]     Ответить | Цитировать Сообщить модератору
 Re: Чтение из Word, Excel  [new]
eduard93
Member

Откуда:
Сообщений: 129
Excel -> Сохранить как XML -> XPath из Cache "//row".
13 июн 17, 21:31    [20561826]     Ответить | Цитировать Сообщить модератору
 Re: Чтение из Word, Excel  [new]
krvsa
Member

Откуда: г Волжский
Сообщений: 12794
eduard93
Excel -> Сохранить как XML ...

Excel -> Сохранить как CSV!
14 июн 17, 08:20    [20562302]     Ответить | Цитировать Сообщить модератору
 Re: Чтение из Word, Excel  [new]
krvsa
Member

Откуда: г Волжский
Сообщений: 12794
А Word как txt!!!
И все, проблема решена!
14 июн 17, 08:23    [20562305]     Ответить | Цитировать Сообщить модератору
 Re: Чтение из Word, Excel  [new]
Mike Ivanov
Member

Откуда:
Сообщений: 25
Если никакой из приведенных выше вариантов вас не устроит, то еще можно подойти к проблеме с противоположной стороны: сделать макрос, который будет цепляться к Каше из MS Office-ного VBA и записывать в базу то, что в ячейках лежит.

Соответственно, открываете файл с макросом, открываете пользовательский файл, запускаете из него макрос, профит :)
21 июн 17, 14:05    [20580582]     Ответить | Цитировать Сообщить модератору
 Re: Чтение из Word, Excel  [new]
nurlybekovnt
Member

Откуда:
Сообщений: 9
Всем огромное спасибо, проблему решили
5 июл 17, 07:01    [20614229]     Ответить | Цитировать Сообщить модератору
Все форумы / Caché Ответить