hakuario

Para poder recorrer recordset's te serviría lo siguiente: ' Después del open a rst if not rst.eof then rst.movefirst while not rst.eof 'código sobre lo que deseas hacer rst.movenext loop end if

Podrías usar lo siguiente: Printer. Print "Hola a todos! 1" Printer. Print "Hola a todos! 2" Printer. EndDoc Para mas detalle visita este link: http://www.elguruprogramador.com.ar/articulos/imprimiendo-texto-en-visual-basic.htm

Podrías remitirme tu aplicativo, lo revisaría por la noche. [email protected]

Podrías compartir mas código y especificar la linea donde te da el error.

Te serviría esto: http://www.forosdelweb.com/f69/listar-archivos-directorio-371701/

Podrías intentar esto. .CommandText = "select * from CANVIS WHERE aprovat = 'SI' And agent1 = '" & usuari & "' or agent2 = '" & usuari & "' " .

Estimado te comento que no trabajo con access, yo trabajo en vb6. Lo que seria en vb6, la propiedad locked, solo evita que se ipueda digitar, puedes ubicar el cursor dentro del control pero no permite digitar anda.. lo idóneo seria que uses la...

De antemano te comento que no trabajo en formularios de acces, aunque si en vb6. Lo que buscas, en vb6, seria la propiedad tabindex de los controles, en este caso Al pulsar la tecla tab seguirá el orden dispuesto de menor a mayor.

En lo personal también intente hacer algo similar, pero no pude perfeccionarlo, aun necesitaba mejoras. Te comentare lo que use en mi caso. Investiga sobre esto GetForegroundWindow SetForegroundWindow SendKeys Investiga y usa la combinación de esas...

Reciclando tu código anterior, intenta esto. Dim tbtexto As String Dim VarTexto As String 'Para leer Open App.Path + "\movi.txt" For Input As #1 'Para Escribir Open App.Path + "\movi2.txt" For Output As #2 Do Until EOF(1) Line Input #1, VarTexto if...