ADO + Excel = ошибка

@vitalybuzin · Регистрация: 18.07.2010

Студворк — интернет-сервис помощи студентам

Читаю данные из таблицы Excel через ADO:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
 
With cn
.Provider = 'Microsoft.Jet.OLEDB.4.0'
.Properties("Extended Properties").Value = "Excel 8.0;HDR=No;IMEX=1;"
.Open App.Path & " " & IniSource
End With
 
rs.Open "Select * from [" & IniSheet & "$]", cn, adOpenForwardOnly, adLockReadOnly
Dim Rows() As Variant: Rows = rs.GetRows()

, при этом в таблице в одном столбце могут быть данные разных типов, поэтому используется ImportMixedType = Text. Все работает хорошо, но, если при работе программы исходный XLS файл открыт в Excel, то вместо дат возвращаются целые числа, например, вместо 26.09.1996 возвращается 35334 и т.д. И еще заметно тормозится работа программы (в 2-3 раза). Почему так происходит? Можно ли это обойти?

@vitalybuzin · 20.07.2010, 10:37 **[ТС]**

Как Excel может искажать данные в моей программе? Он же не изменяет открытый XLS файл.

20.07.2010, 17:21

А почему бы тебе это дело не через ADO делать, а непосредственно через ексель?

@vitalybuzin · 20.07.2010, 17:32 **[ТС]**

Потому, что через Excel тормозит. Мне надо уметь в 10 сек укладываться на определенной конфигурации при объеме XLS в 4000 строк. ADO позволяет это делать, а Excel - нет.
И еще: при чтении через Excel в некоторых местах вылезают его диалоговые окна.

20.07.2010, 17:37

При чтении?! Диалоговые окна?! Что-то путаете, батенька... при чтении окон вылазить не может в принципе, если только макросы не используются там...

А что касается времени - то неужели та конфигурация настолько слаба, что не позволяет считывать 400 строк за секунду?

@vitalybuzin · 20.07.2010, 18:32 **[ТС]**

При чтении выводятся:
1. Запрос на включение макросов.
2. Запрос на обновление связей.
3. + еще что угодно может быть, чего пользователь видеть не должен.

Файл из 4000 строк обрабатывается за 1-2 минуты через Excel и за 5 секунд через ADO.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

@vitalybuzin 0 / 0 / 0 Регистрация: 18.07.2010 Сообщений: 4
	20.07.2010, 10:37 [ТС]
	Как Excel может искажать данные в моей программе? Он же не изменяет открытый XLS файл. 0

Messir
	20.07.2010, 17:21
	А почему бы тебе это дело не через ADO делать, а непосредственно через ексель?

@vitalybuzin 0 / 0 / 0 Регистрация: 18.07.2010 Сообщений: 4
	20.07.2010, 17:32 [ТС]
	Потому, что через Excel тормозит. Мне надо уметь в 10 сек укладываться на определенной конфигурации при объеме XLS в 4000 строк. ADO позволяет это делать, а Excel - нет. И еще: при чтении через Excel в некоторых местах вылезают его диалоговые окна. 0

Messir
	20.07.2010, 17:37
	При чтении?! Диалоговые окна?! Что-то путаете, батенька... при чтении окон вылазить не может в принципе, если только макросы не используются там... А что касается времени - то неужели та конфигурация настолько слаба, что не позволяет считывать 400 строк за секунду?

@vitalybuzin 0 / 0 / 0 Регистрация: 18.07.2010 Сообщений: 4
	20.07.2010, 18:32 [ТС]
	При чтении выводятся: 1. Запрос на включение макросов. 2. Запрос на обновление связей. 3. + еще что угодно может быть, чего пользователь видеть не должен. Файл из 4000 строк обрабатывается за 1-2 минуты через Excel и за 5 секунд через ADO. 0