[Iska]

каким образом можно сделать в windows 7 чтобы к примеру после запуска гугл хром издавался звук ? »

Например, таким (на WSH):

Скрытый текст

Код:

Option Explicit

Dim objSpeechFileStream


With WScript.CreateObject("WbemScripting.SWbemLocator").ConnectServer(".", "root\cimv2").ExecNotificationQuery( _
	"SELECT * FROM __InstanceCreationEvent WITHIN 1 " & _
	"WHERE TargetInstance ISA 'Win32_Process' AND TargetInstance.Name = 'chrome.exe'")
	
	Do
		.NextEvent
		
		With WScript.CreateObject("SAPI.SpVoice")
			Set objSpeechFileStream = WScript.CreateObject("SAPI.SpFileStream")
			
			objSpeechFileStream.Open "C:\Windows\Media\Windows Notify.wav"
			.SpeakStream objSpeechFileStream
			objSpeechFileStream.Close
			.Speak "Google Chrome started."
			
			Set objSpeechFileStream = Nothing
		End With
	Loop
End With

WScript.Quit 0