Event om usb webcam uit te schakelen

Homeseer Forum in het Nederlands (DUTCH forum)

Moderator: Ruud

Post Reply
marcodewolf

Event om usb webcam uit te schakelen

Post 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
LostDreamer
Member
Member
Posts: 73
Joined: Fri Apr 10, 2009 1:43 pm
Location: Netherlands
Contact:

Re: Event om usb webcam uit te schakelen

Post 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.
[url=https://www.viagrasansordonnancefr.com/commander-sildenafil-100-q-sirve/]commander sildenafil 100 q sirve www.viagrasansordonnancefr.com[/url]
marcodewolf

Re: Event om usb webcam uit te schakelen

Post by marcodewolf »

Er zullen inderdaad meerdere wegen naar rome gaan, maar dit is voor mij de weg die ik zocht.

Many thanks !!!
Post Reply

Return to “Homeseer algemeen Forum”