Base de Datos Visual Studio
Ralvaradot, te hago una consulta sobre este programa que me esta dando un error al momento de agregar una fila a la base de datos...
Public Sub NuevaGestion(ByVal gestion As Integer, ByVal fecha As Date, ByVal nomCli As String, ByVal numCli As String, ByVal observ As String)
Dim DS As New DataSet
COMVEN.Connection = CONECTOR
COMVEN.CommandType = CommandType.TableDirect
COMVEN.CommandText = "Ventas"
ADAPVEN.Fill(DS, "Ventas")
Dim FILA As DataRow
FILA = DS.Tables("Ventas").NewRow
FILA("Gestion") = gestion
FILA("Usuario") = idUsuario
FILA("Fecha de Gestión") = fecha.Date
FILA("Nombre del Cliente") = nomCli
FILA("Número de Línea") = numCli
FILA("Observaciones") = observ
DS.Tables("Ventas").Rows.Add(FILA)
Dim MAGICO As New OleDbCommandBuilder(ADAPVEN)
ADAPVEN.Update(DS, "Ventas")
End Sub
Me da el error "Error de sintaxis en la instrucción INSERT INTO." en la linea ADAPVEN.Update(DS, "Ventas")
Lo he revisado varias veces y no se que es... Busque información en internet y tampoco encuentro.
Desde ya muchas gracias
Public Sub NuevaGestion(ByVal gestion As Integer, ByVal fecha As Date, ByVal nomCli As String, ByVal numCli As String, ByVal observ As String)
Dim DS As New DataSet
COMVEN.Connection = CONECTOR
COMVEN.CommandType = CommandType.TableDirect
COMVEN.CommandText = "Ventas"
ADAPVEN.Fill(DS, "Ventas")
Dim FILA As DataRow
FILA = DS.Tables("Ventas").NewRow
FILA("Gestion") = gestion
FILA("Usuario") = idUsuario
FILA("Fecha de Gestión") = fecha.Date
FILA("Nombre del Cliente") = nomCli
FILA("Número de Línea") = numCli
FILA("Observaciones") = observ
DS.Tables("Ventas").Rows.Add(FILA)
Dim MAGICO As New OleDbCommandBuilder(ADAPVEN)
ADAPVEN.Update(DS, "Ventas")
End Sub
Me da el error "Error de sintaxis en la instrucción INSERT INTO." en la linea ADAPVEN.Update(DS, "Ventas")
Lo he revisado varias veces y no se que es... Busque información en internet y tampoco encuentro.
Desde ya muchas gracias
1 Respuesta
Respuesta de Roberto Alvarado