منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ارجو المساعدة "رسالة خطا" - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ارجو المساعدة "رسالة خطا" (/showthread.php?tid=11495)



ارجو المساعدة "رسالة خطا" - reem siddig - 20-02-15

السلام عليكم
عند تنفيذ البرنامج وهو مسح ملفات بصيغة exe فانه تظهر رسالة خطا
No files found matching 'C:\Users\REEMO\Desktop\system.exe'.



Dim i As Integer = 0
Dim directory = OFD.SelectedPath
Try
For Each filename As String In IO.Directory.GetFiles(directory, "*.exe", IO.SearchOption.AllDirectories)
File.Delete(filename)
i = i + 1
TextBox1.Text = Convert.ToString(i)
' ListBox1.Items.Add(fname)
' ListBox2.Items.Add(filename)
'End If
' End If

Next
Catch EX As Exception
MessageBox.Show("cannot red file from disk .originl error :" & EX.Message)
End Try
End If