Вход | Регистрация

1С:Предприятие ::

Метки:Обмен данными и УРБД

Проблема чтения данных из Access через SQL

Я
   Федорыч
 
02.07.04 - 11:00
Исходные данные:
1с - бухгалтерия на SQL.
Банк на Access.
Задача:
Загрузить данные из Банка.
Проблема:
Не могу подключиться к базе данных Access.
Хочется это сделать через SQL (ODBC).
Не получается составить строку подключения.
Кто-либо сталкивался с подобными задачами?
 
  Рекламное место пустует
   lexa
 
1 - 02.07.04 - 11:02
   Z1
2 - 02.07.04 - 11:22
'   MsgBox "Hello ADO test "
   Dim count_1c As Long
   
   Dim cnnDB_1c As New ADODB.Connection
   Dim rst_1c As ADODB.Recordset
   Dim strSQL_1c As String

'   Dim count_1c As Integer
   
    count_1c = 0
'     Set cnnDB_1c = CurrentProject.Connection
     cnnDB_1c.ConnectionTimeout = 100
     cnnDB_1c.Open ("Driver={SQL Server};Server=<имя сервера>;Uid=sa;Pwd=<пароль sa>;Database=<имя бд>")
    
    strSQL_1c = "SELECT *  FROM SC838   WHERE ( ISMARK = 0 ) AND ( ISFOLDER = 2)"
    Set rst_1c = cnnDB_1c.Execute(strSQL_1c)
    
    rst_1c.MoveFirst
    While rst_1c.EOF = False
        count_1c = count_1c + 1
        If count_1c < 20 Then
'           MsgBox "ФИО = " + rst_1c.Fields("CODE") + " " + rst.Fields("DESCR")
           MsgBox "CODE = " + rst_1c.Fields("CODE") + " DESCR (наименование) " + rst_1c.Fields("DESCR") + " " & rst_1c.Fields("ISMARK")
        End If
        rst_1c.MoveNext
    Wend
    MsgBox "Hello count_1c = " & count_1c
   SnarkHunter
 
3 - 02.07.04 - 11:25
Вот таки именно SC838...
   Z1
4 - 02.07.04 - 11:33
(3) В чем вопрос ?
   SnarkHunter
 
5 - 02.07.04 - 11:34
Ни в чем... И это не вопрос...
   Gruz
 
6 - 02.07.04 - 11:52
Создай лучше системный или файловый DSN и при подключении обращайся к нему.
   Федорыч
 
7 - 02.07.04 - 11:58
Ну вот и спасибо
Проблем больше нет.


Список тем форума
Рекламное место пустует   Рекламное место пустует
2 + 2 = 3.9999999999999999999999999999999...
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Ветка сдана в архив. Добавление сообщений невозможно.
Но вы можете создать новую ветку и вам обязательно ответят!
Каждый час на Волшебном форуме бывает более 2000 человек.
Рекламное место пустует