CMD/BAT - Отправка screenshot на п/ящик.

Аватара пользователя
mwz

Re: CMD/BAT - Отправка screenshot на п/ящик.

Сообщение mwz »

mwz, Изображение тут как оказалось ценность не в CD была, а в этом "ленивом" файлике, замену CD на просторах интернета быстро нашли, "допилили" и всё работает, но когда пароль к "tv" по смс с ошибкой получили и человеку на "той стороне" пришлось ночью ехать чтобы дублировать смс, поняли..., чего-то не хватает.

Так, вопросы пошли специфические, моего образования для ответов уже не хватит, попробую привлечь нашего IT молодого-специалиста.



------------


Цитата:



...попробую привлечь нашего IT молодого-специалиста.



Его Величество "Король Кода и Властелин Железа" оскорбился прочитанным и сказал, что до конца недели всё сделает и даже лучше чем было.

А я просто хотел помочь. Ладно, ждём результата с нетерпением. Изображение
Аватара пользователя
sunnykey

Re: CMD/BAT - Отправка screenshot на п/ящик.

Сообщение sunnykey »

Цитата qqwwaass:



Его Величество "Король Кода и Властелин Железа" оскорбился прочитанным и сказал, что до конца недели всё сделает и даже лучше чем было.

А я просто хотел помочь. Ладно, ждём результата с нетерпением.
CMD/BAT - Отправка screenshot на п/ящик.




Рабочие и крестьяне не дождались



Код:

Код: Выделить всё

#Powershell script.
#Don't forget unlock script executing by 
#using command "Set-ExecutionPolicy RemoteSigned" or "Set-ExecutionPolicy Unrestricted"
#Save this file with ".ps1" extension
$TeamViewerPath='C:\TeamViewer.exe'
Start-Process -FilePath $TeamViewerPath -WindowStyle Normal
Start-Sleep -Seconds 10
Add-Type -AssemblyName System.Drawing
$jpegCodec=[Drawing.Imaging.ImageCodecInfo]::GetImageEncoders() | `
    Where-Object {$_.FormatDescription -eq "JPEG"}
Start-Sleep -Milliseconds 250
[Windows.Forms.Sendkeys]::SendWait("{PrtSc}")        
Start-Sleep -Milliseconds 250
$bitmap=[Windows.Forms.Clipboard]::GetImage()    
$EncoderParameters=New-Object Drawing.Imaging.EncoderParameters  
$EncoderParameters.Param[0]=New-Object Drawing.Imaging.EncoderParameter `
    ([System.Drawing.Imaging.Encoder]::Quality,[long]100)  
$screenCapturePathBase="${Env:TMP}\ScreenCapture"
$bitmap.Save("${screenCapturePathBase}.jpg",$jpegCodec,$EncoderParameters)
$From="from_username@doman"
$To="to_username@domain"
$Subject="Powershell"
$Attachment="${screenCapturePathBase}.jpg"
$Body="This is test message"
$Password="password"
$SecPassword=New-Object -TypeName System.Security.SecureString
$Password.ToCharArray() | foreach {$SecPassword.AppendChar($_)}
$Credintial=New-Object -TypeName System.Management.Automation.PSCredential -ArgumentList $From,$SecPassword
$smtpServer="smtp.domain"
Send-MailMessage -From $From -To $To -Subject $Subject -Attachments $Attachment `
    -Body $Body -Credential $Credintial -SmtpServer $smtpServer
Аватара пользователя
qqwwaass

Re: CMD/BAT - Отправка screenshot на п/ящик.

Сообщение qqwwaass »

Цитата sunnykey:



Рабочие и крестьяне не дождались
CMD/BAT - Отправка screenshot на п/ящик.




блин, мужики прошу прощения...

sunnykey, огромное спасибо за труд, испытаем обязательно, отпишусь по результату.

У нас тут изменения произошли, наш молодой Гуру(без иронии) действительно сделал лучше чем было.

Не знаю подробностей, но он пересобрал liveCD, TeamViewer заменил на LiteManager и при старте идёт запуск с обратным соединением на указанный IP, сейчас дорабатывает последовательный диапазон IP на которые должен "стучаться" LiteManager если первый не в сети.

В общем ничего никуда не отсылается, никаких паролей, только разрешённые IP и на той стороне ПК со старта готов к удалённому управлению.



я у нашего гуру не фаворитах Изображение ...в режиме "высокомерного игнора"
Ответить

Вернуться в «Скриптовые языки администрирования Windows»