Как создать dbf файл excel. Создание dbf файла из ексель - VBA

Можно использовать несколько измененный алгоритм перебора строк файла:

Выгрузка в файл DBF

Этапы выгрузки в файл DBF:

1. Создание объекта XBase;
2. Указание кодировки (если не указать, то будет использоваться кодировка ANSI);
3. Описание полей;
4. Создание файла;
5. Цикл с добавлением и заполнением строк;
6. Закрытие файла.

Рассмотрим этот процесс на примере:

При указании кодировки используется тип КодировкаXBase , который может принимать два значения:

• ANSI – формат Windows;
• OEM – формат DOS.

Добавление нового поля при описании структуры имеет синтаксис

Доступны следующие типы:

• «N» – число;
• «S» – строка;
• «D» – дата;
• «L» – булево;
• «F» – аналогично «N» – число.

Длина поля является обязательным для типов полей «N», «F» и «S».

Работа с индексами

Совместно с файлом DBF может использоваться индексный файл, в котором может содержаться информация об одном или более индексе. Наличие индексов делает возможным использование поиска, а не только последовательного перебора всех строк файла.

При создании индексного файла следует задать:

• Перечень индексов;
• Путь сохранения индексного файла (на этапе 4 выгрузки).

Пример создания индексного файла:

Процедура добавления нового индекса имеет синтаксис:

Для использования индексов при чтении из файла DBF следует:

• Указать путь к индексному файлу (на этапе 2 загрузки);
• Задать текущий индекс.

Пример открытия файла DBF с использованием индексного файла:

Внимание!

При открытии файла DBF позиционирование происходит на первой записи в файле. Первая запись в файле не соответствует первой записи в индексе. В связи с этим при использовании индексов перед тем, как последовательно обходить строки, необходимо спозиционироваться на первой строке индекса. Это можно сделать методом Первая () , например:

Для поиска может использоваться одна из двух функций:

• Найти(< Ключ>, < Режим >) ;
• НайтиПоКлючу(< Режим >) .

В результате работы обоих функций возвращается значение с типом булево (найдена запись с указанными условиями или нет). В случае успешного поиска текущий указатель устанавливается на найденной строке. В качестве режима поиска может использоваться одно из значений:

• «>=»;
• «>»;
• «<=»;
• «<«.

Рассмотрим поиск в файле DBF на примерах:

Удаление записей в файле DBF

Удаление записи производится методом Удалить () :

Но при использовании этого метода запись не удаляется из файла безвозвратно, ей присваивается пометка удаления. При переборе строк помеченные на удаление записи пропускаются. Если необходимо обойти весь файл, включая помеченные на удаление записи, необходимо присвоить значение Истина свойству ОтображатьУдаленные объекта xBase. Узнать помечена запись на удаление или нет можно с помощью функции ЗаписьУдалена () . Для снятия пометки удаления используется метод Восстановить () .

Для непосредственного удаления помеченных записей используется метод Сжать () :

Если необходимо удалить все записи в файле непосредственно, то можно использовать метод ОчиститьФайл () :

Загрузка из DBF при помощи ADO

Для работы с файлами DBF может использоваться технология ADO. Драйверы ADO входят в состав операционной системы Windows и дополнительно их устанавливать не надо.

Рассмотрим пример кода для чтения из файла DBF по технологии ADO:

В приведенном примере используется строка подключения «Provider=Microsoft.Jet.OLEDB.4.0;Data Source= «D:\»;Extended Properties=DBASE III». В этой строке:

• Provider – это используемый драйвер;
• Data Source – путь, где находится файл DBF. Путь указывается с точностью до каталога. Имя файла используется в качестве имени таблицы в запросах;
• Extended Properties – в случае обращения к файлам DBF является обязательным параметром. Можно указать формат файла

Внимание!

При чтении указанным способом кодировка по-умолчанию – OEM. Для того, чтобы изменить кодировку на ANSI необходимо в реестре Windows присвоить параметру HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Jet\4.0\Engines\xBase\DataCodePage значение «ANSI».

Остались вопросы?
Спросите в комментариях к статье.

