[VB6] Salvataggio dati su file esterno

[karl93]

Non ci sono riuscito! Ho scritto così:

Private Sub mnuSalva_Click() 
rec = Text6.Text 
Open (App.Path & "/time.txt") For Output As #1 
Print #1, Replace(rec, ",", ".") 
Close #1 
End Sub

Private Sub Form_Load()
  Open (App.Path & "/time.txt") For Input As #1 
Input #1, Replace(rec, ".", ",") 
Text5.Text = rec 
Close #1  
End Sub

Così è errato, perchè già vb6 mi visualizza l'errore: "Errore di compilazione. Riachiesta variabile."

Cosa devo fare?