Underc0de - La Casa de los Informáticos

Foros Generales => Dudas y pedidos generales => Mensaje iniciado por: AroonVa en Enero 28, 2019, 04:56:31 PM

Título: [SOLUCIONADO] Problema al agregar datos por parametros a mysql
Publicado por: AroonVa en Enero 28, 2019, 04:56:31 PM
Hola buenas tardes me podrian ayudar con este error que tengo al ingresar datos a mysql por medio de vb.net mediante parametros mi codigo con el cual inserto los datos es el siguinete:
Try
Dim sql As String = "INSERT INTO solicitud_1  (Cod_Sol ,Cod_Soc,Cod_Cony,Nombre_Emp,Nombre_Soc,Nombre_Cony,Est_Soc,Est_Cony,Naci_So_Di,Naci_So_Mes,Naci_So_Año,Naci_Cony_Di,Naci_Cony_Mes,Naci_Cony_Año
,Est_Civil,Tiemp_Resid,Casa,Do_CyN,Do_CoyLo,Do_Mun,Do_Estado,Do_CP,Do_Refer,Telefono,No_Telefono,T_HoraLLa,P_Monto,P_Plazo,P_FP,P_NoC,RFC,ClasFisCre,A_Eco_1,A_Eco_2,A_Eco_3,A_Eco_4,A_Eco_5
,A_Eco_6,A_E_NePr_1,A_E_NePr_2,A_E_NePr_3 ,A_E_NePr_4,A_E_NePr_5 ,A_E_NoNe_1,A_E_NoNe_2,A_E_NoNe_3,A_E_NoNe_4,A_E_NoNe_5,A_E_NoNe_6,A_E_Mes_1,A_E_Mes_2,A_E_Mes_3,A_E_Mes_4,A_E_Mes_5,A_E_Mes_6,A_E_Año_1,A_E_Año_2,A_E_Año_3,A_E_Año_4,A_E_Año_5,A_E_Año_6
,Descrip_Credito,Ventas,Sueldos,Remesas,Cosechas,Otra,Otra_desc,Rentas,Pensiones,Prospera,Procampo,Pe_Relacionada) VALUES (?Cod_Sol ,?Cod_Soc,?Cod_Cony,?Nombre_Emp,?Nombre_Soc,?Nombre_Cony,?Est_Soc,?Est_Cony,?Naci_So_Di,?Naci_So_Mes,?Naci_So_Año,?Naci_Cony_Di,?Naci_Cony_Mes,?Naci_Cony_Año
,?Est_Civil,?Tiemp_Resid,?Casa,?Do_CyN,?Do_CoyLo,?Do_Mun,?Do_Estado,?Do_CP,?Do_Refer,?Telefono,?No_Telefono,?T_HoraLLa,?P_Monto,?P_Plazo,?P_FP,?P_NoC,?RFC,?ClasFisCre,?A_Eco_1,?A_Eco_2,?A_Eco_3,?A_Eco_4,?A_Eco_5
,?A_Eco_6,?A_E_NePr_1,?A_E_NePr_2,?A_E_NePr_3 ,?A_E_NePr_4,?A_E_NePr_5 ,?A_E_NoNe_1,?A_E_NoNe_2,?A_E_NoNe_3,?A_E_NoNe_4,?A_E_NoNe_5,?A_E_NoNe_6,?A_E_Mes_1,?A_E_Mes_2,?A_E_Mes_3,?A_E_Mes_4,?A_E_Mes_5,?A_E_Mes_6,?A_E_Año_1,?A_E_Año_2,?A_E_Año_3,?A_E_Año_4,?A_E_Año_5,?A_E_Año_6
,?Descrip_Credito,?Ventas,?Sueldos,?Remesas,?Cosechas,?Otra,?Otra_desc,?Rentas,?Pensiones,?Prospera,?Procampo,?Pe_Relacionada)"
Dim Comando As New MySqlCommand(sql, con.AbrirConexion)
Comando.Parameters.AddWithValue("?Cod_Sol", txtnosocio.Text + txtnoCred.Text)
Comando.Parameters.AddWithValue("?Cod_Soc", txtnosocio.Text)
Comando.Parameters.AddWithValue("?Cod_Cony", txtnocony.Text)
Comando.Parameters.AddWithValue("?Nombre_Emp", txtnombreemple.Text)
Comando.Parameters.AddWithValue("?Nombre_Soc", txtnombresociio.Text)
Comando.Parameters.AddWithValue("Nombre_Cony", txtnombreconyu.Text)
Comando.Parameters.AddWithValue("?Est_Soc", txtestadosocio.Text)
Comando.Parameters.AddWithValue("?Est_Cony", txtestadocony.Text)
Comando.Parameters.AddWithValue("?Naci_So_Di", txtdian.Text)
Comando.Parameters.AddWithValue("?Naci_So_Mes", txtmesn.Text)
Comando.Parameters.AddWithValue("?Naci_So_Año", txtañon.Text)
Comando.Parameters.AddWithValue("?Naci_Cony_Di", txtnadiaconyu.Text)
Comando.Parameters.AddWithValue("?Naci_Cony_Mes", txtmesncony.Text)
Comando.Parameters.AddWithValue("?Naci_Cony_Año", txtañoncony.Text)
Comando.Parameters.AddWithValue("?Est_Civil", txtregimen.Text)
Comando.Parameters.AddWithValue("?Tiemp_Resid", txttiempor.Text)
Comando.Parameters.AddWithValue("?Casa", txtcasa.Text)
Comando.Parameters.AddWithValue("?Do_CyN", txtcalle.Text)
Comando.Parameters.AddWithValue("?Do_CoyLo", txtlocalidad.Text)
Comando.Parameters.AddWithValue("?Do_Mun", txtmunicipio.Text)
Comando.Parameters.AddWithValue("?Do_Estado", txtestado.Text)
Comando.Parameters.AddWithValue("?Do_CP", txtCP.Text)
Comando.Parameters.AddWithValue("?Do_Refer", txtreferencias.Text)
Comando.Parameters.AddWithValue("?Telefono", txtttelefono.Text)
Comando.Parameters.AddWithValue("?No_Telefono", txtTelefono.Text)
Comando.Parameters.AddWithValue("?T_HoraLLa", txthora.Text)
Comando.Parameters.AddWithValue("?P_Monto", txtmonto.Text)
Comando.Parameters.AddWithValue("?P_Plazo", txtplazo.Text)
Comando.Parameters.AddWithValue("?P_FP", txtfrecuenciap.Text)
Comando.Parameters.AddWithValue("?P_NoC", txtnoCred.Text)
Comando.Parameters.AddWithValue("?RFC", txtrfc.Text)
Comando.Parameters.AddWithValue("?ClasFisCre", txtclasificacioncredito.Text)
Comando.Parameters.AddWithValue("?A_Eco_1", txtacte1.Text)
Comando.Parameters.AddWithValue("?A_Eco_2", txtacte2.Text)
Comando.Parameters.AddWithValue("?A_Eco_3", txtacte3.Text)
Comando.Parameters.AddWithValue("?A_Eco_4", txtacte4.Text)
Comando.Parameters.AddWithValue("?A_Eco_5", txtacte5.Text)
Comando.Parameters.AddWithValue("?A_Eco_6", txtacte6.Text)
Comando.Parameters.AddWithValue("?A_E_NePr_1", txtnegociop1.Text)
Comando.Parameters.AddWithValue("?A_E_NePr_2", txtnegociop2.Text)
Comando.Parameters.AddWithValue("?A_E_NePr_3", txtnegociop3.Text)
Comando.Parameters.AddWithValue("?A_E_NePr_4", txtnegociop4.Text)
Comando.Parameters.AddWithValue("?A_E_NePr_5", txtnegociop5.Text)
Comando.Parameters.AddWithValue("?A_E_NoNe_1", txtnombNegocio1.Text)
Comando.Parameters.AddWithValue("?A_E_NoNe_2", txtnombNegocio2.Text)
Comando.Parameters.AddWithValue("?A_E_NoNe_3", txtnombNegocio3.Text)
Comando.Parameters.AddWithValue("?A_E_NoNe_4", txtnombNegocio4.Text)
Comando.Parameters.AddWithValue("?A_E_NoNe_5", txtnombNegocio5.Text)
Comando.Parameters.AddWithValue("?A_E_NoNe_6", txtnombNegocio6.Text)
Comando.Parameters.AddWithValue("?A_E_Mes_1", txtmes1.Text)
Comando.Parameters.AddWithValue("?A_E_Mes_2", txtmes2.Text)
Comando.Parameters.AddWithValue("?A_E_Mes_3", txtmes3.Text)
Comando.Parameters.AddWithValue("?A_E_Mes_4", txtmes4.Text)
Comando.Parameters.AddWithValue("?A_E_Mes_5", txtmes5.Text)
Comando.Parameters.AddWithValue("?A_E_Mes_6", txtmes6.Text)
Comando.Parameters.AddWithValue("?A_E_Año_1", txtaño1.Text)
Comando.Parameters.AddWithValue("?A_E_Año_2", txtaño2.Text)
Comando.Parameters.AddWithValue("?A_E_Año_3", txtaño3.Text)
Comando.Parameters.AddWithValue("?A_E_Año_4", txtaño4.Text)
Comando.Parameters.AddWithValue("?A_E_Año_5", txtaño5.Text)
Comando.Parameters.AddWithValue("?A_E_Año_6", txtaño6.Text)
Comando.Parameters.AddWithValue("?Descrip_Credito", txtdescripcion.Text)
Comando.Parameters.AddWithValue("?Ventas", txtventas.Text)
Comando.Parameters.AddWithValue("?Sueldos", txtsueldos.Text)
Comando.Parameters.AddWithValue("?Remesas", txtremesas.Text)
Comando.Parameters.AddWithValue("?Cosechas", txtcosechas.Text)
Comando.Parameters.AddWithValue("?Otra", txtotra.Text)
Comando.Parameters.AddWithValue("?Otra_desc", txtotrades.Text)
Comando.Parameters.AddWithValue("?Rentas", txtrentas.Text)
Comando.Parameters.AddWithValue("?Pensiones", txtpensiones.Text)
Comando.Parameters.AddWithValue("?Prospera", txtprospera.Text)
Comando.Parameters.AddWithValue("?Procampo", txtprocampo.Text)
Comando.Parameters.AddWithValue("?Pe_Relacionada", txtpersonarel.Text)

