[VB6] Aggiornare informazioni in un file di testo

[socialux]

Ho un file ad accesso sequenziale (numtel.txt) dove in ogni riga ho delle informazioni del tipo :
nome*numero telefonico*credito*gestore telefonico

in un menù ho la possibilità di effettuare una ricarica su un numero dato in input.quindi dopo aver cercato il numero all'interno del file ,come faccio ad aggiornare il valore del credito dopo la ricarica? da quanto so devo creare un nuovo file..ma in che modo? poi devo far sì che il nome del file nuovo creato sia uguale a quello vecchio,senò mi sballano tutte le altre opzioni del menù.ad esempio se scelgo "visualizza credito" lui mi apre il file con nome vecchio e non quello col valore aggiornato.spero di essere stata piu o meno chiara.grazie.

[oregon]

Devi

1) aprire il vecchio file in lettura
2) aprire un nuovo file (con un nome diverso) in scrittura
3) leggere dal vecchio file i dati e aggiornare quelli che vuoi
4) riscrivere i dati letti (aggiornati o meno) nel nuovo file
5) alla fine, chiudere entrambi i file
6) cancellare il vecchio file
7) rinominare il nuovo file, dando a questo il nome del vecchio

[socialux]

ho fatto una cosa del genere :

num_intr = InputBox("Inserisci il numero telefonico su cui vuoi effettuare la ricarica")
Open App.Path & "\numtel.txt" For Input As #1
Open App.Path & "\numtel1.txt" For Output As #3
Do While Not EOF(1)
Line Input #1, stringa
Call spezza
If (num = num_intr) Then
trov = True
ricarica = InputBox("Inserisci il valore della
ricarica")

cred = Val(cred) + Val(ricarica)
cred = CStr(cred)
stringa = cog & "*" & num & "*" & cred & "*" & ges
Print #3, stringa
Else
Print #3, stringa
End If
Loop
Close #1
Close #3
If trov = False Then
MsgBox ("Numero non presente ")
End If

non lo so se è giusto,ho provato...comunque sia mi manca il tuo punto 6 e 7..problema!

[socialux]

ho fatto tutto! grazie comunque.