Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / чтение Excel / 12 сообщений из 12, страница 1 из 1
11.03.2010, 09:07
    #36513090
DAiMor
DAiMor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чтение Excel
необходимо от пользователей принимать файлы в формате Excel
сервер с Cache' на Win64, даже если я поставлю там офис Cache.Activate не пойдет
пробовал пару свободных конвертеров xls2csv, один конвертит криво, другой не полностью (только первый лист)

кто нибудь может припомнить еще варианты чтения данных из Excel?
переложить конвертирование на пользователя не предлагать
_________________________________
Cache for Windows NT (AMD64) 5.0.21 (Build 6408) Tue Jan 3 2006 13:37:41 EST
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2010, 09:17
    #36513105
servit
servit
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чтение Excel
Когда-то пробовал JDBC драйвер для Excel. Лист - таблица, колонки - столбцы. Погуглите по: "JDBC драйвер для Excel"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2010, 09:44
    #36513153
DAiMor
DAiMor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чтение Excel
что-то я не нашел, возможности работать с JDBC в Cache 5.0
_________________________________
Cache for Windows NT (AMD64) 5.0.21 (Build 6408) Tue Jan 3 2006 13:37:41 EST
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2010, 09:55
    #36513166
krvsa
krvsa
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чтение Excel
DAiMor , может эта программулька тебе поможет?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2010, 10:11
    #36513205
DAiMor
DAiMor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чтение Excel
она платная, что конечно не очень хорошо, но как один из вариантов подходит
_________________________________
Cache for Windows NT (AMD64) 5.0.21 (Build 6408) Tue Jan 3 2006 13:37:41 EST
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2010, 10:36
    #36513293
Alexey Maslov
Alexey Maslov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чтение Excel
Cache SQL Gateway + ODBC + Office
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2010, 10:45
    #36513322
DAiMor
DAiMor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чтение Excel
ставить лицензионный офис, для таких задач, как то жирно
_________________________________
Cache for Windows NT (AMD64) 5.0.21 (Build 6408) Tue Jan 3 2006 13:37:41 EST
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2010, 18:59
    #36515017
servit
servit
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чтение Excel
DAiMorчто-то я не нашел, возможности работать с JDBC в Cache 5.0
_________________________________
Cache for Windows NT (AMD64) 5.0.21 (Build 6408) Tue Jan 3 2006 13:37:41 EST

Вместо JDBC попробуйте ODBC :
1) создайте и настройте системный DSN "exceldemo" ;
2) выполните программу:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
  set gw=##class(%SQLGatewayConnection).%New()
  do gw.Connect("exceldemo","","")
	
  set rs=##class(%ResultSet).%New("%DynamicQueryGW:SQLGW")
  do rs.Prepare("select * from ""Sheet1$""",,gw) ;предполагается наличие в книге листа с именем "Sheet1"
  do rs.Execute()
  while rs.Next() {
    w rs.GetData( 1 ),!
  }
  do rs.Close()

  do gw.Disconnect()
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.03.2010, 11:14
    #36516076
Александр GAGADDDOC
Александр GAGADDDOC
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чтение Excel
Добрый день !
Делаем в Бейсике так

Dim objExcel As Excel.Application
Set objExcel = New Excel.Application
i2="1"
i1 = 1
objExcel.Visible = True
objExcel.SheetsInNewWorkbook = 1
objExcel.Workbooks.Open ("C:\UPszAvtP\X1.xls")
Do Until i2 = ""
With objExcel.ActiveSheet
i = Cells(i1, 1) & "*" & Cells(i1, 2) & "*" & Cells(i1, 3) Читает с таблицы ячейки
i2 = Cells(i1, 1)
FCacheServer.VisM1.P0 = i
FCacheServer.VisM1.Value = ""
FCacheServer.VisM1.Code = "$$0^EX(.P0)" Запись в кашу
FCacheServer.VisM1.ExecFlag = 1
LE = FCacheServer.VisM1.ErrorName
i1 = i1 + 1
End With
Loop
objExcel.Quit
Set objExcel = Nothing
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.03.2010, 12:40
    #36516387
DAiMor
DAiMor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чтение Excel
в общем я нашел исходник xls2csv на питоне
дорабатываю его под себя, чтобы конвертировалось все нормально, и все страницы как мне надо
тем более, что такой вариант и Office free и кросс-платформенный

_________________________________
Cache for Windows NT (AMD64) 5.0.21 (Build 6408) Tue Jan 3 2006 13:37:41 EST
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.03.2010, 13:28
    #36516570
krvsa
krvsa
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чтение Excel
DAiMor , делись как закончишь...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.03.2010, 20:35
    #36532685
DimA__B2
DimA__B2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чтение Excel
Александр GAGADDDOC
Делаем в Бейсике так

Dim objExcel As Excel.Application
Set objExcel = New Excel.Application


без установленного офиса откуда "Excel.Application" возьмется?

DAiMor
ставить лицензионный офис, для таких задач, как то жирно
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / чтение Excel / 12 сообщений из 12, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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