Título: Duplicar registros filtrados con ADO Publicado por: zhidow en 15 Febrero 2006, 01:46 am :P Ola necesitaria saber como Duplicar registros filtrados Con ADo. Intente usando un Vector dinamico
Dim i as Integer with db.recordset if not .bof then .movefirst For i = 1 to .recordcount (Cantidad de Registros Filtrados) Codigo(i) = !Codigo Producto(i) = !Producto .movenext next i end with Bueno es algo asi lo que hice pero el problema es que me dice , "el sub Indice esta fuera del intervalo" :( Agradeceria mucho su ayuda . Título: Re: Duplicar registros filtrados con ADO Publicado por: zhidow en 16 Febrero 2006, 01:40 am Gracias, Pero sha enconte la forma, Creando un vector y un Reg definido por el usuario
TYPE T_DB CODIGO () AS STRING PRODUCTO () AS STRING PAGINA () AS INTEGER .... END TYPE PUBLIC BASE() AS T_DB Y ANTES DE EMPEZAR A CONTAR, CUANDO SE CUANTOS REGISTROS TENGO DESPUES DE FILTRARLOS , REDIMENSIONO EL VECTOR REDIM BASE (0 TO DB.RECORDSET.RECORDCOUNT) ------------ DESPUES DE TANTO ESO ERA TODO |