Hola a todos, bueno mi duda es la siguiente.

Tengo un formulario con un text1 en el cual ira el codigo de un cliente.
Con ese codigo quiero mostrar atravez de un command en un datagrid algunos campos de ese cliente.

Alguien me puede dar algun codigo, es primera ves que uso consulta sql.

Gracias

Me olvide colocar que estoy trabajando con adodc.

Alguien que me ayude plis

Hola Michel...Mira este codigo espero q te sirva, como dices en tu segundo mensajes lo estoy haciendo con el control Adod. Y uso una base de datos de Access, si es q tu estas usando otro tipo de base de datos talvez la variable sConeccion, tenga q cambiar un poco, para q puede realizar bien la coneccion.

Código:

Private Sub Command1_Click()
Dim sConeccion As String
Dim sBaseDatos As String
Dim sSQL As String


'Cambia a variable sBaseDatos a la ruta de tu base de datos
sBaseDatos = "C:\Neptuno.mdb"
sConeccion = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sBaseDatos & ";Persist Security Info=False"


'Aqui creamos la consulta SQL en la cual solo estamos tomando los campos
'idCliente, NombreCompañía, NombreContacto, Dirección y Teléfono
'con la condicion q solo muestres el cliente q se enc**tra en txtIdCliente
'En este caso el campo clientes es Texto por eso pongo las comillas simples
sSQL = "SELECT idCliente, NombreCompañía, NombreContacto, Dirección, Teléfono " & _
 "FROM Clientes " & _
 "WHERE IdCliente = '" & txtIdCliente.Text & "'"


'Aqui Creamos la coneccion del Control Adod
'Si la instruccion SQL con la q se va a llenar el Adod
With Adodc1
 .CommandType = adCmdText
 .ConnectionString = sConeccion
 .RecordSource = sSQL
End With


'El control DataGrid obtendra sus datos del control Adodc
Set DataGrid1.DataSource = Adodc1


'Refrescamos el Adod para q muestre los cambios hechos
Adodc1.Refresh


End Sub

Bueno espero q te sirva... Bye


Isaac...

Muchas gracias isaac es justo lo que buscaba, excelente tu ayuda.
Gracias por las explicaciones asi puedo entender mejor el funcionamiento

Saludos