Модераторы: gambit
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> sql -> dbf, помогите 
:(
    Опции темы
saloh
Дата 8.10.2008, 06:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 7.10.2008

Репутация: нет
Всего: нет



помогите новичку составить код для экспорта данные из sql на dbf и запись на дискету, заранее спасибо  smile 
PM MAIL   Вверх
MasterOfCode
Дата 8.10.2008, 07:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


elwin
**


Профиль
Группа: Участник
Сообщений: 740
Регистрация: 24.4.2008
Где: World.Russia.Tyum en

Репутация: 4
Всего: 27



Подробнее опиши в чем проблема.


--------------------
user posted image
PM ICQ   Вверх
saloh
Дата 8.10.2008, 08:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 7.10.2008

Репутация: нет
Всего: нет



разрабатываю приложение на Visual Studio.NET. есть таблица состоящихся из 5 полей в базе данных на SQL. Мне надо экспортировать данные из DataSet на Dbf файл в дискету
PM MAIL   Вверх
MasterOfCode
Дата 8.10.2008, 09:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


elwin
**


Профиль
Группа: Участник
Сообщений: 740
Регистрация: 24.4.2008
Где: World.Russia.Tyum en

Репутация: 4
Всего: 27



Создаешь нужный набор данных тебе.
Создаешь OleDbConnection для dbf, и OleDbCommand, там уже в command пишешь SQL-код создания таблицы (create table ...), выполняешь его, тебе создасться таблица.
Перекачиваешь из набора данных созданых тобой ранее в созданную таблицу.


--------------------
user posted image
PM ICQ   Вверх
saloh
Дата 8.10.2008, 14:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 7.10.2008

Репутация: нет
Всего: нет



я так сделал. но создается пустое поле а дальше не знаю:

Dim path As String = "a:\temp"
    Dim connString As String = String.Format("Provider=Microsoft.Jet.OLEDB.4.0;Data Source={0};Extended Properties=dBASE IV;", path)
    Dim conn As New OleDbConnection(connString)

    Private Sub btnDo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDo.Click
        Try
            conn.Open()
            Dim headerCreateSql As String = String.Format("CREATE TABLE {0} ( DOCNUMBER char(20), REGDATE date, PAYDATE date, INN char(20), PLACE char(150))", "Sample")
            Dim headerCreateCmd As New OleDbCommand(headerCreateSql, conn)
            headerCreateCmd.ExecuteNonQuery()
            MsgBox("DBF created.")
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try
    End Sub
PM MAIL   Вверх
MasterOfCode
Дата 8.10.2008, 14:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


elwin
**


Профиль
Группа: Участник
Сообщений: 740
Регистрация: 24.4.2008
Где: World.Russia.Tyum en

Репутация: 4
Всего: 27



А дальше создаешь SQLConnection, SQLCommand и SQLDataReader, цепляешься к БД SQL Server'a, Command'ом вытаскиваешь в SQLDataReader данные, потом циклом по DataReader'y проходишь составляешь инсерты и вставляешь в свою созданную таблицу.


--------------------
user posted image
PM ICQ   Вверх
saloh
Дата 9.10.2008, 14:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 7.10.2008

Репутация: нет
Всего: нет



MasterOfCode, спасибо.  smile 
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Прежде чем создать тему, посмотрите сюда:
stab
mr.DUDA
Exception

Используйте теги [code=csharp][/code] для подсветки кода. Используйтe чекбокс "транслит" если у Вас нет русских шрифтов.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, stab, mr.DUDA, Exception.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Базы данных под .NET | Следующая тема »


 




[ Время генерации скрипта: 0.1027 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.