Visual Basic 6 - Operazioni sui file

Quando compilo il prog. mi da errore e mi dice:

variable required - can't assign to this expression

e mi evidenzia dati al pezzo:

... 1 len = len ( dati)

scusa nn ricordavo bene...

Dim dati As String * 1024
il resto è giusto

l' ho provato funge

Ora nn mi da + errore, ma nn mi funge...
quando vado ad aprire atr.txt al posto di trovarmi il codice dell'eseguibile cioè tutti quei simboli strani, trovo soltanto una riga piena di spazi...
ecco come ho scritto il codice:

Dim dati As String * 1024
Private Sub Command1_Click()
Open App.Path & "\ab.exe" For Random As 1 Len = Len(dati)
Do While Not EOF(1)
Get 1, , dati
Loop
Close [b]*[/b]

Open App.Path & "\atr.txt" For Output As #1
Print #1, dati
Close #1

* ho fatto 2 prove in 1 ho lasciato close nell'altra avevo messo close 1 cmq nessuna delle 2 ha funzionato...

si aprire i file in random è diverso che in output o input
il brutto del random poi è che nn puoi aprire il file a righe ma a caratteri infatti diti as string *1024 preleva un Kb alla volta

in pratica il 2° file devi aprirlo così
open xcorso for random as 1 len=len(dati)
put 1,,dati
close

ps se metti close #1 ti chide solo il file 1 se invece metti solo close chiude tutti i file aperti

se ti va possiamo discuterne su messenger?

Ok, vojo capire bene come funge questa funzione random, ma adesso ho un pò di sonno, poi proverò il tuo codice...

p.s. Ho provato il tuo codice ma nel doc. atr.txt c sn sempre e solo spazi e basta...