(01-07-24, 04:33 PM)Taha Okla شكرا جزيلا لك الكود يعمل بنجاح ولكنه  يقوم باعادة تشغيل ال file explore انا اريد اعادة تشغيل ال windows explorer ارجو المساعدة  ولك الشكر الجزيل كتب : وعليكم السلام ورحمة الله وبركاته

أنشئ موديل جديد وضع في الكود التالي :

كود :

Imports System.Diagnostics
Imports System.Runtime.InteropServices

Module Module1

   <DllImport("user32.dll", SetLastError:=True)>
   Private Function PostMessage(ByVal hWnd As IntPtr, ByVal Msg As UInteger, ByVal wParam As IntPtr, ByVal lParam As IntPtr) As Boolean

   End Function

   <DllImport("user32.dll", SetLastError:=True)>
   Private Function FindWindow(ByVal lpClassName As String, ByVal lpWindowName As String) As IntPtr

   End Function
   Const WM_USER As Integer = &H400

   Public Sub RestatrtWinExp()
       Try
           Dim ptr = FindWindow("Shell_TrayWnd", Nothing)
           PostMessage(ptr, WM_USER + 436, CType(0, IntPtr), CType(0, IntPtr))

           Do
               ptr = FindWindow("Shell_TrayWnd", Nothing)

               If ptr.ToInt32() = 0 Then
                   Exit Do
               End If
           Loop While True

       Catch ex As Exception
       End Try

       Dim explorer As String = String.Format("{0}\{1}", Environment.GetEnvironmentVariable("WINDIR"), "explorer.exe")
       Dim process As Process = New Process()
       process.StartInfo.FileName = explorer
       process.StartInfo.UseShellExecute = True
       process.Start()
   End Sub

End Module

التنفيذ : يكون بإستدعاء الأمر :

كود :

RestatrtWinExp()

(03-07-24, 04:16 PM)Taha Okla كتب : شو الفرق بين :
Windows Explorer   ///   File Explorer    
؟

العملية أنه قامت مايكروسوفت بتغيير اسمه في النسخ الحديثة من الويندوز لا أكثر، كلاهما واحد..
هما نفس البرنامج ( explorer.exe)

أثناء تنفيذ الكود السابق يقوم أولا بإنهاء عمل explorer.exe
ثم يقوم بإعادة تشغيله ..
تلاحظ ذلك من خلال أغلاق (كل مستعرضات الملفات + شريط ابدأ).

إن لم يستطع الكود إغلاق البرنامج (لسبب ما)  : يقوم بتشغيل مستعرض الملفات ويبقى المستعرض شغال.

--

هذه الكود مناسب لويندوز 11   لم أجربه على أي نسخ أخرى من الويندوز..

(03-07-24, 04:16 PM)Taha Okla شكرا جزيلا لك على مساعدتك وعلى متابعتك للردود اخي الكريم  ..الكود يعمل بنجاح  لكن المشكلة انه يغلق مستعرض الملفات ويعيد تشغيله مرة اخرى ولكن لا يغلق شريط ابدأ فانا اريد ايضا ان يغلق شريط ابدأ ويعيد تشغيله مرة اخرى كتب : شو الفرق بين :
Windows Explorer   ///   File Explorer    
؟

العملية أنه قامت مايكروسوفت بتغيير اسمه في النسخ الحديثة من الويندوز لا أكثر، كلاهما واحد..
هما نفس البرنامج ( explorer.exe)

أثناء تنفيذ الكود السابق يقوم أولا بإنهاء عمل explorer.exe
ثم يقوم بإعادة تشغيله ..
تلاحظ ذلك من خلال أغلاق (كل مستعرضات الملفات + شريط ابدأ).

إن لم يستطع الكود إغلاق البرنامج (لسبب ما)  : يقوم بتشغيل مستعرض الملفات ويبقى المستعرض شغال.

--

هذه الكود مناسب لويندوز 11   لم أجربه على أي نسخ أخرى من الويندوز..