Здраствуйте! Помогите, пожалуйста, настроить соединение из VB6 к MSSQL2000 по TCP/IP
Вот строки подключения, причем при добавлении параметра (Network Library=dbmssocn;) выдает ошибку без нее все нормально, на сервере открыт только доступ TCP/IP, 1433 остальные протоколы отключены

strConn = "DRIVER=SQL Server;WSID=LOCAL;Server=" + host + ";Database=" + db_name + ";UID=" + login + ";PWD=" + passwd + ";Network Library=dbmssocn;"
Set dbr = OpenDatabase("price", 0, True, strConn)

Т.в. проблемма в том, что подключиться пытается не по TCP/IP а по named pipes, если в реестре прописать соответствующие значения
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSSQLServer\Client\ConnectTo

но т.к. прописать эти значения средствами VB у меня не получается т.ч. наверное проще настроить MS SQL. Пожалуйста, подскажите как настроить SQL или как изменить реестр из VB ( если можно киньте пример )

Всем заранее спасибо.

MDAC установлен, если ручками дописать в регистр TCP/IP по умолчанию, то все без проблемм соединяется... Тут вопрос как сделать что бы подключалось именно по TCP/IP или как из VB изменить реестр, именно раздел ( HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSSQLServer\Client\ConnectTo )