
asignar valores a variables en mysql desde visusal .net
Publicado por cristian (3 intervenciones) el 14/04/2015 22:19:04
Hola a todos:
Mi problema es que estoy chequeando un valor si se encuentra en la base de datos y lo hago a traves de un procedimiento almacenado con una consulta y el resultado de esta consulta la asigno a una variable . El problema es que no me esta dando resultado. Siempre me devuelve nulo.
codigo en mysql:
CREATE DEFINER=`root`@`localhost` PROCEDURE `chequeo_numero_reporte`(in reporte varchar(20), out numero varchar(20), in cliente varchar(20))
BEGIN
set @numero=(select cui_bch from reportes where numero_reporte = @reporte and nombre_empresa = @cliente);
END
codigo en visual .net:
Public Sub chequeo_numero_reporte()
Dim cliente, reporte As String
cliente = ""
reporte = ""
cliente = Form3.ComboBox1.Text
reporte = Form3.TextBox1.Text
If Form3.TextBox1.Text <> "SOLICITUD" And Form3.TextBox1.Text <> "" Then
comando = New MySqlCommand
comando.Connection = conexion
comando.CommandText = "chequeo_numero_reporte"
comando.CommandType = CommandType.StoredProcedure
comando.Parameters.AddWithValue("?reporte", reporte)
comando.Parameters("?reporte").Direction = ParameterDirection.Input
comando.Parameters.AddWithValue("?cliente", cliente)
comando.Parameters("?cliente").Direction = ParameterDirection.Input
comando.Parameters.AddWithValue("?numero", MySqlDbType.String)
comando.Parameters("?numero").Direction = ParameterDirection.Output
comando.ExecuteNonQuery()
If Not IsDBNull(comando.Parameters("?numero").Value) Then
MsgBox("El numero de reporte ya existe", MsgBoxStyle.Exclamation, "Advertencia")
Form3.TextBox1.Text = ""
Form3.TextBox1.Focus()
End If
End If
End Sub
Mi problema es que estoy chequeando un valor si se encuentra en la base de datos y lo hago a traves de un procedimiento almacenado con una consulta y el resultado de esta consulta la asigno a una variable . El problema es que no me esta dando resultado. Siempre me devuelve nulo.
codigo en mysql:
CREATE DEFINER=`root`@`localhost` PROCEDURE `chequeo_numero_reporte`(in reporte varchar(20), out numero varchar(20), in cliente varchar(20))
BEGIN
set @numero=(select cui_bch from reportes where numero_reporte = @reporte and nombre_empresa = @cliente);
END
codigo en visual .net:
Public Sub chequeo_numero_reporte()
Dim cliente, reporte As String
cliente = ""
reporte = ""
cliente = Form3.ComboBox1.Text
reporte = Form3.TextBox1.Text
If Form3.TextBox1.Text <> "SOLICITUD" And Form3.TextBox1.Text <> "" Then
comando = New MySqlCommand
comando.Connection = conexion
comando.CommandText = "chequeo_numero_reporte"
comando.CommandType = CommandType.StoredProcedure
comando.Parameters.AddWithValue("?reporte", reporte)
comando.Parameters("?reporte").Direction = ParameterDirection.Input
comando.Parameters.AddWithValue("?cliente", cliente)
comando.Parameters("?cliente").Direction = ParameterDirection.Input
comando.Parameters.AddWithValue("?numero", MySqlDbType.String)
comando.Parameters("?numero").Direction = ParameterDirection.Output
comando.ExecuteNonQuery()
If Not IsDBNull(comando.Parameters("?numero").Value) Then
MsgBox("El numero de reporte ya existe", MsgBoxStyle.Exclamation, "Advertencia")
Form3.TextBox1.Text = ""
Form3.TextBox1.Focus()
End If
End If
End Sub
Valora esta pregunta


0