Problema al grabar la grilla
Publicado por Pinky (110 intervenciones) el 16/03/2011 02:18:24
Hola amigos del foro ojala que me puedan ayudar con este problema ya solucione lo anterior y me trae bien los datos de la tabla Presupuesto1, pero al momento de grabar los mismos datos traidos con anterioridad y grabarlos en la tabla Orden_Trabajo1 me da este error "Incorrect syntax near 'Orden_Trabajo1'.", no se en donde esta el error por eso posteo el código que estoy utilizando.
Dim ds As DataSet
ds = Session("tabla")
Dim builder As SqlCommandBuilder
builder = Session("cmd")
Dim sqladd As New SqlCommand
sqladd = builder.GetInsertCommand()
sqladd.Connection = conn
Dim sqlmod As New SqlCommand
sqlmod.Connection = conn
Dim sqldel As New SqlCommand
sqldel.Connection = conn
sqladd.CommandText = "insert into Orden_Trabajo1"
Dim contador As Integer = 0
MsgBox(sqladd.CommandText)
'sqladd.CommandText = "insert into Orden_Trabajo1 (N_Filas,Mano_Mobra, " _
'+ " Valor_Mobra,Patente_Vehiculo,Activo) values (p1,p2,p3,p4,p5)"
Try
sqldel.CommandText = "delete from Orden_Trabajo1 where (Patente_Vehiculo='" _
+ ds.Tables("Grilla").Rows(0).Item("Patente_Vehiculo").ToString.Trim + "')"
sqldel.ExecuteNonQuery()
Catch ex As Exception
MsgBox(sqldel.CommandText)
MsgBox("error en formatear los datos")
End Try
For Each fila As DataRow In ds.Tables("Grilla").Rows
If Not fila.RowState = DataRowState.Deleted Then
sqladd.Parameters(0).Value = fila("N_Filas")
sqladd.Parameters(1).Value = fila("Mano_Mobra")
sqladd.Parameters(2).Value = fila("Valor_Mobra")
sqladd.Parameters(3).Value = fila("Patente_Vehiculo")
sqladd.Parameters(4).Value = fila("Activo")
sqladd.ExecuteNonQuery()
End If
Next
hago mencion que forzo en la linea sqladd.CommandText = "insert into Orden_Trabajo1" que me grabe en esta tabla por que si nolo hago me repuite los datos y me los graba en la tabla presupuesto1, la cual no se debe hacer, desde ya muchas gracias.
Dim ds As DataSet
ds = Session("tabla")
Dim builder As SqlCommandBuilder
builder = Session("cmd")
Dim sqladd As New SqlCommand
sqladd = builder.GetInsertCommand()
sqladd.Connection = conn
Dim sqlmod As New SqlCommand
sqlmod.Connection = conn
Dim sqldel As New SqlCommand
sqldel.Connection = conn
sqladd.CommandText = "insert into Orden_Trabajo1"
Dim contador As Integer = 0
MsgBox(sqladd.CommandText)
'sqladd.CommandText = "insert into Orden_Trabajo1 (N_Filas,Mano_Mobra, " _
'+ " Valor_Mobra,Patente_Vehiculo,Activo) values (p1,p2,p3,p4,p5)"
Try
sqldel.CommandText = "delete from Orden_Trabajo1 where (Patente_Vehiculo='" _
+ ds.Tables("Grilla").Rows(0).Item("Patente_Vehiculo").ToString.Trim + "')"
sqldel.ExecuteNonQuery()
Catch ex As Exception
MsgBox(sqldel.CommandText)
MsgBox("error en formatear los datos")
End Try
For Each fila As DataRow In ds.Tables("Grilla").Rows
If Not fila.RowState = DataRowState.Deleted Then
sqladd.Parameters(0).Value = fila("N_Filas")
sqladd.Parameters(1).Value = fila("Mano_Mobra")
sqladd.Parameters(2).Value = fila("Valor_Mobra")
sqladd.Parameters(3).Value = fila("Patente_Vehiculo")
sqladd.Parameters(4).Value = fila("Activo")
sqladd.ExecuteNonQuery()
End If
Next
hago mencion que forzo en la linea sqladd.CommandText = "insert into Orden_Trabajo1" que me grabe en esta tabla por que si nolo hago me repuite los datos y me los graba en la tabla presupuesto1, la cual no se debe hacer, desde ya muchas gracias.
Valora esta pregunta


0