Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: zhidow en 15 Febrero 2006, 01:46 am



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