Ayuda abm vb 2008

hola experto necesito programar un abm donde gestione clientes(alta baja modificación y consulta de datos de clientes)

el problema es que cuando le estoy por dar el alta me aparece un cartel que dice " el nombre de la columna pri_telefono no es valido".y no encuentro el error. Te envío el código.

desde ya muchas gracias por tu tiempo

código:

If Me.AltaCF.Enabled = True Then
If Me.conexionFJ.State() = ConnectionState.Closed Then
Me.conexionFJ.Open()
End If
Dim alta As New SqlCommand
alta.CommandText = "insert into Cliente ( código, persona, limiteCredito, tipoDoc, documento, nombre, apellido, pri_telefono, email, provincia, descripcionLocalidad, descripcionBarrio, departamento, piso, torre, descripcionCalle, numero, observaciones, condicionIVA) " _
& "values ( @código, @persona, @limiteCredito, @tipoDoc, @documento, @nombre, @apellido, @pri_telefono, @email, @provincia, @descripcionLocalidad, @descripcionBarrio, @departamento, @piso, @torre, @descripcionCalle, @numero, @observaciones, @condicionIVA)"
alta.Connection = conexionFJ
Me.da.InsertCommand = alta
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@código", SqlDbType.Int))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@persona", SqlDbType.Int))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@limiteCredito", SqlDbType.Int))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@tipoDoc", SqlDbType.Int))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@documento", SqlDbType.VarChar))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@nombre", SqlDbType.VarChar))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@apellido", SqlDbType.VarChar))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@pri_telefono", SqlDbType.NVarChar))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@email", SqlDbType.VarChar))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@provincia", SqlDbType.Int))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@descripcionLocalidad", SqlDbType.VarChar))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@descripcionBarrio", SqlDbType.VarChar))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@departamento", SqlDbType.VarChar))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@piso", SqlDbType.VarChar))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@torre", SqlDbType.VarChar))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@descripcionCalle", SqlDbType.VarChar))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@numero", SqlDbType.Int))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@observaciones", SqlDbType.VarChar))
Me.da.InsertCommand.Parameters.Add(New SqlParameter("@condicionIVA", SqlDbType.Int))
Me.da.InsertCommand.Parameters("@código").Value = Integer.Parse(Me.Cod_Cliente.Text)
Me.da.InsertCommand.Parameters("@persona").Value = Me.tipoPersona.SelectedValue
Me.da.InsertCommand.Parameters("@limiteCredito").Value = Integer.Parse(Me.LimiteCredito.Text)
Me.da.InsertCommand.Parameters("@tipoDoc").Value = Me.tipoDNICF.SelectedValue
Me.da.InsertCommand.Parameters("@documento").Value = Me.DniCF.Text
Me.da.InsertCommand.Parameters("@nombre").Value = Me.NombreCF.Text
Me.da.InsertCommand.Parameters("@apellido").Value = Me.ApellidoCF.Text
Me.da.InsertCommand.Parameters("@pri_telefono").Value = Me.Telefono1CF.Text
Me.da.InsertCommand.Parameters("@email").Value = Me.mail.Text
Me.da.InsertCommand.Parameters("@provincia").Value = Me.ProvCF.SelectedValue
Me.da.InsertCommand.Parameters("@descripcionLocalidad").Value = Me.LocalidadCF.Text
Me.da.InsertCommand.Parameters("@descripcionBarrio").Value = Me.BarrioCF.Text
Me.da.InsertCommand.Parameters("@departamento").Value = Me.DeptoCF.Text
Me.da.InsertCommand.Parameters("@piso").Value = Me.pisoCF.Text
Me.da.InsertCommand.Parameters("@torre").Value = Me.torreCF.Text
Me.da.InsertCommand.Parameters("@descripcionCalle").Value = Me.CalleCF.Text
Me.da.InsertCommand.Parameters("@numero").Value = Integer.Parse(Me.Nro_calleCF.Text)
Me.da.InsertCommand.Parameters("@observaciones").Value = Me.observacionCF.Text
Me.da.InsertCommand.Parameters("@condicionIVA").Value = Me.CondIva.SelectedValue
Try
Me.da.InsertCommand.Connection = conexionFJ
Me.da.InsertCommand.ExecuteNonQuery()
MsgBox("Se Registro el Cliente con xito", MsgBoxStyle.Information)
Me.conexionFJ.Close()
Catch ex As Exception
Dim mensaje As String
mensaje = ex.Message
MsgBox(mensaje)
End Try
End If

