Scripting Auto Scan e Auto Save?

0

Eu tenho um scanner EPSON Perfection V370 Photo, e estou tentando fazer com que ele escaneie várias vezes por dia durante um mês, automaticamente (digamos que uma vez a cada hora, eu quero estar no controle do tempo) e automaticamente salve a varredura como tiff ou jpeg com o nome, incluindo a hora exata em que a varredura ocorreu.

Eu não tenho experiência em fazer um arquivo de script, então se você pudesse explicar tudo e me mostrar o arquivo usado, será muito apreciado.

Até agora eu usei o Powershell, mas não é possível fazer com que o nome do arquivo seja a hora exata:

$deviceManager = new-object -ComObject WIA.DeviceManager
$device = $deviceManager.DeviceInfos.Item(1).Connect()

$imageProcess = new-object -ComObject WIA.ImageProcess

$wiaFormatBMP  = "{B96B3CAB-0728-11D3-9D7B-0000F81EF32E}"
$wiaFormatPNG  = "{B96B3CAF-0728-11D3-9D7B-0000F81EF32E}"
$wiaFormatGIF  = "{B96B3CB0-0728-11D3-9D7B-0000F81EF32E}"
$wiaFormatJPEG = "{B96B3CAE-0728-11D3-9D7B-0000F81EF32E}"
$wiaFormatTIFF = "{B96B3CB1-0728-11D3-9D7B-0000F81EF32E}"

foreach ($item in $device.Items) {
    $image = $item.Transfer() 
}

$imageProcess.Filters.Add($imageProcess.FilterInfos.Item("Convert").FilterID)
$imageProcess.Filters.Item(1).Properties.Item("FormatID").Value = $wiaFormatJPEG
$imageProcess.Filters.Item(1).Properties.Item("Quality").Value = 5
$image = $imageProcess.Apply($image)

$filename = "$([Environment]::GetFolderPath("Desktop"))\Scan {0}.jpg"

$index = 0
while (test-path ($filename -f $index)) {[void](++$index)}
$filename = $filename -f $index


$image.SaveFile($filename)


& $filename
    
por Maddie 02.09.2016 / 18:41

0 respostas