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

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
Ну вот и спасибо
Проблем больше нет.


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