Объясните начинающему как загрузить данные из Excel? Смотрел форум, но не нашел.

[Hans]

Мне бы кусок кода как открыть файл *.xls и как считать ячейку "А1". Видел на форуме, что проблема обсуждалась не один раз, но не нашел конкретного примера. Спасибо!

[KMV]

Можно с этого начать:

PHP код:

COM cell;
COMVariant cvariant;

cell = COM::createFromVariant(cellsOnSheet.item(1, 1));
cv = cell.value(); 


[George Nordic]

Поиск рулит Быстрый Excel

Хм. Хотя я своего кода не нашел... хотя точно выкладывал. Там еще проблема была - надо было к имени листа $ добавлять...

С Уважением,
Георгий

[Hans]

я что-то похожее уже видел, на форуме, там было:
чтение из Excel текста, состоящего из цифр

currentWorkSheet - this.openWorkSheet(curSheetNo); //метод класса SysExcelImport
cellsOnSheet = currentWorkSheet.cells();

у меня в конфигурации нет такого класса SysExcelImport, мне бы рабочий кусок с открытием файла и получением значения. Спасибо!

[konopello]

Вот, пожалуйста, когда-то сам учился вот типа личный пример:

[Hans]

Цитата:

Сообщение от konopello

Вот, пожалуйста, когда-то сам учился вот типа личный пример:

Спасибо за пример, Я вставлять в Еxcel данные уже умею, у меня не получается получить данные из Еxcel.

[George Nordic]

static void GetDataFromExcel(Args _args) 
{ 
OdbcConnection connection; 
Statement  statement; 
ResultSet   resultset; 
LoginProperty LP = new LoginProperty();
   ItemId                  itemId;
   ItemName            itemName; 
; 

try 
{ 
ttsbegin; 
LP.setDSN("Excel4"); //Имя соединения

connection = new OdbcConnection(LP); 
statement = connection.createStatement(); 
resultset = statement.executeQuery ("SELECT * FROM [Worksheet1$]");  //имя листа

while (resultset.next()) 
{ 
           //получаем необходимые данные из столбцов
itemId = resultset.getString(3); 
itemName = resultset.getString(4); 
info(strfmt("Id номенклатуры: %1(%2) загружен",itemId,itemName)); 
} 
connection = NULL; 
ttscommit; 
} 
catch (Exception::Error) 
{ 
connection = NULL; 
ttsAbort; 
} 
}

С Уважением,
Георгий

[Hans]

Спасибо Георгий, все работает.

[George Nordic]

Перенес в "полезное"