Pessoal deem uma olhada na string abaixo:

D:Gravacoes11_2008.02.15_10.24.42.gsm

 

preciso separa-la de uma forma que eu possa pegar só  o nome do arquivo em o diretorio..alguem poderia me ajudar?

 

Vlw a todos

como assim descuelpe não entendi

 

explique melhor por favor

seria fazer isto

 

D:\Gravacoes11_2008.02.15_10.24.42.gsm

 

separar Gravacoes do restante

 

ou apenas

 

Vlw pessoal mas ja resolvi...

 

Right$("D:Gravacoes11_2008.02.15_10.24.42.gsm", 25) 

ae me retorna: "1_2008.02.15_10.24.42.gsm"

o raposão se liga neste que desenvolvi, Vai até o diretório G se for o caso de a pessoa possuir partiçoes e o arquivo estiver em outro diretório que não seja o D, se te servir.

 

eis o código

 

coloquei ele em um botão

 

Private Sub Command1_Click()
Dim diretorios As Variant
Dim dir As String
diretorios = Array("a", "A", "b", "B", "c", "C", "d", "D", "f", "F", "g", "G")
For f = 0 To 11
If diretorios(f) = Left(txtcomdiretorio.Text, 1) Then
dir = diretorios(f) & ":\"
txtsemdiretorio.Text = Replace(txtcomdiretorio.Text, dir, "")
Exit For
End If
Next f
End Sub