Error en modificación
Publicado por Pinky (110 intervenciones) el 23/12/2009 15:42:28
Hola amigos del foro, disculpe que los moleste nuevamente pero soy nuevo en VB.Net, tengo un problema al momento de modificar los datos, a continuación muestro el código que estoy utilizando.
Protected Sub CMDMODIFICAR_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles CMDMODIFICAR.Click
Dim sql2 As New SqlClient.SqlCommand("UPDATE Proveedores set Nombre_Proveedor='" + TXTNOMBRE.Text + "',Direccion_Proveedor='" + TXTDIRECCION.Text + "',Actividad_Proveedor='" + TXTACTIVIDAD.Text + "',Fax_Proveedor='" + TXTFAX.Text + "',Comuna_Proveedor='" + TXTCOMUNA.Text + "',Ciudad_Proveedor='" + TXTCIUDAD.Text + "',Contacto_Proveedor='" + TXTCONTACTO.Text + "',Fono_Proveedor='" + TXTFONO.Text + "',Mail_Proveedor='" + TXTMAIL.Text + "' where Rut_Proveedor = " & TXTRUT.Text, conn)
Try
sql2.ExecuteNonQuery()
MsgBox("Datos modificados satisfactoriamente", MsgBoxStyle.Information, "Sistema")
Catch ex As Exception
MsgBox(ex.Message)
End Try
Nuevo()
End Sub
hago mención que en una sola linea declaro los campos que se pueden modificar, el error esta en el ejecutar la modificación dice lo siguiente "incorrect syntax near'130'", lo otro habrá otra posibilidad de declarar los campos de otra forma y no en una sola linea, favor de ayudarme desde ya muchas gracias.
Protected Sub CMDMODIFICAR_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles CMDMODIFICAR.Click
Dim sql2 As New SqlClient.SqlCommand("UPDATE Proveedores set Nombre_Proveedor='" + TXTNOMBRE.Text + "',Direccion_Proveedor='" + TXTDIRECCION.Text + "',Actividad_Proveedor='" + TXTACTIVIDAD.Text + "',Fax_Proveedor='" + TXTFAX.Text + "',Comuna_Proveedor='" + TXTCOMUNA.Text + "',Ciudad_Proveedor='" + TXTCIUDAD.Text + "',Contacto_Proveedor='" + TXTCONTACTO.Text + "',Fono_Proveedor='" + TXTFONO.Text + "',Mail_Proveedor='" + TXTMAIL.Text + "' where Rut_Proveedor = " & TXTRUT.Text, conn)
Try
sql2.ExecuteNonQuery()
MsgBox("Datos modificados satisfactoriamente", MsgBoxStyle.Information, "Sistema")
Catch ex As Exception
MsgBox(ex.Message)
End Try
Nuevo()
End Sub
hago mención que en una sola linea declaro los campos que se pueden modificar, el error esta en el ejecutar la modificación dice lo siguiente "incorrect syntax near'130'", lo otro habrá otra posibilidad de declarar los campos de otra forma y no en una sola linea, favor de ayudarme desde ya muchas gracias.
Valora esta pregunta


0