questa per ottenere solo il nome del file di un percorso...codice:Public Function nome_file(ByVal percorso As String) As String Dim risultato As String = "" Dim i As Integer Dim s As String For i = Len(percorso) To 1 Step -1 s = Mid(percorso, i, 1) If s <> "\" Then risultato = risultato + s Else Exit For End If Next i Return StrReverse(risultato) End Function