Salvare e Aprire con la commondiaolog!

[Pinco Pallino 2]

Ecco il mio nuovo problema|!
Io ho una fattura tutta tempestata da textbox vorrei usando il commondialog riuscire ad aprire e salvare le fatture da me compilate. Inoltre vorrei che il file creato avesse estensione personalizata (*.ftr)...Ho letto un tutorial sul salvataggio di file di testo..ma io nn lo voglio di testo e poi vorrei le interfaccie tipike di WINDOWS sia di "apri file" che di "salva con nome"...che son quelle della commondialog...
NB:nn voglio salvare la fattura vera e propria, quella è contenuta in una picturebox che si vede quando apro il mio software di fatturazione. Io voglio solo che se compilo una fattura e la salvo e dopo un mese vado a riaprirla essa sia compilata come l'ho salvata!!!
GRAZIEEE!!!
Potete aiutarmi?!?

[ans]

La commondialog non serve per aprire e salvare file ma per selezionare il file da aprire/salvare, ma il codice te lo devi scrivere te in base a come vuoi salvare i dati.

[Pinco Pallino 2]

e in base a come ho scritto su come devo fare?

[codo82]

con la common selezioni il file sul quale salvare, e dovrebbe essere su commondialog1.file o qualcosa di simile, ora non ricordo e non ho VB tra le mani, poi fai così:

Per salvare:

Open commondialog1.file for output as 1
print#1, text1.text
print#1, text2.text
....e così via fino a che non hai salvato tutte le text
Close 1

Mentre per aprire:

Open commondialog1.file for input as 1
input#1, text1.text
input#1, text2.text
....e così via per tutte le text
Close1

Dove commondialog1 è la common dialog e text1 e text2 sono le textbox

[Pinco Pallino 2]

mi da errore su

text1.text...

dice ke è neccessaria una variabile...

[codo82]

dopo l'input?

se si allora fai così:
dichiari una variabile a come stringa all'inizio della sub e poi

input#1, a
text1.text=a
input#1, a
text2.text=a

[Pinco Pallino 2]

ok! ora mi da errore su

close1

mi dice sub o funzione nn definita!

[Pinco Pallino 2]

come non detto dovevo metter lo spazio tra
close e 1!

[Pinco Pallino 2]

ADesso nn per fare il rompiscatole....

Essendo che nel mio form ci sono una cosa come 50 textbox da salvare...oltre che appensantire il codice a usare il metodo
#input e #print x ognuna sarebbe da parte mia un intreccio mentale nn irrilevante.....mi kiedevo...esiste una funzione...o un comando che dica: "#print tutte le textbox" e un altro che dica "#input tutte le textbox" ?!?

Spero di aver reso l'idea!
CIAO!

[codo82]

Per salvarle puoi utilizzare:

For Each Control In Form1
If TypeOf Control Is TextBox Then  print#1, Control.Text
Next

Mentre per aprirle:

For Each Control In Form1
If TypeOf Control Is TextBox Then  
input#1, a
Control.Text=a
Next

Dovrebbe andare, però non so in quale ordine le prende le varie textbox