22/02/07 22:34
alejandro
io faccio cosi :
Private Sub btSfoglia_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btSfoglia.Click
''''''''''''''''''''''''''''''''''''''''''''''''''''''
Dim ApriPath As String
Dim ApriFile As New OpenFileDialog
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Try
With ApriFile
.Title = "Apri File!"
.Filter = "File Testo (.txt)|*.txt"
.InitialDirectory = "C:\"
.ShowDialog()
''''''''''''''''''''''''''''''''''''''''''''''''''''''
If ApriFile.ShowDialog() = Windows.Forms.DialogResult.OK Then
ApriPath = .FileName ' e qua ci metti cosa vuoi fare col file
End If
End With
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Catch ErrorApertura As Exception
MsgBox(ErrorApertura.Message, MsgBoxStyle.Critical + _
MsgBoxStyle.OkOnly, "")
Exit Sub
End Try
End Sub
Ultima modifica effettuata da Il Totem 16/08/10 8:46
aaa
15/08/10 15:08
Mikele di Sagitter
Salve e se invece si volesse aprire la classica finestra per sfogliare le cartelle in modo da ottenere poi un percorso dove istallare dei files?
aaa
18/08/10 13:18
Piowere
già, scusa
quindi snz folder....Show()
Ultima modifica effettuata da Piowere 18/08/10 13:19
aaa