VPF::Программно в ODBC - Форум программистов

N1VaL

Дата 19.4.2008, 23:11 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

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

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

Проблема в том что я хочу что бы можно было выбрать мою БД(Excel) и сразу с ней работать программно, а не то что бы сначала заходить в панель упраления-> Администрирование >Источники данных (ODBC)... и там настроить связь с файлом? для этого я использую компонент Adodc.Зарание всем спасибо

Magnifico

Дата 20.4.2008, 14:44 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 418
Регистрация: 23.1.2008
Где: Московская област ь

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

http://connectionstrings.com/?carrier=excel

Код



    Set conn = New ADODB.Connection
    Set cm = New ADODB.Command
  With conn
     .CursorLocation = adUseClient
  End With

conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
      "Data Source= C:\files\names.xls;" & _
      "Extended Properties=""Excel 8.0;HDR=Yes;mode =Write"""

With cm
      .CommandText = "SELECT * FROM [sheet1$]"
      .CommandType = adCmdText
      .ActiveConnection = conn
      .CommandTimeout = 0
End With
    Set Rst = cm.Execute
    Set DataGrid1.DataSource = Rst
          DataGrid1.Refresh

--------------------

Всё в порядке - спасибо зарядке !

N1VaL

Дата 20.4.2008, 17:53 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

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

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

Большое спасибо за вашу помощь, вы мне очень помогли!

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