Archivo de Texto

[kpeando]

ya lo hice

linea = lector.ReadFields()
For Each campo In linea
If bandera = 1 Then
paso = campo
bandera = 2
ElseIf bandera = 2 Then
Dim variable As String = "INSERT INTO pre_inventario(codigo,cantidad)VALUES('" + paso + "'," + campo + ")"
Dim insertar As New OleDbCommand(variable, cnn)
cnn.Open()
insertar.ExecuteNonQuery()
cnn.Close()
bandera = 1
End If