[qqwwaass]

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

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

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

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

[sunnykey]

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

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

Код:

#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]

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

блин, мужики прошу прощения...
sunnykey, огромное спасибо за труд, испытаем обязательно, отпишусь по результату.
У нас тут изменения произошли, наш молодой Гуру(без иронии) действительно сделал лучше чем было.
Не знаю подробностей, но он пересобрал liveCD, TeamViewer заменил на LiteManager и при старте идёт запуск с обратным соединением на указанный IP, сейчас дорабатывает последовательный диапазон IP на которые должен "стучаться" LiteManager если первый не в сети.
В общем ничего никуда не отсылается, никаких паролей, только разрешённые IP и на той стороне ПК со старта готов к удалённому управлению.

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