11-11-17, 05:20 PM
(آخر تعديل لهذه المشاركة : 11-11-17, 05:21 PM {2} بواسطة silverlight.)
أنت تضع الملفات في فهرس اسمه PDF تحت فهرس المشروع
يمكنك استخدام الدالة التالية للحصول علي الملفات الموجودة تحت الفهرس
ثم و للحصول علي كل الملفات في مصفوفة تستخدم الكود بالشكل التالي
فقط عليك أن تبحث عن الملف داحل المصفوفة
يجب عليك مراعاة أن المصفوفة تعود باسم الملف شاملا المسار
يمكنك استخدام الدالة التالية للحصول علي الملفات الموجودة تحت الفهرس
PHP كود :
Private Function SearchFiles(folderName As String, pattern As String, recursive As Boolean, ignoreEx As Boolean) As List(Of String)
Dim result As List(Of String) = New List(Of String)()
Dim actionParams As Action(Of List(Of String), String, String, Boolean, Boolean)
actionParams = Sub(list, folder, searchPattern, repeatSearch, ignore)
Try
Dim fileNames As String() = Nothing
If searchPattern IsNot Nothing Then
fileNames = IO.Directory.GetFiles(folder, searchPattern)
Else
fileNames = IO.Directory.GetFiles(folder)
End If
list.AddRange(fileNames)
Catch ex As Exception
If Not ignore Then
Throw
End If
End Try
If repeatSearch Then
Dim folders As String() = IO.Directory.GetDirectories(folder)
For i As Integer = 0 To folders.Length - 1
actionParams(list, folders(i), searchPattern, repeatSearch, ignore)
Next
End If
End Sub
actionParams(result, folderName, pattern, recursive, ignoreEx)
Return result
End Function
ثم و للحصول علي كل الملفات في مصفوفة تستخدم الكود بالشكل التالي
PHP كود :
Dim path As String = Application.StartupPath + "\PDF"
Dim files As List(Of String) = SearchFiles(path, "*.pdf", False, False)
فقط عليك أن تبحث عن الملف داحل المصفوفة
يجب عليك مراعاة أن المصفوفة تعود باسم الملف شاملا المسار
Retired

