تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] Driver refresh
#1
السلام عليكم
سؤالي عن تحديث الفلاش ميموري عن طريق الفورم
او بمعني اصح 
عند الضغط علي زر
يقوم البرنامج بعمل تحديث لكل الفلاش ميموري الموجوده بالجهاز وكأني ازلتها واعدت وضعها بالجهاز
(يقوم المستخدم بأستخدام البرنامج عن طريق AnyDesk والجهاز غير موجود وموصول بالجهاز فلاش ميموري ويحتاج العميل الي اعاده تشغيله بدلا من عمل ريستارت للجهاز لان هذا يحتاج من المضيف اعاده تشغيل AnyDesK مره اخري )





ربما انا هنا لوضع بصمه لكل مبرمج في قدر استطاعتي

وأيضا انتظر بصمه احدكم

الرد }}}
تم الشكر بواسطة:
#2
(27-06-22, 12:57 PM)mohamedallams كتب :
السلام عليكم
سؤالي عن تحديث الفلاش ميموري عن طريق الفورم
او بمعني اصح 
عند الضغط علي زر
يقوم البرنامج بعمل تحديث لكل الفلاش ميموري الموجوده بالجهاز وكأني ازلتها واعدت وضعها بالجهاز
(يقوم المستخدم بأستخدام البرنامج عن طريق AnyDesk والجهاز غير موجود وموصول بالجهاز فلاش ميموري ويحتاج العميل الي اعاده تشغيله بدلا من عمل ريستارت للجهاز لان هذا يحتاج من المضيف اعاده تشغيل AnyDesK مره اخري )

و عليكم السلام و رحمة الله و بركاته
يمكنك الاستفادة من الموضوع التالي
https://docs.microsoft.com/en-us/answers...vbnet.html
الرد }}}
تم الشكر بواسطة: mohamedallams
#3
(27-06-22, 09:43 PM)asmarsou كتب :
(27-06-22, 12:57 PM)mohamedallams كتب :
السلام عليكم
سؤالي عن تحديث الفلاش ميموري عن طريق الفورم
او بمعني اصح 
عند الضغط علي زر
يقوم البرنامج بعمل تحديث لكل الفلاش ميموري الموجوده بالجهاز وكأني ازلتها واعدت وضعها بالجهاز
(يقوم المستخدم بأستخدام البرنامج عن طريق AnyDesk والجهاز غير موجود وموصول بالجهاز فلاش ميموري ويحتاج العميل الي اعاده تشغيله بدلا من عمل ريستارت للجهاز لان هذا يحتاج من المضيف اعاده تشغيل AnyDesK مره اخري )

و عليكم السلام و رحمة الله و بركاته
يمكنك الاستفادة من الموضوع التالي
https://docs.microsoft.com/en-us/answers...vbnet.html

أشكرك كثيراً ولاكن مع الاسف لم يقم بالمطلوب





ربما انا هنا لوضع بصمه لكل مبرمج في قدر استطاعتي

وأيضا انتظر بصمه احدكم

الرد }}}
تم الشكر بواسطة:
#4
استخدم الكود التالي فهو يقوم باضهار رسالة كل مرة يتم ادخال او اخراج فلاش 

كود :
Imports System.Management
Imports Microsoft.Win32

Public Class Form1
    Dim WithEvents pluggedInWatcher As ManagementEventWatcher
    Dim WithEvents pluggedOutWatcher As ManagementEventWatcher
    Dim pluggedInQuery As WqlEventQuery
    Dim pluggedOutQuery As WqlEventQuery

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Try
            pluggedInQuery = New WqlEventQuery
            pluggedInQuery.QueryString = "SELECT * FROM Win32_VolumeChangeEvent WHERE EventType = 2"
            pluggedInWatcher = New ManagementEventWatcher(pluggedInQuery)
            pluggedInWatcher.Start()

            pluggedOutQuery = New WqlEventQuery
            pluggedOutQuery.QueryString = "SELECT * FROM Win32_VolumeChangeEvent WHERE EventType = 3"
            pluggedOutWatcher = New ManagementEventWatcher(pluggedOutQuery)
            pluggedOutWatcher.Start()
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub

    Private Sub pluggedInWatcher_EventArrived(sender As Object, e As EventArrivedEventArgs) Handles pluggedInWatcher.EventArrived
        MsgBox("Plugged In")
    End Sub

    Private Sub pluggedOutWatcher_EventArrived(sender As Object, e As EventArrivedEventArgs) Handles pluggedOutWatcher.EventArrived
        MsgBox("Plugged Out")
    End Sub
End Class
ملاحظة : الكود يعمل مع اصدار فريم وورك 4 او اعلى

الرد }}}
تم الشكر بواسطة: asmarsou
#5
(08-07-22, 09:44 AM)معاند الحظ كتب : استخدم الكود التالي فهو يقوم باضهار رسالة كل مرة يتم ادخال او اخراج فلاش 

كود :
Imports System.Management
Imports Microsoft.Win32

Public Class Form1
    Dim WithEvents pluggedInWatcher As ManagementEventWatcher
    Dim WithEvents pluggedOutWatcher As ManagementEventWatcher
    Dim pluggedInQuery As WqlEventQuery
    Dim pluggedOutQuery As WqlEventQuery

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Try
            pluggedInQuery = New WqlEventQuery
            pluggedInQuery.QueryString = "SELECT * FROM Win32_VolumeChangeEvent WHERE EventType = 2"
            pluggedInWatcher = New ManagementEventWatcher(pluggedInQuery)
            pluggedInWatcher.Start()

            pluggedOutQuery = New WqlEventQuery
            pluggedOutQuery.QueryString = "SELECT * FROM Win32_VolumeChangeEvent WHERE EventType = 3"
            pluggedOutWatcher = New ManagementEventWatcher(pluggedOutQuery)
            pluggedOutWatcher.Start()
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub

    Private Sub pluggedInWatcher_EventArrived(sender As Object, e As EventArrivedEventArgs) Handles pluggedInWatcher.EventArrived
        MsgBox("Plugged In")
    End Sub

    Private Sub pluggedOutWatcher_EventArrived(sender As Object, e As EventArrivedEventArgs) Handles pluggedOutWatcher.EventArrived
        MsgBox("Plugged Out")
    End Sub
End Class
ملاحظة : الكود يعمل مع اصدار فريم وورك 4 او اعلى

لم يقم بالغرض





ربما انا هنا لوضع بصمه لكل مبرمج في قدر استطاعتي

وأيضا انتظر بصمه احدكم

الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم