16-08-18, 12:13 AM
السلام عليكم ورحمة الله
هذا كود يطلع لي البرامج المنزله في الكمبيوتر
Control Panel Programs and Features
محتاج اعمل بحث للبرامج واذا طلع البرنامج المذكور في اللسته يقولي اوك موجود
بارك الله فيكم وشكرا
هذا كود يطلع لي البرامج المنزله في الكمبيوتر
Control Panel Programs and Features
كود :
Dim wqlQuery As New WqlObjectQuery("SELECT * FROM Win32_Product")
Dim searcher As New ManagementObjectSearcher(wqlQuery)
For Each row As ManagementObject In searcher.Get()
Dim name As Object = row("Name")
Dim version As Object = row("Version")
Console.WriteLine("Name: " & name & " - Version: " & version)
If "TeamViewer" = " & name & " Then
MsgBox("ok")
Else
MsgBox("no")
End If
Next row
محتاج اعمل بحث للبرامج واذا طلع البرنامج المذكور في اللسته يقولي اوك موجود
كود :
If "TeamViewer" = " & name & " Then
MsgBox("ok")
Else
MsgBox("no")
End If
بارك الله فيكم وشكرا