Visual Basic - Dudas VB 6 con SQL Server 7

Dos preguntas ojala me puedan ayudar
1- ¿ Cómo conecto una aplicación VB6 con SQL Server 7 ?
Si me pudieran explicar o enviar un trozo de código de ejemplo se los agradeceria mucho.

2- ¿ Como contruyo un menu al estilo MENU EDITOR pero que en cada elemento del menu se pueda insertar un icono y al posicionarme sobre alguno aparezca una mano en vez del puntero ( Estilo WEB).

Lo mismo si me pueden explicar o enviar un trozo de código, gracias....

Para las dos... por que no te das una vuelta por la seccion de codigo de aqui, la web del programador...

Bueno te tengo la solucion para el primer punto.

1) A nivel modulo declaras la conexion asi:
Public cnSQL As ADODB.Connection

2) Llamas a la siguiente rutina:

Public Sub Connection_SQLServer()
Set cnContabilidad = New ADODB.Connection
With cnContabilidad
.Provider = "SQLOLEDB"
.ConnectionString = _
"User Id=sa;Password=" & _
";Data Source=" & xServer & ";" & _ 'Nombre del Servidor (si es local pones vacio)
"Initial catalog=" & xCatalog 'Nombre de la Base de datos
.Open
End With
End Sub

La segunda parte puedes buscar informacion en www.ambsoftware.com

Saludos desde Lima