04-10-13, 08:51 PM
اخي شكرا ... ولكن لم يفي في الغرض ولكن عندي فكرة ... مثلا يوجد في النظام ملف مسارة C:\WINDOWS\system32\advpack.dll
اذا عرفنا العملية Procces الخاصة في الملف advpack.dll ومن ثم قمنا بايقافها وبعدها حذفنا الملف سوف يتم حذفه بدون عودة
ولكن ما هو الكود ؟؟ انا اعرف هذا الكود لكن لا يفي في الغرض :
ولكن المشكلة ان advpack.dll ليس عملية Procces ليقوم بايقافها ... احتاج الى كود يعرف العملية الخاصة ب ملف advpack.dll ومن ثم ايقافها ومن ثم حذف الملف
اذا عرفنا العملية Procces الخاصة في الملف advpack.dll ومن ثم قمنا بايقافها وبعدها حذفنا الملف سوف يتم حذفه بدون عودة
ولكن ما هو الكود ؟؟ انا اعرف هذا الكود لكن لا يفي في الغرض :
كود :
Dim path As String = ("C:\WINDOWS\system32\advpack.dll")
Dim matchingProcesses = New List(Of Process)
Application.DoEvents()
For Each process As Process In process.GetProcesses()
Application.DoEvents()
For Each m As ProcessModule In process.Modules
Application.DoEvents()
If String.Compare(m.FileName, path, StringComparison.InvariantCultureIgnoreCase) = 0 Then
matchingProcesses.Add(process)
Exit For
End If
Next
Next
Application.DoEvents()
For Each pVir As Process In matchingProcesses
pVir.Kill()
Nextولكن المشكلة ان advpack.dll ليس عملية Procces ليقوم بايقافها ... احتاج الى كود يعرف العملية الخاصة ب ملف advpack.dll ومن ثم ايقافها ومن ثم حذف الملف

