Cita:
Iniciado por Lalybs 
Hola, me encuentro trabajando con un sist de videoclub y no se como manejar en tema de los alquileres para cual me requieren usar una etiqueta de pelicula y sus ejemplares.. hice algo así:
For i = 1 To numeroejemplares
SQL = "Select * from Ejemplares"
rs.Open SQL, con, adOpenKeyset, adLockOptimistic, adCmdText
rs.AddNew
rs!IdPelicula = Text1.Text
rs!IdEjemplar = i
rs!IdEstado = 2
rs!Etiqueta = Text1.Text & "-" & i
rs.Update
rs.Close
Next
pero no me los esta guardando en la tabla .. por favor necesito ayuda, desd ya muchas gracias!
Hola,
¿No dá ningún error, simplemente no guarda los datos?
Fíjate (aunque esto no tiene que ver) que estás abriendo y cerrando continuamente el recordset dentro del bucle, sería mas correcto así:
Código:
sql = "Select * from Ejemplares"
rs.Open sql, con, adOpenKeyset, adLockOptimistic, adCmdText
For i = 1 To numeroejemplares
rs.AddNew
rs!IdPelicula = Text1.Text
rs!IdEjemplar = i
rs!IdEstado = 2
rs!Etiqueta = Text1.Text & "-" & i
rs.Update
Next
rs.Close
