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

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

إغلاق ملف pdf بواسطة الكود - صالح عبدالله - 14-12-24

السلام عليكم ورحمة الله وبركاته 
كيف استطيع إغلاق ملف  pdf  له المسار التالي بواسطة الكود   
                                          D:\myGoal\Goal1.Pdf

أو إغلاق برنامج Acrobat  بالكامل

RE: إغلاق ملف pdf بواسطة الكود - asmarsou - 14-12-24

وعليكم السلام و رحمة الله و بركاته
جرب ما بلي
PHP كود :
Dim processes() As Process = Process.GetProcessesByName("AcroRd32")
        For Each process As Process In processes
            process.Kill()
        Next 


RE: إغلاق ملف pdf بواسطة الكود - صالح عبدالله - 15-12-24

السلام عليكم ورحمة الله وبركاته
الشكر الجزيل لك على إهتمامك سأجرب الكود ثم أعطيك النتيجة 

لقد قمت بتجربة الكود التالي ونجح معي 
        'Dim tProcess() As Process = System.Diagnostics.Process.GetProcessesByName("Acrobat")

        'For Each AcrobatProcess As Process In tProcess
        '    AcrobatProcess.Kill()
        'Next


RE: إغلاق ملف pdf بواسطة الكود - صالح عبدالله - 15-12-24

السلام عليكم ورحمة الله وبركاته
الشكر الجزيل لك أخي تم تجربة الكود وهو ناجح معي 100 \100

RE: إغلاق ملف pdf بواسطة الكود - asmarsou - 15-12-24

تمام الحمد و الشكر لله

RE: إغلاق ملف pdf بواسطة الكود - aljzazy - 21-12-24

لإغلاق ملف 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
ملاحظات:
  1. اسم العملية: اسم العملية الافتراضي لبرنامج Adobe Acrobat Reader هو
    Acrobat
  2. . في حالة استخدام برامج أخرى، قد تحتاج إلى التحقق من اسم العملية الفعلي باستخدام Task Manager.
  3. الأذونات: قد تحتاج إلى تشغيل البرنامج كمسؤول لإغلاق العمليات.
  4. Kill(): قد يؤدي إلى فقدان أي تغييرات غير محفوظة