vb 6 и ms sql server 2000 проблема подключения

[wm_leviathan]

Добрый день. Прошу прощения не нашел раздела посвященного VB6 и написал сюда. столкнулся с проблемой, есть программа написанная на vb6 и коннектится она на ms sql server 2000. строка подключения следующая:

Set cn = New ADODB.Connection
       
             cn.Provider = "sqloledb"
             cn.Properties("Data Source") = "HOST"
             cn.Properties("Initial Catalog") = "Esrn"
             cn.Properties("User ID") = frmLogin.sLogin
             cn.Properties("Password") = frmLogin.sPasswd
             cn.CursorLocation = adUseClient
             cn.Open

так получилось что мне пришлось немного править код (дорабатывать), на свой камп поставил ms sql server 2000 и поставил себе VB6. все поправил все хорошо работает. решил выделить сервак для тестов (win2000 сервер + ms sqlserver). строку

cn.Properties("Data Source") = "HOST"

cn.Properties("Data Source") = "10.8.0.219,1433"

остальное неизменно. проверил, да все прекрасно у меня работает. решил ставить на другие машины для совместных тестов, НО тут то почему то на других машинах не запускается пишет: "Runtime error 430. Class not support Automation or does not support expected interface" проверял версию MDAC на машинах 2.8 sp3. моя на win7 проверял на winxp sp2,sp3 (на них не работает). в чем может быть причина ? 3е суток бьюсь е пойму в чем траблы почему у меня работает а у других нет.

[Аватар]

Попробуйте в Data Source указать сетевое имя компьютера, на котором установлен MSSQL

[wm_leviathan]

пробывал без результатно когда ставил sql сервер имя экземпляра не обзывал все делал по умолчанию.