Бесплатный универсальный DBF редактор, позволяющий открывать существующие и создавать новые базы данных. Имеет очень небольшие размеры, может запускаться с флешки и при этом имеет много продвинутых инструментов для работы с DBF файлами, среди которых есть даже поддержка SQL-запросов!

Галерея скриншотов

Обычно на сайте мы освещаем программы, которые будут интересны широкому кругу читателей, но сегодня случай не совсем заурядный:). Я когда-то работал эдаким «компьютерным специалистом» в нескольких государственных конторах и там часто приходилось сталкиваться с различными программами, работающими на базе FoxPro …

Главной проблемой всех этих приложений было то, что простой пользователь мог легко запороть базу данных так, что ее нельзя было потом открыть штатными средствами, поэтому приходилось извращаться, чтобы вернуть ее к жизни (что не всегда получалось, учитывая «способности» «диких юзверей»:)).

И вот, спустя несколько лет, как я уже не работаю там, нам на почту прислали просьбу добавить новую бесплатную программу для редактирования DBF-баз данных, которая имеет незамысловатое название - Sdbf . О ней и поговорим:)

Сравнение с платным аналогом

Sdbf, несмотря на свою портативность (может работать с флешки!) и малый размер, является довольно продвинутым редактором баз данных, который позволяет создавать, править и экспортировать любые базы формата DBF, начиная со спецификации xBaseIII, и заканчивая современным xVisualFoxPro! Сравним функционал Sdbf, с возможностями одного из самых продвинутых редакторов данного толка DBF Commander Professional:

Из приведенной выше таблички мы видим, что программы незначительно отличаются по функционалу, но Sdbf, во-первых, является портативной (что обычно немаловажно, так как каждый компьютерных дел мастер предпочитает носить набор необходимых программ на флешке), а во-вторых, является полностью бесплатной!

Первый запуск Sdbf

Для запуска программы ее достаточно распаковать из скачанного архива в любое место и открыть полученный EXE-файл. Перед нами появится пустое окошко следующего вида:

Drag&Drop, увы, не поддерживается, поэтому для начала работы нам потребуется вызвать меню «Файл» и там уже выбрать одно из двух доступных действий: «Создать» новую базу или «Открыть» существующую. Откроем существующую базу:

Перед нами откроется содержимое выбранной базы данных в виде таблицы. В «нулевой» строке отображаются имена полей, а начиная с первой - само содержимое. Под содержимым внизу находится панель инструментов и статусная строка.

В последней выводится достаточно много полезной служебной информации, в том числе, количество записей в базе данных, кодировка, дата создания и автоматически определенный формат. Из форматов Sdbf не поддерживает только ранние версии xBase (I и II) и позволяет открывать и создавать DBF-файлы следующих типов:

• xBase III - VII;
• xClipper;
• xFoxPro;
• xVisualFoxPro.

Инструменты поиска и фильтрации данных

Программа Sdbf позволяет напрямую редактировать любую ячейку открытой базы данных, однако, нужные ячейки еще необходимо найти… Если база небольшая и простенькая, то сделать это можно довольно быстро и вручную. Однако, если записей несколько десятков, а то и сотен, то искать может быть довольно затруднительно.

Но это не такая уж и проблема, поскольку в Sdbf есть сразу несколько инструментов, позволяющих отсеять лишние данные и отобразить только то, что нужно!

Эти инструменты находятся на нижней панели инструментов. Здесь вначале идет 8 навигационных кнопок, которые позволяют перемещаться по базе (стрелки), добавлять/удалять записи, а также подтверждать или отменять изменения. Нужные же нам функции начинаются с девятой кнопки - «Поиск»:

При активации кнопки перед нами появляется небольшое окошко с формой поиска. Нам нужно указать текст, который нужно найти и выбрать из выпадающего списка поле, по которому будет производиться поиск. Теперь жмем кнопку «Найти далее» и программа автоматически выделит строку, следующую за текущим выделением, в которой есть искомый текст. Повторное нажатие кнопки выделит строку ниже от текущей, в которой есть те же искомые данные и т.д.

