[Iska]

события старта службы где посмотреть? »

Его не надо «смотреть». Его надо просто использовать.

WSH:

Код:

Option Explicit

Dim objSWbemEventSource


Set objSWbemEventSource = WScript.CreateObject("WbemScripting.SWbemLocator").ConnectServer(".", "root\cimv2").ExecNotificationQuery( _
	"SELECT * FROM __InstanceModificationEvent WITHIN 1 " & _
	"WHERE TargetInstance ISA 'Win32_Service' AND TargetInstance.Name='xusb21' AND TargetInstance.State='Running'" _
)

Do
	objSWbemEventSource.NextEvent
	
	WScript.CreateObject("WScript.Shell").Run "notepad.exe", 1, True
Loop

WScript.Quit 0