[VB6] Salvataggio condizionato di un file

[dypster]

salve ... ho un problema .. spero mi possiate aiutare ..

allora.. io doveri salvare un file .. e fini qui tutto apposto .. perkè il file me lo salva .. però c'e un problema .. quando riapro l'inputbox per risalvare il file .. e lo rikiudo senzsa aver scritto niente .. cliccando sulla x o facendo annulla .. mi salva lo stesso il file .. però mi salva il text dell'inputbox cioe il file .. ma vuoto .. come devo risolvere questo problema ..
questo è il codice ...

Open App.Path & "\stringa.txt" For Input As #1
Input #1, stringa
Close #1
Open App.Path & "\stringa.txt" For Output As #1
Print #1, InputBox$("Nick Corrente= " & stringa & "      Nuova Stringa?", "Applicazione")
Close #1

spero di essermi spiegato .. grz

[kalosjo]

Dovresti fare così:

 
Open App.Path & "\stringa.txt" For Input As #1
Input #1, stringa
Close #1
Dim Testo as String 
Testo = InputBox$("Nick Corrente= " & stringa & "      Nuova Stringa?", "Applicazione")

if Testo<>"" then
  Open App.Path & "\stringa.txt" For Output As #1
  Print #1, InputBox$("Nick Corrente= " & stringa & "      Nuova Stringa?", "Applicazione")
  Close #1
End if

[dypster]

Ho provato con il tuo codice .. ma niente .. io praticamente dovrei far in modo che se premo annulla o la x per chiudere l'inputbox non si salvi niente ....


Come devo fare

[LMondi]

Ciao,

se premo annulla o la x per chiudere l'inputbox non si salvi niente ....

Dovresti semplicemente usare Exit Sub

[alka]

Originariamente inviato da dypster
salve ... ho un problema .. spero mi possiate aiutare ..
allora.. io doveri salvare un file .. e fini qui tutto apposto .. perkè il file me lo salva .. però c'e un problema .. quando riapro l'inputbox per risalvare il file .. e lo rikiudo senzsa aver scritto niente .. cliccando sulla x o facendo annulla .. mi salva lo stesso il file .. però mi salva il text dell'inputbox cioe il file .. ma vuoto .. come devo risolvere questo problema ..

Ti suggerisco di evitare le abbreviazioni (che rendono difficile la ricerca) e di controllare la correttezza formale di quanto scrivi... si fa una fatica tremenda a comprendere la frase con tutte queste abbreviazioni, che non sono nemmeno utili visto che non si sta colloquiando attraverso degli SMS.

Ciao!