04/12/2008, 12:50
|
| | | Fecha de Ingreso: diciembre-2008 Ubicación: Gral. Roca - Río Negro
Mensajes: 34
Antigüedad: 15 años, 5 meses Puntos: 1 | |
 Crear código para ejemplares
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! |