Page 1 of 1
Event om usb webcam uit te schakelen
Posted: Sat Mar 12, 2011 8:51 pm
by marcodewolf
Hi, Ik maak gebruik van webcamXP server in Homeseer/Netcam plugin, nu heb ik reeds een event om de USB webcam middels action Launch Application: C:\Program Files\wLite\wLite.exe in te schakelen,
Maar hoe kan ik met een event dit zelfde programma afsluiten?
MVG Marco
Re: Event om usb webcam uit te schakelen
Posted: Mon Mar 14, 2011 12:59 am
by LostDreamer
Er zullen meerdere wegen naar Rome leiden, maar dit is de mijne :
Sla de volgende code op als kill_camera.vbs en zorg dat dit vbscript door Homeseer gedraait wordt wanneer jij wilt
(Als hier geen optie voor is - Ik ken HomeSeer niet inhoudelijk - kun je een Launch Application action maken met "wscript.exe c:\pad\naar\kill_camera.vbs"
Code: Select all
Option Explicit
Dim objWMIService, objProcess, colProcess
Dim strComputer, strProcessKill
strComputer = "."
strProcessKill = "wlite.exe"
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" _
& strComputer & "\root\cimv2")
Set colProcess = objWMIService.ExecQuery("Select * from Win32_Process Where Name = '" & strProcessKill & "'")
For Each objProcess in colProcess
objProcess.Terminate()
Next
Ik hoop dat je er iets aan hebt.
Re: Event om usb webcam uit te schakelen
Posted: Mon Mar 14, 2011 11:47 pm
by marcodewolf
Er zullen inderdaad meerdere wegen naar rome gaan, maar dit is voor mij de weg die ik zocht.
Many thanks !!!