[greg zakharov]

А народ-то не знает. И пользует.

Чувство стадности оно такое.

Нигде. Только создание скриншота. Для отправки потребуется что-то ещё — например, вышеупомянутый blat, або MailSend. Именно потому рекомендуют PowerShell.

Можно и curl'ом слать мессаги.

[Iska]

Чувство стадности оно такое. »

Да, да — «Миллионы мух не могут ошибаться», я в курсе применения этого тезиса к месту и не к месту. Я с удовольствием посмотрю неговённую замену InsideClipboard, NirCmd, USBDeview и всякого прочего.

Можно и curl'ом слать мессаги. »

Можно и микроскопом гвозди забивать. Но молотком выйдет всё же лучше, не?

[Iska]

kontox, у меня получилось примерно так (на примере Яндекса, скриншот делается с первого монитора):

Скрытый текст

Код:

[Reflection.Assembly]::LoadWithPartialName('System.Drawing') | Out-Null

Start-Sleep -Milliseconds 250

$oRectangle = ([System.Windows.Forms.Screen]::AllScreens)[0].Bounds
$oBitmap    = [System.Drawing.Bitmap]::new($oRectangle.Width, $oRectangle.Height)
$oGraphics  = [System.Drawing.Graphics]::FromImage($oBitmap)
$oGraphics.CopyFromScreen($oRectangle.Location, [System.Drawing.Point]::Empty, $oRectangle.Size)
$oMemoryStream = [System.IO.MemoryStream]::new()
$oBitmap.Save($oMemoryStream, [System.Drawing.Imaging.ImageFormat]::Png)
$oMemoryStream.Seek(0, [System.IO.SeekOrigin]::Begin) | Out-Null

$oMailMessage = New-Object -TypeName 'Net.Mail.MailMessage'
$oMailMessage.From = 'ОтКого@yandex.ru'
$oMailMessage.To.Add('Кому@mail.ru') 
$oMailMessage.SubjectEncoding = [System.Text.Encoding]::Unicode 
$oMailMessage.Subject = "Screenshot at $(Get-Date)"
$oMailMessage.IsBodyHTML      = $true  
$oMailMessage.BodyEncoding    = [System.Text.Encoding]::Unicode
$oMailMessage.Body = "<h2>Hello World!</h2></br>Screenshot at $(Get-Date) here."

$oContentType = New-Object -TypeName 'Net.Mime.ContentType' -Property @{
    MediaType = "image/png"
    Name      = "Screenshot at $(Get-Date).png"
}
$oAttachment = New-Object -TypeName 'Net.Mail.Attachment' -ArgumentList $oMemoryStream, $oContentType
$oMailMessage.Attachments.Add($oAttachment)

$oSmtpClient = New-Object -TypeName 'Net.Mail.SmtpClient' -ArgumentList 'smtp.yandex.ru', 587 #465
$oSmtpClient.EnableSsl = $true
$oSmtpClient.Credentials = New-Object -TypeName 'System.Net.NetworkCredential' -ArgumentList 'ОтКого@yandex.ru', 'Пароль'
$oSmtpClient.Send($oMailMessage)

$oMemoryStream.Close()
$oMemoryStream.Dispose()
$oGraphics.Dispose()
$oBitmap.Dispose()
$oAttachment.Dispose()
$oMailMessage.Dispose()
$oSmtpClient.Dispose()

[greg zakharov]

Я с удовольствием посмотрю неговённую замену InsideClipboard, NirCmd, USBDeview и всякого прочего.

Ваши слова даже на аргумент не тянут. Дело в том, что Нир фигачит все путем тупого копипаста, чем, собственно, и объясняется несчетное количество багов в его высерах, пожатых к тому же UPX. Неудивительно, что весь этот кал детектируется большинством антивирусов и все причитания Нира о ложных срабатываниях аверов доставляют.

Можно и микроскопом гвозди забивать. Но молотком выйдет всё же лучше, не?

То есть для вас задница то же, что и лицо?

[Iska]

Ваши слова даже на аргумент не тянут. »

Вы спорите с чем-то своим. Если аргумент собеседника неудобен — просто отбросим его.

Дело в том, что Нир фигачит все путем тупого копипаста, чем, собственно, и объясняется несчетное количество багов в его высерах, пожатых к тому же UPX. Неудивительно, что весь этот кал детектируется большинством антивирусов и все причитания Нира о ложных срабатываниях аверов доставляют. »

Предположим, что фигачит. Предположим, что копипастом. Предположим, что есть несчётное количество багов. Предположим, что UPX — это вселенское зло. Но каким макаром отсюда должны следовать срабатывания антивирусов — я не понимаю. И Вам следует перечитать-таки его причитания, ибо Вы не поняли, о чём именно они были.

То есть для вас задница то же, что и лицо? »

Поясните.

[kontox]

Iska,
я запускаю (powershell 6 x64)
получаю такую ошибку
PS C:\Users\trader\Desktop> screen.ps
screen.ps : The term 'screen.ps' is not recognized as the name of a cmdlet, fu
tion, script file, or operable program.
Check the spelling of the name, or if a path was included, verify that the pat
is correct and try again.
At line:1 char:1
+ screen.ps
+ ~~~~~~~~~
+ CategoryInfo : ObjectNotFound: (screen.ps:String) [], CommandNotFou
Exception
+ FullyQualifiedErrorId : CommandNotFoundException


Suggestion [3,General]: The command screen.ps was not found, but does exist in
he current location. PowerShell does not load commands from the current locati
by default. If you trust this command, instead type: ".\screen.ps". See "get-
lp about_Command_Precedence" for more details.
PS C:\Users\trader\Desktop>




Я правильно сделал расширение .ps? или оно должно быть другим?

[kontox]

если что вот мой файлик с моими мейлами

[kontox]

яндекс, у меня настроен через outlook. работает прием отправка

[Iska]

Я правильно сделал расширение .ps? или оно должно быть другим? »

Попробуйте «.ps1».

[kontox]

Iska, сделал, что то не помогло. А что значит эта ошибка?

PowerShell 6.2.2
Copyright (c) Microsoft Corporation. All rights reserved.

https://aka.ms/pscore6-docs
Type 'help' to get help.


PS C:\Users\trader> cd desktop
PS C:\Users\trader\desktop> screen.ps1
screen.ps1 : The term 'screen.ps1' is not recognized as the name of a cmdlet, fu
nction, script file, or operable program.
Check the spelling of the name, or if a path was included, verify that the path
is correct and try again.
At line:1 char:1
+ screen.ps1
+ ~~~~~~~~~~
+ CategoryInfo : ObjectNotFound: (screen.ps1:String) [], CommandNotFoun
dException
+ FullyQualifiedErrorId : CommandNotFoundException


Suggestion [3,General]: The command screen.ps1 was not found, but does exist in
the current location. PowerShell does not load commands from the current locatio
n by default. If you trust this command, instead type: ".\screen.ps1". See "get-
help about_Command_Precedence" for more details.
PS C:\Users\trader\desktop>