Вывод изображения на весь экран в заданное время
Доброго времени суток.
Помогите, пожалуйста, решить задачу:
нужно в определенное время, сделать всем сотрудникам напоминание. что бы уж точно обратили внимание, хочу сделать имитацию BSOD - вывести на весь экран определенное изображение, желательно без всяких рамок, а закрыть его по нажатию any key, о чем будет сообщено в самом низу. собсно вопрос - как это можно сделать?
в сети около 50-ти компов, AD на Win Server 2003.
возможно вопрос не в ту ветку и уже обсуждался, но я что-то не нашел.
|
| greg zakharov |
21-06-2015 09:10 2520631 |
А PowerShell в сетке есть? Если да - создаете окно без рамок и обработчиком событий OnClick, а на само окно натягиваете нужную картинку; ели нет - можно воспользоваться каким-нибудь скринсейвером (вроде того же BlueScreen) который вызывается по расписанию.
|
скринсейвер не вариант, т.к. его устанавливать нужно, а потом еще и отключить\удалить, а акция разовая.
про powershell можно подробнее - как именно это сделать? я с ним просто еще не знаком, все руки не доходят сесть поизучать =(
|
Цитата:
Цитата Nic0p0L
скринсейвер не вариант, т.к. его устанавливать нужно, а потом еще и отключить\удалить, а акция разовая »
|
BlueScreen Screen Saver, устанавливать ничего и не нужно. Можно через планировщик запустить, а можно с помощью того же PsExec из состава PsTools утилит. |
Цитата:
Цитата NickM
BlueScreen Screen Saver, устанавливать ничего и не нужно. Можно через планировщик запустить, а можно с помощью того же PsExec из состава PsTools утилит. »
|
Так мне нужно свое изображение поставить. BSOD я как пример привел - что бы на весь экран, без рамок, пуска и панели задач.
А BlueScreen Screen Saver, никаких настрое нет, кроме включения имитации работы харда. |
Вот нашел на просторах сети скрипт. Вроде то что нужно, только есть пара моментов
1 он закрывается автоматически, через 5 сек. Как изменить закрытие по нажатию любой кнопки?
2 открывается в фиксированном разрешении. Возможно сделать так, что бы автоматически подгонял под разрешение экрана?
3 если мое изображение меньше чем разрешение экрана, то вокруг него белое поле. Возможно растягивать изображение? Или изменить цвет поля?
Код:
<html>
<hta:application id="oHTA"
border="none"
caption="no"
contextmenu="no"
innerborder="no"
scroll="no"
showintaskbar="no"
/>
<script language="VBScript">
Sub Window_OnLoad
' Resize and position the window
width = 1280 : height = 800
window.resizeTo width, height
window.moveTo screen.availWidth\2 - width\2, screen.availHeight\2 - height\2
' Automatically close the windows after 5 seconds
idTimer = window.setTimeout("vbscript:window.close", 5000)
End Sub
</script>
<body>
<table border=0 width="100%" height="100%">
<tr>
<td align="center" valign="middle">
<img src="c:\111.jpg"/>
</td>
</tr>
</table>
</body>
</html>
|
Цитата:
Цитата Nic0p0L
1 он закрывается автоматически, через 5 сек. »
|
Цитата:
Код:
' Automatically close the windows after 5 seconds
idTimer = window.setTimeout("vbscript:window.close", 5000)
|
Цитата:
Цитата Nic0p0L
Как изменить закрытие по нажатию любой кнопки?
2 открывается в фиксированном разрешении. Возможно сделать так, что бы автоматически подгонял под разрешение экрана?
3 если мое изображение меньше чем разрешение экрана, то вокруг него белое поле. Возможно растягивать изображение? Или изменить цвет поля?
»
|
Например, так:
Скрытый текст
Код:
<html id="Info">
<head>
<meta charset="windows-1251">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251">
<meta http-equiv="Content-Language" content="ru">
<title>Info title</title>
<hta:Application
Icon="MyIconFile.ico"
Id="Info"
ApplicationName="Info"
Border="dialog"
BorderStyle="static"
Caption="yes"
ContextMenu="no"
InnerBorder="yes"
MaximizeButton="no"
MinimizeButton="yes"
Navigable="no"
Scroll="no"
ScrollFlat="no"
Selection="no"
ShowInTaskbar="yes"
SingleInstance="yes"
SysMenu="yes"
Version="1.0"
WindowState="normal"
/>
<style type="text/css">
BODY {
font: x-small Verdana, Arial, sans-serif;
color: WindowText;
background-color: ButtonFace;
margin: 0px;
padding: 0px;
}
</style>
<script language="VBScript">
</script>
</head>
<body id="tagBody" scroll="no" onkeydown="Quit()" onmousedown="Quit()">
<table style="width: 100%; height: 100%;">
<tr>
<td align="center">
<img src="C:\Windows\Web\Wallpaper\Windows\img0.jpg" width="100%" height="100%" />
</td>
</tr>
</table>
</body>
<script language="VBScript">
Option Explicit
With window
.resizeTo .screen.availWidth, .screen.availHeight
.moveTo 0, 0
End With
'=====================================================================
'=====================================================================
Sub Quit()
window.close
End Sub
</script>
</html>
|
| greg zakharov |
30-06-2015 18:04 2524339 |
Код:
Add-Type -AssemblyName System.Windows.Forms
$frmMain = New-Object Windows.Forms.Form
$frmMain.BackgroundImage = [Drawing.Image]::FromFile((cvpa 'картинка'))
$frmMain.BackgroundImageLayout = 'Stretch'
$frmMain.FormBorderStyle = 'None'
$frmMain.TopMost = $true
$frmMain.WindowState = 'Maximized'
$frmMain.Add_Load({
Start-Sleep -Seconds 5
$this.Close()
})
[void]$frmMain.ShowDialog()
|
Вот прям совсем то что нужно! Только полностью убрал верхнюю рамку с кнопками.
Огромное человеческое СПАСИБО.
З.Ы. Не сочти за наглость - а возможно сделать так, что бы еще и панель задач пряталась? Чтоб было максимально похоже на критическую ошибку =) |
Цитата:
Цитата Nic0p0L
Только полностью убрал верхнюю рамку с кнопками. »
|
Цитата:
Цитата Nic0p0L
а возможно сделать так, что бы еще и панель задач пряталась? Чтоб было максимально похоже на критическую ошибку »
|
Nic0p0L, не делайте ни того, ни другого. Для уведомления пользователей ничего из перечисленного не нужно. Желаемое Вами поведение похоже на вирус-вымогатель, не вводите пользователей в ступор. |
Время: 21:33.
© OSzone.net 2001-
