Ingresar datos Booleanos en uuna basa de datos Acces
Publicado por Alberto Domingo (9 intervenciones) el 28/06/2017 05:38:50
TEngo un campo booleano y al querer guardarlo en la base de datos Acces, probe de varias formas pero me da un error de sintaxis en la secuencia SQL
Copio alguna parte del código para ver si me pueden ayudar:
.
.
.
'Este es el campo booleano
If inGeneral.Checked = True Then
PilNvaFila("GENERAL") = -1
Else
PilNvaFila("GENERAL") = 0
End If
SQLPil = "INSERT INTO PILOTOS(NUMERO, PILOTO, COPILOTO, AUTO, AÑO, CATEGORIA, NACION,
CATEGORIAHB, "
SQLPil = SQLPil + "GENERAL, CATEGORIAOV) "
SQLPil = SQLPil + "VALUES (@Num, @Pil, @Cop, @Aut, @Año, @Cat, @Nac, @CatHB, @Gen, @CaOV)"
dsPil.Tables("tbPil").Rows.Add(PilNvaFila)
PilTableadapter.InsertCommand = New OleDbCommand
PilTableadapter.InsertCommand.CommandText = SQLPil
PilTableadapter.InsertCommand.Connection = miConexion
PilTableadapter.InsertCommand.Parameters.Add("@Num", OleDbType.Double, 0, "NUMERO")
PilTableadapter.InsertCommand.Parameters.Add("@Pil", OleDbType.VarChar, 35, "PILOTO")
.
.
.
PilTableadapter.InsertCommand.Parameters.Add("@Gen", OleDbType.Boolean, 0, "GENERAL")
.
.
.
PilTableadapter.Update(dsPil.Tables("tbPil"))
Aquí me da el error: Error de sintaxis en la instrucción INSERT INTO.
Copio alguna parte del código para ver si me pueden ayudar:
.
.
.
'Este es el campo booleano
If inGeneral.Checked = True Then
PilNvaFila("GENERAL") = -1
Else
PilNvaFila("GENERAL") = 0
End If
SQLPil = "INSERT INTO PILOTOS(NUMERO, PILOTO, COPILOTO, AUTO, AÑO, CATEGORIA, NACION,
CATEGORIAHB, "
SQLPil = SQLPil + "GENERAL, CATEGORIAOV) "
SQLPil = SQLPil + "VALUES (@Num, @Pil, @Cop, @Aut, @Año, @Cat, @Nac, @CatHB, @Gen, @CaOV)"
dsPil.Tables("tbPil").Rows.Add(PilNvaFila)
PilTableadapter.InsertCommand = New OleDbCommand
PilTableadapter.InsertCommand.CommandText = SQLPil
PilTableadapter.InsertCommand.Connection = miConexion
PilTableadapter.InsertCommand.Parameters.Add("@Num", OleDbType.Double, 0, "NUMERO")
PilTableadapter.InsertCommand.Parameters.Add("@Pil", OleDbType.VarChar, 35, "PILOTO")
.
.
.
PilTableadapter.InsertCommand.Parameters.Add("@Gen", OleDbType.Boolean, 0, "GENERAL")
.
.
.
PilTableadapter.Update(dsPil.Tables("tbPil"))
Aquí me da el error: Error de sintaxis en la instrucción INSERT INTO.
Valora esta pregunta
0