Ich suche nach einer Software, die ein Foto per Webcam und einen Screenshot macht, wenn jemand irgendwo auf dem Bildschirm mit der Maus klickt. Die Software sollte auf Windows-7 64bit laufen.
Es wird für einen Kommen/Gehen-Computer in einer Anlage verwendet. Es soll Mitarbeiter überwachen, weil sie nur ein- und ausstempeln sollen. Ich müsste also sehen, wer den Computer benutzt und was er tut, wenn er sich entschließt, sich ins Internet oder in das System zu verirren.
Ich habe mein eigenes einfaches Programm mit AutoIt erstellt, Sie können es hier herunterladen .
Jedes Mal, wenn mit der linken Maustaste geklickt wird, wird ein Schnappschuss des Bildschirms gemacht, und wenn es eine Kamera auf Ihrem Computer gibt, wird ein Schnappschuss mit der Kamera gemacht.
Die Captures werden in C:\Users\{User}\AppData\Roaming\Captures abgelegt.
Sie können das Programm stoppen, indem Sie die Strg-Taste und s gedrückt halten.
Hier ist der Code,
#NoTrayIcon
#include <ScreenCapture.au3>
#include <Misc.au3>
#include <MsgBoxConstants.au3>
DirCreate(@AppDataDir & "/Captures/")
$directory = @AppDataDir & "\Captures\"
Local $hDLL = DllOpen("user32.dll")
While 1
If _IsPressed("01", $hDLL) Then
Example()
EndIf
If _IsPressed("11") And _IsPressed("53") Then
ExitLoop
EndIf
WEnd
Func Example()
$time = @YEAR & "-" & @MON & "-" & @MDAY & "-" & @HOUR & "-" & @MIN & "-" & @SEC & "-" & @MSEC
_ScreenCapture_Capture($directory & "Capture_" & $time & "_Window.jpg")
Run("snapz.exe" & ' dir /b', $directory, @SW_HIDE)
_FileRename_($directory & "snapz.dib", $directory & "Capture_" & $time & "_CameraSnapShot.dib")
EndFunc ;==>Example
Func _FileRename_($s_Source, $s_Destination, $i_Flag = 0)
Local $i
$i = FileMove($s_Source, $s_Destination, $i_Flag)
Return $i
EndFunc ;==>_FileRename_
Ich habe ein einfaches Skript namens "snapz" verwendet , um die Kamera-Schnappschüsse zu erhalten.
Hoffe, das hilft, wenn Sie irgendwelche Fragen haben, fragen Sie weg :)