Comando.ExecuteNonQuery()
MessageBox.Show("Datos guardados")

Catch ex As Exception
MessageBox.Show(ex.Message)
End Try

El error que me surgue es el siguinete.
(https://farm5.staticflickr.com/4866/46908752651_e9c3ccf615_o.png)

Nota: no estoy guardando ninguna imagen solo son datos.

Si me pudieran ayudar se los agradeceria.
Saludos.
Título: Re:Problema al agregar datos por parametros a mysql
Publicado por: Dragora en Enero 28, 2019, 05:52:20 PM
Este es uno de los mensajes de excepción (error) que se genera MySql.Data.DLLen la condición de que la longitud de la consulta sea mayor que el límite de longitud máxima.

Recomiendo te guíes con este ejemplo: Guia (https://github.com/MySqlBackupNET/MySqlBackup.Net/wiki/Packets-larger-than-max_allowed_packet-are-not-allowed)


Espero te sea de ayuda, saludos.

Título: Re:Problema al agregar datos por parametros a mysql
Publicado por: AroonVa en Enero 29, 2019, 01:54:25 PM
You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login
Este es uno de los mensajes de excepción (error) que se genera MySql.Data.DLLen la condición de que la longitud de la consulta sea mayor que el límite de longitud máxima.

Recomiendo te guíes con este ejemplo: Guia (https://github.com/MySqlBackupNET/MySqlBackup.Net/wiki/Packets-larger-than-max_allowed_packet-are-not-allowed)


Espero te sea de ayuda, saludos.


Muchas gracias me sirvio.
Saludos.