* * * Abrir bases de datos SQL Serer Con VB 6??? * * *

[Mickel]

Yo hago esto

G_Connect = "DRIVER={SQL Server};UID=(usuario);pwd=(password);Database=(bd) ;SERVER=(servidor);app=" & App.ProductName
Set G_Cn = New ADODB.Connection
G_Cn.ConnectionString = G_Connect
G_Cn.CursorLocation = adUseClient
G_Cn.CommandTimeout = 300
G_Cn.ConnectionTimeout = 300
G_Cn.Open