webcam script

[Edwin]

Hoi,Het webcamscript wat ik" geleend"heb werkt niet goed het pakt steeds de laatste foto van de serie die ervoor genomen is
wat moet ik eraan veranderen?
mijn netcamplugin neemt 10 foto's bij detectie,is het ook mogelijk om de laatste 10 te emailen?

hier is het script:
Sub Main(Optional ByVal pParms As String = "")

Dim pi As Object
pi = hs.Plugin("Netcam")

Dim files As Collection = pi.getimages("Achtertuin")

If files.Count >= 2 Then
Dim latestImage As Integer = 2
Dim strFileName As String = files(latestImage).Replace("_thmb","")
hs.WriteLog("Info", "File to send: " & strFileName)
hs.SendEmail("", "", "Iemand aan de deur", "Iemand aan de deur", strFileName)
End If

End Sub


alvast bedankt
edwin

[Francois]

Gebruik het zelfde script en bij mij gaat het wel goed, ik heb wel een wait ingebouwd tussen het nemen van de foto's en het starten van het script om ze te verzenden.

Mijn event:
NetCAM: Take 5 pictures from NetCAM: YCAM01 with 1 seconds in between
Wait: 5 seconds
EmailPicture.vb

Zou het wellicht kunnen dat de foto's er gewoon nog niet zijn ?

[Edwin]

Nee want ik heb hetzelfde als jou maar dan een wait tijd van 50 sec.
Dus daar kan het eigenlijk niet aan liggen

edwin

[Verkenner]

Ik had in het Webcam-event hetzelfde probleem.
Daarom een wait ingebouwd. Nu werkt het prima. Hij zend nu wel de laatste foto: Latest.jpg
Overigens is de kleine Homeseer-server er heel druk mee. Probeer eerst eens met 1 foto.
Groet, Verkenner

WebCam: Capture a single image into Capture ### on <ddd>, <mmm> <dd>, <yyyy> at <h24><nn> using USB2.0 ATV
Speak in background: Persoon buiten in de nacht
Device Command: Buiten Lamp kelderafrit On
Living Lamp-SL voor het raam On
Buiten Flitslamp buiten On
Device Command: Buiten Lamp kelderafrit Off Delay: 00:10:00
Buiten Flitslamp buiten Off Delay: 00:10:00
Living Lamp-SL voor het raam Off Delay: 00:10:00
Wait: 10 seconds
Send Email To: mailadress@provider.com
Subj: Persoon op de oprit Nacht