Visual Basic 6 - Salvare i File

Forum - Visual Basic 6 - Salvare i File

Roberto VB (Member)
Expert

Messaggi: 419
Iscritto: 29/01/2007

Postato alle 16:48
Mercoledì, 21/03/2007

Recentemente Avevo creato tipo un blocco note, solo che non riesco a far salvare il file. Come mai?Vi posto anche il codice che ho usato.

Dim nome As String, nome1
nome1 = Trim(InputBox("Nome file:"))
                If nome1 <> "" Then
                   nome = App.Path & "\" & Trim(nome1) & ".txt"

                Else
                   Exit Sub
                End If
End Sub

()
Newbie

Messaggi:
Iscritto:

Postato alle 19:36
Mercoledì, 21/03/2007

In che senso non riesci a salvarlo?

Se spieghi più in dettagli in che modo, vorresti che avenisse il Salvataggio, riportalo.. :k:

c.ronaldo (Normal User)
Expert

Messaggi: 577
Iscritto: 01/02/2007

Postato alle 7:35
Giovedì, 22/03/2007

In questo modo a me sembra che tu indichi solo il nome, ma poi devi fare open tuofile.txt for random(o qualunque cosa)as #1
print #1,testo.text...
Posta se hai problemi! :k:

Ultima modifica effettuata da c.ronaldo il 22/03/2007 alle 7:36

Roberto VB (Member)
Expert

Messaggi: 419
Iscritto: 29/01/2007

Postato alle 7:39
Giovedì, 22/03/2007

Volevo che il file venisse salvato in una cartella nel formato text.
Ho provato a cercare qualcosa su internet, ma trovo sempre codici diversi che non vanno
Non so se sono stato chiaro 8-|

Ultima modifica effettuata da Roberto VB il 22/03/2007 alle 7:41

c.ronaldo (Normal User)
Expert

Messaggi: 577
Iscritto: 01/02/2007

Postato alle 7:44
Giovedì, 22/03/2007

Prova a fare come ti ho detto sopra! :k:

()
Newbie

Messaggi:
Iscritto:

Postato alle 9:59
Giovedì, 22/03/2007

ho capito che vorresti salvarlo come *.TXT

in che modo, stai realizzando il tuo Progettino Blocco Note?

in questo: nel Form, un TextBox, con un APRI File in formato TXT e un salva file?

In questo modo Semplice?

Roberto VB (Member)
Expert

Messaggi: 419
Iscritto: 29/01/2007

Postato alle 14:46
Giovedì, 22/03/2007

Diciamo di si, prima chiaramente devo risolvere questo problemino per renderlo leggermente più complesso

()
Newbie

Messaggi:
Iscritto:

Postato alle 16:40
Giovedì, 22/03/2007

durante il salvataggio come un Txt

Open App.Path & "\testo.txt" For Output As #1
Print #1, Text1.Text
Close #1

dove ovviamente il text1.Text é in componente con all'interno del TESTO ;-)

o per salvarlo vuoi utilizzare un Common Dialog ?

C'è anche un altro metodo, nel salvarlo con un altro tipo di estensione. Ma dipende quello che vorresti fare.

Ho lavorato tempo fa sul progetto di un Blocco Note ;-)

Ultima modifica effettuata da il 22/03/2007 alle 16:41