Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - zhidow

#1
Ola.. Necesitaria que alguien que realmente sepa, me ayudara  exportar Desde Un data grid a excel con vb 6.0 (Por las dudas), sin formato ni nada , De antemano Muchisimas Gracias.
#2
Programación Visual Basic / Re: Timer Grande
18 Febrero 2006, 19:14 PM
SI disculpa aparte del codigo que si creas una variable tipo LONG, y le pones
dim Tiempos as long
(dentro del timer)
tiempos = tiempos + 60000

cada vez que llega al timer y no se cumple el tiempo le agrega 60000 ( 1 Minuto más) asi hasta llegar a los minutos que le pusiste..
#3
Por favor expresate mejor, queres validar los datos, que ya estan en la DB o otra cosa, validar los datos (Ej que sea un email y no metan cualquier verdura)..
#4
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
#5
 :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 .
#6
Programación Visual Basic / Re: Timer Grande
2 Febrero 2006, 00:28 AM
Haciendo un programa (soy novato) me tope con el mismo problema ,  :p despues de pensar un rato , probe poniendo dentro del Sub timer. una condicion que diga,
if (tiempo que tengo que esperar) = ( tiempo que necesito) then
''hacer la rutina
else
timer.enabled = false
timer.enabled = true
''asi comieza el conteo de nuevo
end sub