como exportar todos los datos de un listbox a una tabla usando SQL
publicado
Saludos a todos me pudieran ayudar con este codigo el cual pretende como menciona el encabezado pasar los datos de listbox a una tabla usando sentencias SQL lo intente de esta manera:
Saludos a todos me pudieran ayudar con este codigo el cual pretende como menciona el encabezado pasar los datos de listbox a una tabla usando sentencias SQL lo intente de esta manera:
ABRIR_RS 'Crea el objeto recordset
Sql = "Select*from [productos$]"
Rs.Open Sql, Cnn, 1, 1
With Lista 'listbox
For i = 0 To .ListCount - 1
Rs.AddNew
Rs!ID = .List(i, 0)
Rs!CODIGO = .List(i, 1)
Rs!ARTICULO = .List(i, 2)
Rs!PVP = .List(i, 3)
Rs!IVA = .List(i, 4)
Rs!MEDIDA = ComboBox1.List(ComboBox1.ListIndex, 0)
Rs!CATEGORIA = ComboBox2.List(ComboBox2.ListIndex, 0)
Rs!STOCK_MINIMO = .List(i, 7)
Rs!ESTATUS = .List(i, 8)
Rs.Update
Next i
End With
CERRAR_RS 'cierra el recordset
si alguno sabe como mejorar el codigo para que funcione se los agradeceria mucho