ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / чтение Excel
12 сообщений из 12, страница 1 из 1
чтение Excel
    #36513090
Фотография DAiMor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DAiMor
Участник
необходимо от пользователей принимать файлы в формате 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:07
| Ответить | Цитировать | Написать  
чтение Excel
    #36513105
servit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
servit
Участник
Когда-то пробовал JDBC драйвер для Excel. Лист - таблица, колонки - столбцы. Погуглите по: "JDBC драйвер для Excel"
...
Рейтинг: 0 / 0
11.03.2010, 09:17
| Ответить | Цитировать | Написать  
чтение Excel
    #36513153
Фотография DAiMor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DAiMor
Участник
что-то я не нашел, возможности работать с 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:44
| Ответить | Цитировать | Написать  
чтение Excel
    #36513166
Фотография krvsa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
krvsa
Участник
DAiMor , может эта программулька тебе поможет?
...
Рейтинг: 0 / 0
11.03.2010, 09:55
| Ответить | Цитировать | Написать  
чтение Excel
    #36513205
Фотография DAiMor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DAiMor
Участник
она платная, что конечно не очень хорошо, но как один из вариантов подходит
_________________________________
Cache for Windows NT (AMD64) 5.0.21 (Build 6408) Tue Jan 3 2006 13:37:41 EST
...
Рейтинг: 0 / 0
11.03.2010, 10:11
| Ответить | Цитировать | Написать  
чтение Excel
    #36513293
Alexey Maslov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alexey Maslov
Участник
Cache SQL Gateway + ODBC + Office
...
Рейтинг: 0 / 0
11.03.2010, 10:36
| Ответить | Цитировать | Написать  
чтение Excel
    #36513322
Фотография DAiMor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DAiMor
Участник
ставить лицензионный офис, для таких задач, как то жирно
_________________________________
Cache for Windows NT (AMD64) 5.0.21 (Build 6408) Tue Jan 3 2006 13:37:41 EST
...
Рейтинг: 0 / 0
11.03.2010, 10:45
| Ответить | Цитировать | Написать  
чтение Excel
    #36515017
servit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
servit
Участник
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
11.03.2010, 18:59
| Ответить | Цитировать | Написать  
чтение Excel
    #36516076
Александр GAGADDDOC
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Александр GAGADDDOC
Участник
Добрый день !
Делаем в Бейсике так

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, 11:14
| Ответить | Цитировать | Написать  
чтение Excel
    #36516387
Фотография DAiMor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DAiMor
Участник
в общем я нашел исходник 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, 12:40
| Ответить | Цитировать | Написать  
чтение Excel
    #36516570
Фотография krvsa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
krvsa
Участник
DAiMor , делись как закончишь...
...
Рейтинг: 0 / 0
12.03.2010, 13:28
| Ответить | Цитировать | Написать  
чтение Excel
    #36532685
DimA__B2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DimA__B2
Гость
Александр GAGADDDOC
Делаем в Бейсике так

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


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

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


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