18-07-19, 12:04 AM
السلام عليكم ورحمة الله وبركاته
للتذكير فقط
دالتين بسيطتين لمعرفة مسار مجلد من مسار ملف وكذلك معرفة اسم الملف:
فقط للتذكير والتدوين.
تحيااتي
ااااااااخ بس الامر ابسط من كذا بكثييير بس بشوية تفكير .
![[صورة مرفقة: vb6.jpg]](https://i.postimg.cc/Z5N3D8fw/vb6.jpg)
للتذكير فقط
دالتين بسيطتين لمعرفة مسار مجلد من مسار ملف وكذلك معرفة اسم الملف:
PHP كود :
Private Function App_path(fpath As String) As String
Dim pn As Integer
pn = InStrRev(fpath, "\")
If pn > 0 Then
App_path = Left$(fpath, pn)
End If
End Function
Private Function GFilename(fpath As String) As String
Dim pn As Integer
pn = InStrRev(fpath, "\")
If pn > 0 Then
GFilename = Replace(fpath, Left$(fpath, pn), "")
End If
End Function
تحيااتي
ااااااااخ بس الامر ابسط من كذا بكثييير بس بشوية تفكير .
![[صورة مرفقة: vb6.jpg]](https://i.postimg.cc/Z5N3D8fw/vb6.jpg)
![[صورة مرفقة: p_1294cxtas1.gif]](https://3.top4top.net/p_1294cxtas1.gif)