تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
لاستخراج اسم الملف من عنوانه الكامل
#1
كاتب الموضوع : Boutemine Oualid

السلام عليكم و رحمة الله و بركاته

كود :
Public Function GetFileName(path As String) As String
If Dir(path) <> ""Then
Dim splitPath() As String
splitPath = Split(path, "\", -1, vbTextCompare)
GetFileName = splitPath(UBound(splitpath))
Else
MsgBox ("File doesn't exists")
End If
End Function
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استخراج اسم الملف من ضمن مسار RaggiTech 0 398 17-10-12, 12:18 AM
آخر رد: RaggiTech

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم