yep that's how i did it i have this code to get the filename

VB Code:
  1. Pos = InStrRev(Filename, "\")
  2.     If Pos > 0 Then
  3.         RemovePath = Right$(Filename, Len(Filename) - Pos)
  4.     End If

thanks a lot for your time and help