per selezionare un file da aprire ho utiliazzato questo codice:
_______________________________________
Private Sub cmdbrowser_Click()
On Error Resume Next
With CommonDialog1
.CancelError = True
.FileName = txtfilename
.Filter = "All Files|*.*|Text Files (*.txt)|*.text"
.FilterIndex = 2
.Flags = cdlOFNFileMustExist + cdlOFNHideReadOnly
.ShowOpen
If Err = 0 Then
txtfilename = .FileName
End If
End With
End Sub
_________________________________________
ma come faccio per vedere il file in un richtextbox?
un aiutino ino ino...
grazie
Ultima modifica effettuata da Cronos il 23/01/2010 alle 20:32 |