Ayuda... en vb.Net

Question

Hola... tengo el siguiente codigo para insertar los datos en sql:

 Dim conexion As SqlClient.SqlConnection

        Dim comando As SqlClient.SqlCommand

        Dim query As String

        Dim tabla As New DataTable

        conexion = New SqlClient.SqlConnection()

        conexion.ConnectionString = ("Data Source=SERVERSQL;Initial Catalog=RH_ABCD;User Id=produccion;Password=qpaso@produccion;")

        query = "insert into tblCedulas values (@idCedula,@Comision,@idHorario,@TiempoCargo,@TiempoLabor,@FuncionPrincipal,@FuncionExtra,@PercepcionArea)"

        comando = New SqlClient.SqlCommand

        comando.Connection = conexion

        comando.CommandText = query

        comando.Parameters.Add("@idCedula", SqlDbType.Char, 9).Value = Me.tbFolio.Text

        comando.Parameters.Add("@Comision", SqlDbType.Char, 100).Value = Me.tbcomision.Text

        comando.Parameters.Add("@idHorario", SqlDbType.Int, 4).Value = Me.cbHorario.SelectedValue.ToString()

        comando.Parameters.Add("@TiempoCargo", SqlDbType.Int, 4).Value = Me.tbtiempocargo.Text

        comando.Parameters.Add("@TiempoLabor", SqlDbType.Int, 4).Value = Me.tbtiempolabo.Text

        comando.Parameters.Add("@FuncionPrincipal", SqlDbType.Char, 100).Value = Me.tbfunprincipal.Text

        comando.Parameters.Add("@FuncionExtra", SqlDbType.Char, 100).Value = Me.tbfuncionextra.Text

        comando.Parameters.Add("@PercepcioArea", SqlDbType.Char, 110).Value = Me.tbpercepcion.Text

Pero al momento de dar clic en guardar me manda decir que ha habido problemas al intentar establecer conecsionError al conventir el valor del parametro de String a Int 32.

Espero k puedan ayudarme gracias

Answer 1

Hola amigo tu problema esta en que en la base de datos tienes un campo como varchar osea como string o cadena y en vb.net lo esta declarando como integer