SQL - Ejecutar Store Procedures desde VB

Hola, como hago para ejecutar un Store Procedure de SQL 2000, desde Visual Basic 6?
Muchas Gracias.

Esto lo publique unas lineas abajo, espero le sirva:

Dim Res As ADODB.Recordset
Dim Conexion As String

Conexion = "Driver={SQL SERVER};Server=MyServer;Database=MyBase;UID=MyUsuario;pwd=MyPassword;"

Set Res = New ADODB.Recordset
Res.Open "exec insert_clientes ' " & var_nombre & "'" & _
& var_paterno & "'" & _
& var_materno & "'",
_
Conexion, adOpenForwardOnly, adLockReadOnly
'FlexDatos.Rows = FlexDatos.FixedRows
If (Res.EOF) = False Then
Text1.Text = Res(0) ' Aqui tengo el Identity
End If
Set Res = Nothing