Visual Basic - Como accedo a SQl Server desde VB6?

Hola, cómo se accede a una base y tabla de SQL Server 7 desde VB6?
He intentando con ADO, pero me dan errores y no termino de abrir/leer y editar las tablas.
Gracias.
PD: La única manera de grabar y editar contenidos de una tabla de SQL Server es a través de una aplicación? No se puede como en Access hacerlo en forma directa?
Un abrazo.
Sergio

Si no quieres hacer una aplicación para modificar-ver datos de una base de datos de SQL SERVER, LO MEJOR QUE PUEDES HACER ES CREARTE UNA NUEVA BASE DE DATOS DE MICROSOFT ACCES, Y VINCULAR EN ELLA LAS TABLAS DE LA BASE DE DATOS DE SQL SERVER.

Previamente debes tener creado una base de datos, posteriormente crear una coneccion a la base de datos de la sigueinte manera:
Set ConIrap = New Connection

'MiHotelPunt.CursorLocation = adUseClient
SServer = "nompc\instanciade BD"


'generacion de odbc para proyecto de control de activos fijos
'
Cadena = ""
Cadena = "Description=Tablas de xxx" & Chr$(13)
Cadena = Cadena & "OemToAnsi=No" & Chr$(13)
Cadena = Cadena & "DataBase = NombreDB" & Chr(13)
Cadena = Cadena & "Server =" & ServerDB
DBEngine.RegisterDatabase "Instancia de ODBC", "SQL Server", True, Cadena

'se crea la conexion
'
Set ConFact = New Connection
ConFact.CursorLocation = adUseClient
With ConFact
.Provider = "SQLOLEDB"
.ConnectionString = "User ID = sa; password=sistemas; " & _
"data Source= " & SServer & ";" & _
"Initial Catalog = Facturacion"

'obre conexion
'
.Open
.CommandTimeout = 420
End With

y esto te debe de funcionar
ami me funciona y bien