Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)
-   -   Как сделать скриншот экрана через cmd или bat? (http://forum.oszone.net/showthread.php?t=302275)

bobojonkholikov 10-07-2015 20:43 2527561

Как сделать скриншот экрана через cmd или bat?
 
Всем привет! Как сделать скриншот экрана через cmd или bat? Можете помочь?

Foreigner 10-07-2015 20:55 2527568

С помощью nircmd
Активное окно:
Код:

nircmdc savescreenshotwin file.png
Весь экран:
Код:

nircmdc savescreenshot file.png

bobojonkholikov 11-07-2015 01:20 2527617

Foreigner, объясни пожалуйста что такое nircmd

turbolover 11-07-2015 01:53 2527621

Цитата:

Цитата bobojonkholikov
что такое nircmd »

http://soft.oszone.net/program/7092/NirCmd/

Iska 11-07-2015 04:41 2527631

Цитата:

Цитата bobojonkholikov
что такое nircmd »

Внешняя сторонняя многоцелевая утилита от известного автора. Ссылки Вам привели аж две.

bobojonkholikov 11-07-2015 08:34 2527653

Всем спасибо!

bobojonkholikov 11-07-2015 09:03 2527659

Чет я не понял как им пользоваться! Объясните пожалуйста.

Foreigner 11-07-2015 10:21 2527666

bobojonkholikov, Так вам же даже примеры привел. Запускаете из батника или из командной строки или из "Выполнить". В зависимости от того находится ли утилита в PATH, прописываете необходимый путь к nircmd.exe (nircmdc.exe)


Nordek 11-07-2015 10:32 2527669

Цитата:

Цитата bobojonkholikov
Как сделать скриншот экрана через cmd или bat? »

Например.

greg zakharov 11-07-2015 14:15 2527716

Код:

<# :
  @echo off
    powershell /nologo /noprofile /executionpolicy bypass /command ^
    "&{[ScriptBlock]::Create((gc \"%~f0\") -join [Char]10).Invoke()}"
  exit /b
#>

Add-Type -AssemblyName System.Windows.Forms

$scr = [Windows.Forms.Screen]::PrimaryScreen.Bounds
$pic = New-Object Drawing.Bitmap($scr.Width, $scr.Height)

$gfx = [Drawing.Graphics]::FromImage($pic)
$gfx.CopyFromScreen([Drawing.Point]::Empty, [Drawing.Point]::Empty, $pic.Size)

$cur = New-Object Drawing.Rectangle(
  [Windows.Forms.Cursor]::Position, [Windows.Forms.Cursor]::Current.Size
)
[Windows.Forms.Cursors]::Default.Draw($gfx, $cur)

$pic.Save(
  ($pwd.Path + '\' + (date -u %d%m%Y_%H%M%S) + '.png'),
  [Drawing.Imaging.ImageFormat]::Png
)
$gfx.Dispose()
$pic.Dispose()


turbolover 12-07-2015 02:11 2527886

Код:

<# :
@if "%1" neq "*" (
 mshta vbscript:Execute("CreateObject(""WScript.Shell"").Run """"""%~f0"""" *"",0,False:Close()"^)
 exit/b
)
    powershell /nologo /noprofile /executionpolicy bypass /command ^
    "&{[ScriptBlock]::Create((gc \"%~f0\") -join [Char]10).Invoke()}"
  exit /b
#>

Add-Type -AssemblyName System.Windows.Forms

$scr = [Windows.Forms.Screen]::PrimaryScreen.Bounds
$pic = New-Object Drawing.Bitmap($scr.Width, $scr.Height)

$gfx = [Drawing.Graphics]::FromImage($pic)
$gfx.CopyFromScreen([Drawing.Point]::Empty, [Drawing.Point]::Empty, $pic.Size)

$cur = New-Object Drawing.Rectangle(
  [Windows.Forms.Cursor]::Position, [Windows.Forms.Cursor]::Current.Size
)
[Windows.Forms.Cursors]::Default.Draw($gfx, $cur)

$pic.Save(
  ($pwd.Path + '\' + (date -u %d%m%Y_%H%M%S) + '.png'),
  [Drawing.Imaging.ImageFormat]::Png
)
$gfx.Dispose()
$pic.Dispose()


turbolover 12-07-2015 02:33 2527890

С помощю: nircmd.exe
http://soft.oszone.net/program/7092/NirCmd/
Код:

@Echo off
@if "%1" neq "*" (
 mshta vbscript:Execute("CreateObject(""WScript.Shell"").Run """"""%~f0"""" *"",0,False:Close()"^)
 exit/b
)
ping -n 2 localhost>Nul
Start %Windir%\nircmd.exe savescreenshot Screenshot.png
Exit /b



Время: 12:36.

Время: 12:36.
© OSzone.net 2001-