Respuesta
1

El error es que esa columna no existe con ese nombre en la tabla donde pretendes grabarlo, revisa la estructura de la tabla en la base de datos, es posible que el nombre este errado en tu programa.

muchas gracias por la respuesta anterior.quiero hacer un insert este es mi form y mi fragmento de base de datos. lo he intentado hacer pero solo registra en la tabla clientes.necesito nuevamente tu ayuda desde ya gracias

¿

? No entendi

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

¿Qué es mejor validar con CHECK en sql o desde el servidor backend?

Estoy buscando la forma de validar los datos pero utilizando menos código del lado del servidor para validar ejemplo nombre, apellido, etc a la hora de ingresar en una tabla. Quisiera usar el check para atrapar ese error en una excepción y mostrarlo...
1 respuesta

Desactivar un Button al entrar a un formulario en VB.NET

Después de mucho tiempo, he retomado la programación, ahora en vb.net, como hobby, pues estoy jubilado. Os agradecería vuestra ayuda. Tengo un atasco en esta parte del formulario y es que estoy tratando de desactivar un Button al entrar en un...
2 respuestas

¿Diferencia entre NET 4.8 y net CORE 8?

Tío buenas tardes, quisiera saber que diferencia existe entre estos frameworks, o son lo mismo. La verdad estoy confundido porque han salido muchas versiones y ostias se presta a a confusión.
2 respuestas

Inconveniente con la ejecución de desarrollo C# .Net con Sql server

Deseo preguntarles lo siguiente: Agradezco si por favor me pueden colaborar con lo siguiente, en el siguiente video: https://www.youtube.com/watch?v=rE94WFmz29g&t=211s el autor nos ofrece una aplicación desarrollada en C# .Net con Sql server yo estoy...
2 respuestas

Marcar un CheckBox de un DataGridView VB.Net

Disculpa la molestia, pero tengo una consulta y me gustaría poder contar con tu colaboración: Ocurre lo siguiente... En tiempo de ejecución creo una columna de tipo checkbox para mi DataGrid, el cual ademas le agrego ciertos datos de una bd... Mi...
2 respuestas

Mostrar Imagen en un Picturebox desde TextBox

Tengo una carpeta donde guardo fotografías estas tienen la siguiente forma numerodeidentifiacion la extensión .jpg. Ej: 181340898.jpg Lo que quiero hacer es que cuando digite solo el numero de identifiacion en un texbox y al hacer enter me muestre su...
1 respuesta

¿En cuál capa debería manejarles las transacciones?

Ya tengo un tiempecito programando en c#, soy estudiante universitario, y quisiera saber si esta en tus posibilidades, es en que capa debería manejar mis transacciones, en capa de acceso datos, o en la capa negocios(lógica), pues según he leído e...
2 respuestas

Visual Studio - Proyecto vs Varios Proyectos

Estamos trabajando con VS 2010, realizando un trabajo con un amigo y se nos planteo la diferencia de hacer el trabajo TODO dentro de un solo proyecto o bien varios proyectos dentro de una solución. Como primer diferencia, al generar la solución...
4 respuestas

¿Cómo generar un ID personalizado en Visual Studio (visual Basic ) y SQL Server?

¿Cómo sería una función que me genere un ID personalizado? Ejemplo: En una tabla que se llame Servicios, con los campos ; Id_Servicio Dsc_Servicio S-00001 Oftalmología S-00002 Cirugía Que cada vez que requiera almacenar un servicio nuevo, me genere...
1 respuesta

Como utilizar comando timer en vb.net 2017

Estoy tratando de utilizar un comando timer en visual studio 2017 para hacer lo siguiente: Al cargar el formulario1. Vb me aparezca el textbox1.text en medio segundo seguido a la carga, y luego medio segundo después me aparezca el textbox2.text...
1 respuesta