1 Тема от tashjw (изменено: tashjw, 2020-06-03 21:53:43)

  • tashjw
  • Заблокирован
  • Неактивен

Тема: AHK: Нужно конвертировать AutoIT скрипт в Autohotkey

http://autoit-script.ru/threads/sozdani … -ftp.6862/

#include <ScreenCapture.au3>
#include <FTPEx.au3>


#NoTrayIcon
$k=0
While 1
    $file = @ComputerName & "." & @MDAY & "." & @MON & "." & @YEAR & " " & @HOUR & "-" & @MIN  & ".jpg"
    PrintScreen() 
    ftp()
	Sleep(3600000)
    
WEnd

Func PrintScreen() 
    _ScreenCapture_Capture(@HomeDrive & "\" & $file)
EndFunc 

Func ftp() 
$server = 'ftp.xxx.com'
$username = 'user'
$pass = 'user'

$Open = _FTP_Open('FTP')
$Conn = _FTP_Connect($Open, $server, $username, $pass, 1)
_FTP_FilePut($Conn, @HomeDrive & "\" & $file, "/temp/org1/" & $file)
$Ftpc = _FTP_Close($Open)
FileDelete ( @HomeDrive & "\" & $file )
EndFunc

Очень нужен данный скрипт на Autohotkey. Единственное что хотелось бы добавить это возможность смены разрешения и смены качества сжатия скриншота. Сам скриншот должен создаваться в JPG.

2 Ответ от ypppu

  • ypppu
  • Разработчик
  • Неактивен

Re: AHK: Нужно конвертировать AutoIT скрипт в Autohotkey

tashjw, если очень нужно, может стоит переместить тему в коммерческий раздел?

Правила  Поиск  Русский язык  Слова-паразиты
AHK: [ENG] [RUS]