Home » Tag » list program

รวมทุกเรื่องเกี่ยวกับ  list program

Average Rating

ในคอมในคอมพิวเตอร์เครื่องหนึ่งมีโปรแกรมอะไรบ้างติดตั้งอยู่บ้าง? ถ้าอยากจะรู้คุณๆ ก็มีวิธีช่วยให้คุณรู้ได้ง่ายๆ คือ การเขียน ?VBScript เพื่อการแสดงรายการโปรแกรมทั้งหมดขึ้นมา วิธีการก็มีดังนี้... 1.ให้เปิด Notepad ขึ้นมา แล้วก็อปปี้ Script ข้างล่างนี้มาปะที่ Notepad strComputer = "." Dim objExplorer, binFirstWindow, strTextOutput const crlf="<BR>" Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colSoftware = objWMIService.ExecQuery("Select Name from Win32_Product") strResult = "" For Each objSoftware in colSoftware strResult = strResult & objSoftware.Name & crlf Next showText(strResult) showText(crlf & "Done!") Wscript.Quit Sub showText(strText) If binFirstWindow = False Then binFirstWindow = True Set objExplorer = WScript.CreateObject("InternetExplorer.Application") With ObjExplorer .Navigate "about:blank" .ToolBar = 0 .StatusBar = 0 .Width=400 .Height = 200 .Left = 0 .Top = 0 End With Do While (objExplorer.Busy) Wscript.Sleep 200 Loop strTextOutput = "" objExplorer.Visible = 1 End If strTextOutput = strTextOutput & strText & crlf objExplorer.Document.Body.InnerHTML = strTextOutput End Sub 2.บันทึกไฟล์นี้เป็นชื่อ List Installed Program.vbs 3.เวลาใช้งานก็ดับเบิลคลิกที่ไฟล์สร้างขึ้นมา จะมีหน้าต่าง Blank Page-Windows Internet Explorer แสดงรายการโปรแกรมทั้งหมดในคอมพิวเตอร์ออกมา

© Copyright - Notebookspec.com All Rights