archivos en visual basic 6.0

[melielectra]

Holas

primero queria agradecer la ayuda en otros post 

bueno mi problema es que ncesito pasar la informacion de un archivo2 a un archivo1 y me he dado cuenta y por lo que he leido no se pueden tener 2 archivos abiertos



hay alguna magia truco que se pueda hacer para ver esto??

[Snort]

 Abres el archivo 2, almacenas los datos en una variable o en un trextbox o donde sea, cierras el archivo 2, abres el archivo uno y lo pegas todo.

PD: Di de qe tipo de archivos se trata y asi podemos especificar. doc? txt? jpg? exe?

SaludoS

[~~]

COmo q no se pueden tener dos archivos aviertos? usando distintos canales no?? #1 #2...

[melielectra]

mmm, nops lo probe y con dos canales no pude, mmm hice un puente guarde los datos en otra variable array y luego los copie en el archivo destino.

gracias por sus respuestas 

[Zeroql]

open archivo.txt for ramdon as #1
variable= archivo.txt
close #1
open archivo2.txt for ramdon as #2
archivo2.txt= variable
close #2


lo mejor es uses un tipo (TYPE) para especificar los rangos de los caracteres que has guardado


type arc
vari1 as string*1000
en type
variable2 as arc

[Gorky]

Si se pueden abrir dos archivos al mismo tiempo. Lo que no se puede es abrir un mismo archivo dos veces.

[melielectra]

lo que pasa es que yo estoy usando el visual basic 6.0
y no puedo abrir dos archivos a la vez 

y pido el numero con freefile

[melielectra]

AUTORESPUESTA

bueno, ya nose pq el freefile me traia problemas le asigne numeros yo y todo ok

gracias por su ayuda

[erbuson]

Hola:
Se que tienes el problema solucionado, pero creo adivinar porque tienes el problema con Freefile, te lo comento porque de ser así puedas utilizarlo sin problemas.
Imagino (porque no expones tu código) que tenias algo similar a esto:
Uno = Freefile
Dos = Freefile
Open #Uno for .....
Open #Dos for .....
....

Si es así, este es el problema, puesto que Freefile te devuelve en ambos casos el mismo número de archivo, la manera correcta es:

Uno = Freefile
Open #Uno for .....
Dos = Freefile
Open #Dos for .....
....

Si no es así disculpa mi error y mi atrevimiento.

Un saludo
Joan