Hola!

Registrándote como bakuno podrás publicar, compartir y comunicarte en privado con otros bakuos :D

Regístrame ya!

Ayuda con consulta

M

mrarellano

Becerro
Desde
29 Jul 2009
Mensajes
2
Soy nuevo en visual basic y necesito ayuda sobre una consulta en la cual quiero mostrar los resultados de la consulta en textbox como en la imagen, pero para realizar la consulta estoy utilizando un store procedure que es el siguiente:

alter procedure p_ver_cliente
@clave int
as
select nombre,direccion,negocio
from Clientes where ID_Cliente=@clave

img020508.jpg


Espero una respuesta y gracias
 
visual basic??? o visual net?
pero bueno un poco de ayuda:

set rs = createobject("...")
str = "Exec p_ver_cliente"
rs.open str, miconexion

if not rs.eof then
me.txtClave.text = rs("nClave")
.
.
.
end if

Con EXEC = execute = ejecutar o invocar
 
Código: 
Private Sub getAreaData(ByVal tu_parametro_1 As Long)

        Dim cnn As New SqlConnection(My.Settings.strConn)
        cnn.Open()

        Dim myCMD As New SqlCommand("tu_stored_procedure", cnn)
        myCMD.CommandType = CommandType.StoredProcedure

        With myCMD.Parameters
            .AddWithValue("@tu_parametro", tu_parametro_1)
        End With

        Dim dr As SqlDataReader

        Try

            dr = myCMD.ExecuteReader

            If dr.HasRows Then

                Do While dr.Read
                    If dr.IsDBNull(1) Then
                        Me.txtNombre.Text = ""
                    Else
                        Me.txtNombre.Text = dr.GetString(1).ToString
                    End If
                Loop
            End If

            dr.Close()

        Catch ex As Exception
            MsgBox("Error No: " & Err.Number & vbCrLf & Err.Description)
        Finally
            cnn.Close()
            cnn.Dispose()
        End Try
    End Sub
 
Debes iniciar sesión o registrarte para participar.
Volver
Arriba