Иногда в базах данных встречается нестандартное форматирование ячейки: лишние пробелы, табуляции и прочие символы, которые визуально не отображаются, но влияют на результат выдачи поиска. Если Вы столкнулись с таким случаем, то для нормальной работы функции Вам будет достаточно снять флажок «С учетом формата» в нижней центральной части окошка поиска и искомые строки начнут отображаться.

Функция поиска удобна, когда нам нужно быстро найти единичные вхождения конкретных данных. Но бывают случаи, когда удобнее было бы отобразить сразу несколько строк, которые содержат только определенную информацию. В данном случае нам поможет вторая функция (кнопка которой идет сразу за кнопкой поиска) - «Фильтр»:

Чтобы задействовать фильтрацию, нам нужно сперва правильно составить запрос и ввести его в специально отведенное поле (сразу за кнопкой в центральной части панели инструментов). Принцип составления запроса - прост, но не совсем очевиден. Нам нужно сперва ввести название поля, по которому нужно фильтровать таблицу базы данных, а затем приравнять значение фильтра к конкретному тексту, по которому нам нужно найти все строки.

Значение берем в одинарные кавычки, после чего жмем саму кнопку «Фильтр» (она становится зажатой) и получаем таблицу, содержащую данные только с определенными нам значениями в указанных полях (в примере мы отфильтровали все строки со значением «U.S.A» в поле «Country» (регистр указания названия значения не имеет)). Вернуть таблицу к исходному виду можно просто повторным нажатием кнопки «Фильтр» (становится вновь отжатой).

Поле фильтрации может содержать простейшие условия «and» (для уточнения запроса по нескольким полям) и «or» (для альтернативной выборки данных из разных полей). К сожалению, Sdbf не поддерживает исключающие запросы (типа «not»), но это ограничение мы сможем обойти другим способом, о котором речь пойдет чуть ниже.

Кстати, чтобы не вводить вручную запрос фильтрации, Вы можете воспользоваться следующим трюком: выделите любую запись в поле, по которому будете фильтровать и нажмите сочетание клавиш «Alt+F» (только не F4:))). Запрос будет автоматически сформирован, а в значении будет стоять знак «*», который является маской поиска и соответствует любому количеству любых символов.

Увы, это единственный тип масок, который можно использовать в Sdbf и, что еще печальнее, один запрос может содержать только одну маску:(. Поэтому, если Вам нужно отфильтровать одно и то же поле по нескольким параметрам, то придется использовать оператор «and» (быстрое формирование запроса по нажатию «CTRL+ALT+F») или «or» («SHIFT+ALT+F»).

Выполнение SQL-запросов к таблицам баз данных

Поиск и фильтрация - это, бесспорно, хорошо, однако не всегда удобно. Когда количество записей велико, мы легко можем потерять из виду нужные нам данные при разборе таблиц. Однако и на этот случай в Sdbf имеется отличная функция - поддержка SQL-запросов !

При помощи таких запросов в Sdbf мы можем:

1. Динамически форматировать нашу таблицу, создавая выборку только по определенным нужным полям (операторы SELECT и SELECT TOP);
2. Копировать данные из одной базы в другую (INSERT FROM и INSERT INTO);
3. Изменять и удалять содержимое определенных строк (UPDATE и DELETE, соответственно);
4. Группировать параллельные запросы (UNION);
5. Формировать сводные таблицы (PIVOT).

Для начала работы с запросами нам нужно нажать кнопку «SQL-запрос» в правом конце панели инструментов. Однако, результат такого действия будет несколько обескураживающим: содержимое только что редактированной базы данных пропадет, а поверх рабочего окна появится еще одно пустое окошко с двумя полями (вверху - поле вывода данных, а внизу - ввода).

Пугаться не стоит:). Надо просто сразу ввести нужный SQL-запрос в нижнем поле с указанием имени нужной базы данных. Если Вы не помните этого имени, можете активировать боковую панель Sdbf (нажатием на серую вертикальную полоску справа), на которой в виде списка отображаются все базы, которые Вы открывали раньше:

