12/05/2011, 16:13
|
| | Fecha de Ingreso: noviembre-2010 Ubicación: madrid
Mensajes: 478
Antigüedad: 14 años Puntos: 5 | |
Respuesta: update no adminte comas Oye muchas gracias por todo, acabo de terminar el proyecto gracias a tu último aporte, no lo hubiera sacado en la vida no sabía que había que poner comillas simples en los casos de varchar...muy amable pongo el código para quien le pueda ayudar...
Public Sub remplazaProducto()
Try
Dim adapt As New OleDbDataAdapter
Dim setda As New DataSet
Dim com = conexion.CreateCommand
com.CommandType = CommandType.Text
com.CommandText = "UPDATE IntroduccionDeVentasAhora SET Producto = ('" & TextRemplazar.Text & "') where Producto = ('" & TextBuscar.Text & "') and NombreFormaPago <> ('TARJETA CREDITO')and Fecha BETWEEN @FI AND @FF"
com.Parameters.AddWithValue("@FI", Fecha1.Value.Date.ToString("dd/MM/yyyy"))
com.Parameters.AddWithValue("@FF", Fecha2.Value.Date.ToString("dd/MM/yyyy"))
adapt.UpdateCommand = com
conexion.Open()
com.ExecuteScalar()
conexion.Close()
Catch
MessageBox.Show("Compruebe si los datos que ha introducido coínciden al completo con lo esperado")
End Try
End Sub |