Fotos autospeichern

Question

Eine Frage kenn jemand ein programm oder weiss jemand wie man das programieren kann.

BSP:
Unsere Tischler machen Fotos von ihrer Arbeit, jeden Tag ein paar Fotos von ihren Montagen. Program zu schreiben das dem Tischler hilft Nachdem er die Kamera an den Terminalpc angeschlossen hat
(usb) double clickt er ein icon und das> Program speichert alle Fotos in einem Tagesordner 1 mit Datum auf dem Laufwerk, dafür müsste man die Kameras anhand ihrer Software unterscheiden können. (IMEI, Gerätecode..) Jedes Team hat eine Kamera, die zb. 1,2..... als Standardphotonamen eingestellt hat, ist der Transfer erfolgreich werden die fotos deletet der Tischler bekommt eine Meldung dass er die Kamera abschliessen kann.

Answer 1

Ich denke, das meiste liesse sich mit einem Batch erreichen.
Schreibe auf jede Speicherkarte eine leere Textdatei zur Identifikation der Kamera. Wenn es sich um verschiedene Kameratypen handelt, könnte man statt einer solchen Datei auch den Ordner abfragen, in welchen die Kamera die Bilder schreibt. Bei meiner heisst er DCIM\100KONIC. Die angepasste Abfrage müsste also lauten:
If exist "%LW%:\DCIM\100CONIC" goto Save xy

Im nachfolgenden Beispiel werden 6 Laufwerksbuchstaben abgefragt. Wenn der LW-Buchstabe der Kameras immer gleich ist, kann das wegfallen. Ferner werden drei Kameras abgefragt. Beide Abfragen lassen sich leicht analog anpassen/erweitern.

Ein Mangel dieses Batch ist, dass der Datumsordner das Format
"TT tt.mm.yyyy" bekommt (z.B. "Mo 23.03.2009). Es ist mir zwar auf Grund eines Hinweises hier im Forum auch gelungen, einen Ordner "tt.mm.yyyy" zu erstellen, aber nicht, etwas hineinzukopieren.
Ein weiterer Mangel ist, dass es dem Benutzer überlassen ist, auf Grund der aufgelisteten Bilder (DIR) zu entscheiden, ob die Übertragung geklappt hat, und die automatische Löschabfrage entsprechend mit J oder N zu beantworten.

Versuch's halt mal:

@echo off

Set "lw=H"
If exist %lw%:\kamera01 goto :Save01
If exist %lw%:\kamera02 goto :Save02
If exist %lw%:\kamera03 goto :Save03

Set "lw=I"
If exist %lw%:\kamera01 goto :Save01
If exist %lw%:\kamera02 goto :Save02
If exist %lw%:\kamera03 goto :Save03

Set "lw=J"
If exist %lw%:\kamera01 goto :Save01
If exist %lw%:\kamera02 goto :Save02
If exist %lw%:\kamera03 goto :Save03

Set "lw=K"
If exist %lw%:\kamera01 goto :Save01
If exist %lw%:\kamera02 goto :Save02
If exist %lw%:\kamera03 goto :Save03

Set "lw=L"
If exist %lw%:\kamera01 goto :Save01
If exist %lw%:\kamera02 goto :Save02
If exist %lw%:\kamera03 goto :Save03

Set "lw=M"
If exist %lw%:\kamera01 goto :Save01
If exist %lw%:\kamera02 goto :Save02
If exist %lw%:\kamera03 goto :Save03

ECHO #############################
ECHO ### Keine Kamera gefunden ###
ECHO #############################
GOTO :ENDE


:Save01
md "c:\bilder\kamera01\%date%"
xcopy "%lw%:\DCIM\100KONIC\*.*" "c:\bilder\kamera01\%date%\"
DIR "c:\bilder\kamera01\%date%"
del "%lw%:\DCIM\100KONIC\*.*"
GOTO :ENDE


:Save02
md "c:\bilder\kamera02\%date%"
xcopy "%lw%:\DCIM\100KONIC\*.*" "c:\bilder\kamera02\%date%\"
DIR "c:\bilder\kamera02\%date%"
del "%lw%:\DCIM\100KONIC\*.*"
GOTO :ENDE

:Save03
... (analog)

:ENDE
PAUSE