Также для ускорения работы желательно запомнить горячие клавиши, которые можно посмотреть, вызвав справку по нажатию клавиши F1. Их всего три, но они позволяют значительно ускорить процесс создания правильных запросов.

Так, сочетание «CTRL+Пробел» - отобразит всплывающее окошко со списком доступных имен баз данных (чтоб не смотреть в боковую панель), «CTRL+F» - выведет список функций для текущего оператора, а «CTRL+Enter» запустит процесс выполнения запроса. Кроме того, если кликнуть по полю ввода правой кнопкой мыши (вызвать контекстное меню), то мы получим список поддерживаемых Sdbf операторов.

Вернемся к нашему предыдущему скриншоту и посмотрим на простейший запрос, который там составлен. Он базируется на операторе «SELECT», а значит возвращает нам выборку. В качестве параметра выборки стоит «*», что означает вывод любых данных, однако мы могли бы указать там через запятую имена любых полей таблицы базы данных.

Выборка, которую мы рассмотрели выше, является самой простой, однако Sdbf позволяет выполнять запросы и посложнее. На следующем скриншоте мы увидим выборку, динамически сформированную таблицу, состоящую из полей, которые содержат имена клиентов, город, в котором те проживают и страну. Причем, фильтрация клиентов идет именно по стране проживания (U.S.A) и результаты выводятся в алфавитном порядке:

Если разобрать данный запрос, то мы увидим уже упомянутый мной способ выборки по полям, указанным через запятую после оператора SELECT. Далее все то же указание имени базы данных, но на этом теперь запрос не кончается.

Следующим шагом будет перечисление функций основного оператора, которые должны будут выполняться в результате обработки запроса. Здесь их две.

Первая - «where» имеет сходство с фильтром, рассмотренным нами ранее, и выполняет аналогичное действие - позволяет выбрать только те записи, которые соответствуют условию.

Вторая функция - «order by» отвечает за сортировку полученных результатов по одному из полей (в данном случае по полю с именем клиента - «NAME») в алфавитном (параметр «asc») или инвертированном («desc») порядке.

Естественно, что приведенный пример тоже довольно примитивен, но он отображает общую суть создания и обработки SQL-запросов. Если хотите узнать о них больше, советую почитать мануалы тут: http://dimonchik.com/insert.html или https://www.sql.ru/articles/articles.aspx?g=SQL&s=0 .

Кстати, плюсом Sdbf является возможность экспортировать полученную в результате запроса таблицу, как новую базу данных или в виде HTML, RTF, либо CSV-файла! Для этого достаточно вызвать контекстное меню поля отображения таблицы и выбрать соответствующий пункт.

Дополнительные функции из строки меню

С основными возможностями Sdbf мы с Вами разобрались, но на этом все не кончается. Целый ряд полезных и даже уникальных функций таит в себе строка меню, та самая, которую мы использовали для открытия базы данных:) Так, многие полезные возможности (которые иногда позволяют обойтись без SQL-запросов) можно в меню «Таблица»:

Среди прочих «полезняшек» типа изменения кодировки и слияния баз данных в самом низу мы можем найти пункт «Изменить структуру». Данный пункт вызывает дополнительное окошко, в котором мы можем полностью изменить все поля открытой таблицы, добавить новые, или удалить больше ненужные разделы (это же окно открывается при создании базы данных с нуля).

Конкретно мы можем менять очередность полей, их имена, типы, размеры (количество символов в ячейке) и точность (разрядность - обычно задается автоматически и зависит от типа поля).

Единственное, что нужно помнить при редактировании (а особенно создании) баз, так это то, что для каждого типа базы существуют свои наборы типов полей и они, зачастую (если не брать во внимание основные N, C, D) отличаются. Например, в базах xClipper нет поддержки полей с картинками (P, B), а xBase вплоть до седьмой версии не поддерживают автоинкрементные поля (+). То есть, нужно всегда помнить о совместимости:).

Раз уж мы рассматриваем строку меню, то не забудьте заглянуть в меню «Поле»:

