[معاذ_ابراهيم]

السلام  عليكم

كيف اعرف ما اذا كان ملف ا بامتداد ال txt  موجود في هذا الجلد املا

F:/File Text

[5000]

استخدم الدالة Exists للمكتبة File للتحقق من وجود الملف
ويكتب اسم الملف مع نوعه مثل txt بالاضافة للمسار كامل
فإذا أعادة الدالة القيمة True فهذا يعني أن الملف موجود
وهذا كود مثال

Dim fn = "F:/File Text.txt"

If IO.File.Exists(fn) = True Then
    MsgBox("موجود")
Else
    MsgBox("غير موجود")
End If

[معاذ_ابراهيم]

(14-03-19, 04:42 PM)5000 كتب : استخدم الدالة Exists للمكتبة File للتحقق من وجود الملف
ويكتب اسم الملف مع نوعه مثل txt بالاضافة للمسار كامل
فإذا أعادة الدالة القيمة True فهذا يعني أن الملف موجود
وهذا كود مثال

Dim fn = "F:/File Text.txt"

If IO.File.Exists(fn) = True Then
    MsgBox("موجود")
Else
    MsgBox("غير موجود")
End If

شكرا جزيلا استخدمت الكود وشغال تمام