error de sintaxis en la instrucción INSERT INTO
Publicado por Pokol (10 intervenciones) el 08/10/2003 01:26:32
Ese es el error que me entrega con el siguiente grupo de instrucciones....
For i = 0 To ListView2.Items.Count - 1
lwItem = ListView2.Items(i)
fila = CType(ListView2.Items(i).Tag, Data.DataRow)
fila.BeginEdit()
j = 0
For Each columna In dbDataSet.Tables(NombreTabla).Columns
If j = 0 Then
If columna.AutoIncrement = False Then
fila(j) = lwItem.Text
End If
Else
If columna.AutoIncrement = False Then
fila(columna.ColumnName) = lwItem.SubItems(j).Text
End If
End If
j += 1
Next
fila.EndEdit()
Next
dbDataAdapter.Update(dbDataSet, NombreTabla)
For i = 0 To ListView2.Items.Count - 1
lwItem = ListView2.Items(i)
fila = CType(ListView2.Items(i).Tag, Data.DataRow)
fila.BeginEdit()
j = 0
For Each columna In dbDataSet.Tables(NombreTabla).Columns
If j = 0 Then
If columna.AutoIncrement = False Then
fila(j) = lwItem.Text
End If
Else
If columna.AutoIncrement = False Then
fila(columna.ColumnName) = lwItem.SubItems(j).Text
End If
End If
j += 1
Next
fila.EndEdit()
Next
dbDataAdapter.Update(dbDataSet, NombreTabla)
Valora esta pregunta


0