Выгрузка данных с SQL и сравнение с данными 1С

"Добрый день!Стоит такая задача:<br>Подключится к SQL 2000, взять с таблицы данные.<br>В 1С есть табличка, сравнить эти таблицы.<br> Показать те данные которых нет либо в первой таблице, либо во второй.<br>У меня не получается на начальном этапе, не могу подключиться к SQL, в VB обычно указывалось в Password='';User ID=''; пустые значения, а тут так не проходит, пробовал подставлять свои данные, тоже ругается. Как подключиться правильно, подключение можно совершать с windows аутентификацией.<br> <br> <br>вот листинг:<br> <br> Процедура Сформировать()<br> стрПодключения = "Provider=SQLOLEDB;Data Source=SQL_Pro2;Password=' ';User ID=' ';Initial Catalog=Sbyt";<br> Connection = Новый COMОбъект("ADODB.Connection"); <br> <br> Connection.OpenServer=стрПодключения;<br> RS=Новый ComОбъект("ADODB.Recordset");<br> RS.Open("SELECT NomDok FROM dbo.tblPltreb2");<br> пока RS.EOF()=0 Цикл<br> номер=Rs.fields("NomDok").Value; <br> RS.MoveNext();<br> КонецЦикла;<br> RS.Close();<br> Connection.close();<br>КонецПроцедуры"

"> вот листинг:<br>> <br>> Процедура Сформировать()<br>> стрПодключения = "Provider=SQLOLEDB;Data Source=SQL_Pro2;Password=' ';User ID=' ';Initial Catalog=Sbyt";<br>> Connection = Новый COMОбъект("ADODB.Connection"); <br>> <br>> Connection.OpenServer=стрПодключения;<br>Connection.Open();<br>> RS=Новый ComОбъект("ADODB.Recordset");<br>RS.Open("SELECT NomDok FROM dbo.tblPltreb2", Connection);<br>> пока RS.EOF()=0 Цикл<br>> номер=Rs.fields("NomDok").Value; <br>> RS.MoveNext();<br>> КонецЦикла;<br>> RS.Close();<br>> Connection.close();<br>> КонецПроцедуры<br>ИМХО этого не хватает..."

Это только этап проверки подключения, у меня на этом тормознулось все

Т.е. в RS записи базы данных не попадают?

"Да пишет ошибку вот голову ломаю, листинг такой<br> <br> стрПодключения = "driver={SQL Server};server=Sql_Pro2;uid='';pwd=;database=Sbyt;trusted_connection=yes";<br> <br> АДОДБКоннект = Новый COMОбъект("ADODB.Connection");<br> АДОДБКоннект.ConnectionTimeOut =300; <br> //АДОДБКоннект.CursorLocation = 3; //adUseClient<br> АДОДБКоннект.CursorLocation = 2; //adUseServer<br> Попытка<br> АДОДБКоннект.OpenServer(стрПодключения);<br> Сообщить("Соединение с SQL-сервером " + ИмяСервера + " осуществлено в "+ТекущаяДата());<br> Исключение <br> Предупреждение("Невозможно установить соединение с SQL-сервером " + ИмяСервера); <br> АДОДБКоннект.Close();<br> Возврат;<br> КонецПопытки;<br> <br>У меня после АДОДБКоннект.OpenServer(стрПодключения);, сразу идет на ошибку. В чем может быть дело, как можно по другому проверить подключение в 1С, кроме как с готовой внешней обработки"

В Исключение если поставить ОписаниеОшибки(), то что выдаст?<br> <br>P.S. http://forum.mista.ru/topic.php?id=111457 (в помощь)

вот какая ошибка пишется

Прикрепленные файлы

Ошибка.bmp (254.55 КБ)

"НА самом деле нужно было сделать так<br>стрПодключения = "driver={SQL Server};server=Sql_Pro2;uid='';pwd='';database=Sbyt;trusted_connection=yes";<br>Теперь соединение прошло."