vbscript가 파일 실행시 메시지를 표시합니다.

Question

사용자가 응용 프로그램/특정 응용 프로그램을 열 때마다 메시지 상자를 표시하는 VBscript 코드를 찾고 있습니다. 그리고 vbscript는 항상 실행 중이어야합니다. 코딩에 초보입니다. 도와주세요!!

Answer 1

Set WshShell = WScript.CreateObject("WScript.Shell") 
Set objWMIService = GetObject("winmgmts:\\.\root\CIMV2") 
Set objEvents = objWMIService.ExecNotificationQuery _ 
    ("SELECT * FROM Win32_ProcessStopTrace") 

Do 
    Set objReceivedEvent = objEvents.NextEvent 
    msgbox objReceivedEvent.ProcessName 
    If lcase(objReceivedEvent.ProcessName) = lcase("Notepad.exe") then 
     Msgbox "Process exited with exit code " & objReceivedEvent.ExitStatus 
     WshShell.Run "c:\Windows\notepad.exe", 1, false 
    End If 
Loop 

이렇게하면 시작할 수 있습니다. 이것은 프로세스의 종료를 모니터합니다. 프로세스를 시작하려면 Win32_ProcessStopTrace을 Win32_ProcessStartTrace으로 변경하십시오.