وعليكم السلام و رحمة الله و بركاته
جرب ما بلي
PHP كود :
Dim processes() As Process = Process.GetProcessesByName("AcroRd32")
For Each process As Process In processes
process.Kill()
Next
السلام عليكم ورحمة الله وبركاته
الشكر الجزيل لك على إهتمامك سأجرب الكود ثم أعطيك النتيجة
لقد قمت بتجربة الكود التالي ونجح معي
'Dim tProcess() As Process = System.Diagnostics.Process.GetProcessesByName("Acrobat")
'For Each AcrobatProcess As Process In tProcess
' AcrobatProcess.Kill()
'Next
السلام عليكم ورحمة الله وبركاته
الشكر الجزيل لك أخي تم تجربة الكود وهو ناجح معي 100 \100
لإغلاق ملف PDF أو برنامج
Adobe Acrobat بالكامل باستخدام الكود في
Visual Basic.NET، يمكنك استخدام
Process.Kill لإغلاق العملية المرتبطة بالملف أو البرنامج.
إغلاق الملف المحدد فقط (باستخدام المسار):
لا يمكن إغلاق ملف PDF مباشرة عن طريق المسار فقط، لأنه يعمل ضمن برنامج (مثل Adobe Acrobat). لذا، يجب أن تقوم بإغلاق العملية المرتبطة ببرنامج Acrobat إذا كان يفتح الملف المحدد.
إغلاق برنامج Acrobat بالكامل:
إذا كنت تريد إغلاق جميع عمليات
Adobe Acrobat المفتوحة (بما في ذلك الملف المطلوب)، يمكنك استخدام الكود التالي:
الكود:
vb
نسخ الكود
كود :
Imports System.Diagnostics
Private Sub CloseAcrobatProcess()
Try
' الحصول على جميع العمليات المرتبطة ببرنامج Acrobat
For Each proc As Process In Process.GetProcessesByName("Acrobat")
proc.Kill() ' إغلاق العملية
Next
Catch ex As Exception
MessageBox.Show("تعذر إغلاق برنامج Acrobat: " & ex.Message)
End Try
End Sub
إغلاق ملف PDF محدد فقط:
لإغلاق ملف PDF معين، يمكنك التأكد من إغلاق جميع العمليات المفتوحة لـ Adobe Acrobat أو التحقق إذا كان الملف قيد الاستخدام.
vb
نسخ الكود
كود :
Imports System.Diagnostics
Private Sub CloseSpecificPdf(pdfPath As String)
Try
' التحقق من العمليات المرتبطة بـ Adobe Acrobat
For Each proc As Process In Process.GetProcessesByName("Acrobat")
' التحقق من سطر الأوامر إذا كان يشير إلى الملف المحدد
If proc.MainWindowTitle.Contains(pdfPath) Then
proc.Kill() ' إغلاق العملية
End If
Next
Catch ex As Exception
MessageBox.Show("تعذر إغلاق الملف المحدد: " & ex.Message)
End Try
End Sub
استدعاء الكود:
vb
نسخ الكود
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
CloseSpecificPdf("D:\myGoal\Goal1.Pdf")
End Sub
ملاحظات:
- اسم العملية: اسم العملية الافتراضي لبرنامج Adobe Acrobat Reader هو
Acrobat
- . في حالة استخدام برامج أخرى، قد تحتاج إلى التحقق من اسم العملية الفعلي باستخدام Task Manager.
- الأذونات: قد تحتاج إلى تشغيل البرنامج كمسؤول لإغلاق العمليات.
- Kill(): قد يؤدي إلى فقدان أي تغييرات غير محفوظة