Здесь всего две функции, но они бывают очень полезными! Особенно первая - «Заменить». Она позволяет быстро в автоматическом режиме произвести замену значений во всем столбике указанного поля, либо конкретных слов и символов по всей базе данных!

Функция же «Вычислить» является аналогом Excel’евских формул автоподсчета и дает нам возможность производить такие математические и статистические операции как нахождение автосуммы поля, вычисление среднего арифметического, а также максимумов и минимумов значений. Естественно, что для выполнения вычислений типы поля должны быть числовыми (N, F, I, O, B).

Последняя функция, которая не столь очевидна, но может быть полезной является встроенный HEX-редактор :

Он позволяет править данные любой ячейки. Для этого достаточно выделить содержимое, которое нужно изменить и в контекстном меню выбрать последний пункт - «Открыть в hex». Все - можно править и сохранять или сразу распечатывать результат!

Достоинства и недостатки программы

• портативность и малый размер;
• поддержка практически всех типов DBF-файлов;
• возможность создавать базы данных с нуля;
• поддержка SQL-запросов;
• встроенная система поиска, фильтрации и правки данных.

• не позволяет задать в фильтре более одной маски;
• нет функции отмены действий.

Выводы

Программа Sdbf при своих скромных размерах и системных требованиях позволяет делать с DBF-базами данных если и не все, то очень и очень многое… А реализация поддержки SQL-запросов вообще позволяет вывести работу по редактированию базы на новый уровень! С их помощью можно легко компенсировать многие недочеты в работе через графический интерфейс.

Самым же большим разочарованием, на мой взгляд, явилось отсутствие самой тривиальной функции «Отменить последнее действие» в миру «CTRL+Z»:(Самое обидное, что по недосмотру или незнанию пользователь может, например, случайно применить автозамену по всему полю, а вернуть данные уже будет невозможно:(

За сим можно констатировать, что программа в функциональном плане - более чем удачна, но перед работой с ней всегда выполняйте древнее админское правило - СОЗДАВАЙТЕ БЭКАПЫ! И будет Вам счастье:)

P.S. Разрешается свободно копировать и цитировать данную статью при условии указания открытой активной ссылки на источник и сохранения авторства Руслана Тертышного.

как создать dbf файл из ексель из использованием ADO в ADO я запуталсь......именно в конретной информации.... 1. подключение к dbf(и к чему еще можно с помощю ado подключится и как); 2.создание файла dbf (другие варианты); 3.запись; 4.сохранение; 5.закрытие. спасибо за любое инфо

что искать по даной теме или полный игнор.....на тему ADO может лутше создать тему.....обшырное использование ADO

скупо как то получается

Код к задаче: «Создание dbf файла из ексель»

Textual

Листинг программы

"::: Этап 1 - Определяем, откуда мы запущены homeDir=Wscript.ScriptFullName "::: Это - полный путь нашего файла k=Instrrev(homeDir,"\") "::: Ищем "\" с конца homeDir=left(homeDir,(k-1)) "::: Это - чистое имя директории "::: Этап 2 - Создаем ADO-соединение и пустой набор записей Set Conn = CreateObject("ADODB.Connection") Set RS = CreateObject("ADODB.Recordset") DSNName = "DRIVER=Microsoft dBase Driver (*.dbf);DBQ=" DSNName = DSNName & HomeDir "::: Этап 3 - Открываем соединение Conn.Open DSNName "::: Этап 4 - готовим SQL-оператор для создания таблицы SQL="create table Testtable (N1 Float, N2 Float)" "::: Этап 5 - выполняем его RS.Open sql,Conn,3,3 "::: Этап 6 - Добавляем в таблицу 100 записей For i=1 to 100 SQL="insert into testtable values (" & cstr(i) & "," & Cstr(2*i-1) & ")" RS.Open sql,Conn,3,3 Next "::: Этап 7 - суммируем... SQL="Select sum(N1),sum(N2) from Testtable" RS.Open SQL,Conn,3,3 SS1=RS(0) SS2=RS(1) MsgBox SS1 MsgBox SS2 Rs.Close SQL="Drop table Testtable" RS.Open sql,Conn,3,3 MsgBox "Таблица удалена!"