[ Foro de SQL (y MySQL) ]

Como pasar todos los datos del listbox a una tabla

16-Jan-2019 01:50
Nicolas Martinez
0 Respuestas

Hola saludos a todos ¿alguien puede proporcionar un codigo que como menciona el encabezado pase todos los datos del listbox a una tabla? use este codigo:
Sql = "select * from [productos]"

Rs.Open Sql, Cnn, 1, 1

i = 0

With Lista
AddNew
Do While Rs.EOF = False
Rs.MoveFirst
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.MoveNext

Loop pero me da un error,no uso inser into por que lo que deseo es insertar un conjunto de datos que esta en el listbox a una tabla,gracias  de antemano




(No se puede continuar esta discusión porque tiene más de dos meses de antigüedad. Si tienes dudas parecidas, abre un nuevo hilo.)