[vb6] aprire file di testo

[giano118]

Public Sub StampaDatabaseCartaceo()
    
    'Output permessi di scrittura e lettura    
    Dim Path, FileOut As String
    intfile = FreeFile
    FileOutput = "RestituzioneCartaceo.txt"
    Path = App.Path + "\" + "restituzione_file" + "\" + FileInput
    Open Path For Output As #intfile
'qui è appena avvenuta l'apertura sul primo processo libero (intfile=Freefile)

qui il tuo codice
............
...........
...........
end Sub

Originariamente inviato da Alessandro2110
ciao ragazzi,

dovrei aprire il contenuto di un file txt, in una textbox con il comando commondialog1.ShowOpen

qualcuno sa come fare?

grazie..
ciao