Powershell system windows forms button

Некоторое время назад в компании была развернута терминальная ферма.
Первым делом в неё были выселены пользователи некой желтой программы.
После чего отдел поддержки желтой программы спросил меня, можно ли отсылать сообщения пользователям фермы всем сразу. XaocCPS посоветовал мне играться в сторону WPF. Нужный скрипт был написан, но его работой я неудовлетворился:
1. Надо ставить внешний компонент PowerShellPack.
2. Компонент ставиться на сервера фермы (х64) отказался.
3. Распространять такое решение из за пункта 1 всем желающим не очень удобно.

Xaegr подсказал что я могу избавиться от прослойки WPF.
Писать можно, можно даже писать красиво. Скрипт выполняется везде где есть .Net Framework — XP, Win7 и скорее всего пойдет даже на х64 серверах фермы.
Как писать — под катом.

UPD по просьбам скрипт выложен на SkyDrive, ссылка в конце

И так — ТЗ, полученное от отдела поддержки было «отправка сообщений всем пользователям терминальной фермы».
Мною ТЗ было расширено:
1. Выбор серверов.
2. Выбор пользователей.
3. Ввод текста сообщения.
4. Вставка подписи — идентификатор отправившего сообщения пользователя — виден в заголовке окна, но на него внимание обращают мало, выбрал вариант из нескольких предустановленных вариантов.
5. Защита от нечаянной отправки.

Предварительно было найдено, что в Win7 и 2008* есть команда msg, с помощью которой данные сообщения и будут отправляться, но прием сообщений надо разрешить, что и сделал простеньким regedit файлом:

Windows Registry Editor Version 5.00
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server]
"AllowRemoteRPC"=dword:00000001


К сожалению, если пользователь из списка не подключен к серверу — скрипт много и сильно ругается. Я пока не придумал как получить вывод msg, и его обрабатывать.
Скрипт по максимуму комментирован.
~15kb

# Подключаем то, с помощью чего будем рисовать нашу форму
Add-Type -assembly System.Windows.Forms

	# Все просто, массивы из списка серверов, списка пользоватей, и варианты подписи - чтобы использовать могла не только поддержка.
	$Server        = @("rdp1-1, rdp1-2, rdp1-3, rdp1-4", "rdp2-1, rdp2-2, rdp2-3, rdp2-4")
	$User          = @("*", "1c-admin1, 1c-admin2")
	$Message       = "Умолчательное сообщение"
	# По хорошему, надо бы сделать так, чтобы если умолчательное сообщение не менялось и шло нажатие на кнопку отправить, то выводилось бы предупреждение.
	# Так же по аналогии с тем что есть, тут тоже можно повесить список со стандартными сообщениями

	# Подписываемся
	$Sign          = @("С уважением, администраторы 1С", "С уважением, системные администраторы")

	# Повелось, что все функции описываются до их использования.
	# Функция отправки сообщения. Принимаем параметры, проверяем, если чекбокс включен (а он включен по умолчанию), устанавливаем параметры отправки только на консоль локалхоста, иначе проходим по списку серверов, внутри каждого сервера инициируем цикл по списку пользователей с предварительно отрезанными пробелами до и после текста(помните формат: "сервер1, сервер2, сервер3" для красивой читаемости текста), вызываем сам msg для отправки сообщения и после чего вызываем диалогов окно с подтверждением отправки и закрытием программы.
Function SendMessage {
        param ($Server, $User, $Message, $Sign)
       # Write-Host $Server, $User, $Message, $Sign
        If ($TestRunCheckBox.Checked -eq 1 ) { Write-Host $TestRunCheckBox.Checked; $Server="localhost"; $User = "Console" }
        ForEach ($Item in $Server) {
            ForEach ($UserX in $User) {
                    $UserTrim = $UserX.Trim()
                    $ServerTrim = $Item.Trim()
                    $MsgTrim = $Message.Trim()
                    $SignTrim = $SignX.Trim()
                    # Отладочный вывод, оставлен на всякий случай.
                    # Write-Host "User: $UserTrim; Server: $ServerTrim; Message: $MsgTrim; Signature: $SignTrim"
                    c:\windows\system32\msg.exe $UserTrim /Server:$ServerTrim $MsgTrim $SignTrim
                }
        }
     Confirm
    }

# Вывод окна с подтверждением
Function Confirm {
        $ConfirmWin = New-Object System.Windows.Forms.Form
        $ConfirmWin.StartPosition  = "CenterScreen"
        $ConfirmWin.Text = "Подтверждение отправки"
        $ConfirmWin.Width = 200
        $ConfirmWin.Height = 120
        $ConfirmWin.ControlBox = 0

        $ConfirmWinOKButton = New-Object System.Windows.Forms.Button
        $ConfirmWinOKButton.add_click({ $MainSendWindow.Close(); $ConfirmWin.Close() })
        $ConfirmWinOKButton.Text = "Закрыть"
        $ConfirmWinOKButton.AutoSize = 1
        $ConfirmWinOKButton.Location        = New-Object System.Drawing.Point(50,50)

        $ConfirmLabel = New-Object System.Windows.Forms.Label
        $ConfirmLabel.Text = "Сообщение было отправлено"
        $ConfirmLabel.AutoSize = 1
        $ConfirmLabel.Location  = New-Object System.Drawing.Point(10,10)

        $ConfirmWin.Controls.Add($ConfirmLabel)
        $ConfirmWin.Controls.Add($ConfirmWinOKButton)
        $ConfirmWin.ShowDialog() | Out-Null
    }

# Главное окно, по хорошему тоже стоило бы оформить в виде функции
     $MainSendWindow                = New-Object System.Windows.Forms.Form
     $ToolTip = New-Object System.Windows.Forms.ToolTip

     $ToolTip.BackColor = [System.Drawing.Color]::LightGoldenrodYellow
     $ToolTip.IsBalloon = $true
     # $ToolTip.InitialDelay = 500
     # $ToolTip.ReshowDelay = 500

     # Инициализация контролов формы
     # Кнопки и чекбокс
     $SendButton                   = New-Object System.Windows.Forms.Button
     $CloseButton                   = New-Object System.Windows.Forms.Button
     $TestRunCheckBox           = New-Object System.Windows.Forms.CheckBox

     # Текстовые поля и списки
     $ServerTextBox                = New-Object System.Windows.Forms.ComboBox
     $UserTextBox                   = New-Object System.Windows.Forms.ComboBox
     $MessageTextBox             = New-Object System.Windows.Forms.TextBox
     $SignTextBox                   = New-Object System.Windows.Forms.ComboBox

     # Подписи
     $ServerTextBoxLabel           = New-Object System.Windows.Forms.Label
     $UserTextBoxLabel              = New-Object System.Windows.Forms.Label
     $MessageTextBoxLabel        = New-Object System.Windows.Forms.Label
     $SignTextBoxLabel              = New-Object System.Windows.Forms.Label

# Описываем свойства (комментариями я еще добавлю несколько нагугленных
# интересных свойств для общего развития и чтобы далеко не бегать ;))

# Главная форма
$MainSendWindow.StartPosition  = "CenterScreen"
$MainSendWindow.Text           = "Отправка сообщения пользователям"
$MainSendWindow.Width          = 470
$MainSendWindow.Height         = 220
# несколько плюшек и обещанных красивостей
#$Win.ControlBox           = 0 # отключить кнопки свернуть, минимизацию и закрытие.
# $Win.ShowIcon             = 0
# $Win.ShowInTaskbar        = 0
# $Win.HelpButton           = 1
# авторазмер может отрабатывать если вся форма - к примеру одна кнопка "Сделать хорошо"
# $Win.Autosize             = 1
# $Win.AutoSizeMode         = "GrowAndShrink"
# стиль обрамления и шрифт.
# $Win.FormBorderStyle      = [System.Windows.Forms.FormBorderStyle]::Fixed3D
# $Win.Font                 = New-Object System.Drawing.Font("Verdana",32)

# Подписи к текстовым полям
$ServerTextBoxLabel.Location   = New-Object System.Drawing.Point(10,12)
$ServerTextBoxLabel.Text       = "Список серверов"
$ServerTextBoxLabel.Autosize     = 1

$UserTextBoxLabel.Location     = New-Object System.Drawing.Point(10,42)
$UserTextBoxLabel.Text         = "Список пользователей"
$UserTextBoxLabel.Autosize     = 1

$MessageTextBoxLabel.Location  = New-Object System.Drawing.Point(10,73)
$MessageTextBoxLabel.Text      = "Сообщение"
$MessageTextBoxLabel.Autosize  = 1
# Плюшка в виде красивой подсказки, делается другим методом вызова, поэтому идет к каждому обьекту в блоке, чтобы не теряться.
$ToolTip.SetToolTip($MessageTextBoxLabel, "Надо подписаться, а то в заголовке окна с сообщениями не видно")

$SignTextBoxLabel.Location     = New-Object System.Drawing.Point(10,103)
$SignTextBoxLabel.Text         = "Подпись"
$SignTextBoxLabel.Autosize     = 1
$ToolTip.SetToolTip($SignTextBoxLabel, "Надо подписаться, а то в заголовке окна с сообщениями не видно")

# Описание текстбокса
# Позиция
$ServerTextBox.Location        = New-Object System.Drawing.Point(140,10)
# Источник данных
$ServerTextBox.DataSource      = $Server
# Размер
$ServerTextBox.Width           = 300
# Обработка события - при смене текста в поле, присваиваем переменной новое полученное значение.
$ServerTextBox.add_TextChanged({ $Server = $ServerTextBox.Text })
# индекс порядка перехода по Tab
$ServerTextBox.TabIndex        = 1
$ToolTip.SetToolTip($ServerTextBox, "Укажите список серверов")

$UserTextBox.Location          = New-Object System.Drawing.Point(140,40)
$UserTextBox.DataSource        = $User
# Не забываем про массив
$UserTextBox.Text              = $User[1]
$UserTextBox.add_TextChanged({ $User = $UserTextBox.Text })
$UserTextBox.Width             = 300
$UserTextBox.TabIndex          = 2
$ToolTip.SetToolTip($UserTextBox, "Кому отправлять будем? (* для *всех* пользователей, по умолчанию)")

# Поле сообщения
$MessageTextBox.Location       = New-Object System.Drawing.Point(140,70)
$MessageTextBox.Text           = $Message
# По клику в поле ввода - автоматически выделяем весь текст, чтобы не надо было
# нажимать удаление
$MessageTextBox.add_click({ $MessageTextBox.SelectAll() })
$MessageTextBox.add_TextChanged( { $Message = $MessageTextBox.Text })
$MessageTextBox.Width          = 300
$MessageTextBox.TabIndex       = 3
$ToolTip.SetToolTip($MessageTextBox, "И шо мы таки хотим сказать?")

# Поле подписи - отправляемая переменная уже другая
$SignTextBox.Location          = New-Object System.Drawing.Point(140,103)
# Источник текста для подписи
$SignTextBox.DataSource        = $Sign
# А мы помним, что там массив?:)
$SignTextBox.Text              = $Sign[1]
$SignTextBox.add_TextChanged({ $SignX = $SignTextBox.Text })
$SignTextBox.Width             = 300
$SignTextBox.TabIndex          = 4
$ToolTip.SetToolTip($SignTextBox, "Страна должна знать своих героев")

# Нопка отправки.
$SendButton.Location           = New-Object System.Drawing.Point(10,150)
$SendButton.Text               = "Отправить сообщение"
# Выполняем разделения строк на массивы с разделителем запятая, вызываем функцию отправки сообщения
$SendButton.add_click({ $User  = $UserTextBox.Text.Split(","); $Server = $ServerTextBox.Text.Split(","); $SignX = $SignTextBox.Text; SendMessage $Server $User $Message $SignX} )
$SendButton.Autosize           = 1
$SendButton.TabIndex           = 5
$ToolTip.SetToolTip($SendButton, "Тыцни пимпочку")

# Прописываем блокировочный чекбокс
$TestRunCheckBox.Location      = New-Object System.Drawing.Point(200,150)
$TestRunCheckBox.Text          = "Тест"
$TestRunCheckBox.Checked       = 1
$TestRunCheckBox.AutoSize      = 1
$TestRunCheckBox.TabIndex      = 6
$ToolTip.SetToolTip($TestRunCheckBox, "Сними меня, а то работать не будет")

# Кнопочка выхода, по событию вызывает метод закрытия
$CloseButton.Location          = New-Object System.Drawing.Point(315,150)
$CloseButton.Text              = "Выйти из программы"
$CloseButton.add_click({ $MainSendWindow.Close() })
$CloseButton.Autosize          = 1
$CloseButton.TabIndex          = 7
$ToolTip.SetToolTip($CloseButton, "Пойдем ка отсюда")


# Добавляем контролы в форму и вызываем её запуск
$MainSendWindow.Controls.Add($SendButton)
$MainSendWindow.Controls.Add($TestRunCheckBox)
$MainSendWindow.Controls.Add($CloseButton)

$MainSendWindow.Controls.Add($ServerTextBox)
$MainSendWindow.Controls.Add($UserTextBox)
$MainSendWindow.Controls.Add($MessageTextBox)
$MainSendWindow.Controls.Add($SignTextBox)

$MainSendWindow.Controls.Add($ServerTextBoxLabel)
$MainSendWindow.Controls.Add($UserTextBoxLabel)
$MainSendWindow.Controls.Add($MessageTextBoxLabel)
$MainSendWindow.Controls.Add($SignTextBoxLabel)

$MainSendWindow.ShowDialog() | Out-Null

В результате получилась вот такая вот красивость

Скрипт могу выложить, при желании читателей, куда-то.

Не уверен, что хватит кармы публировать в профильный, поэтому выложил сюда

Исходник скрипта на GitHub’е

PowerShell GUI with buttons, textbox and combobox

GUI makes
life easier, but of course command line has a power of its own.

How to add a
form in PowerShell with Buttons, TextBox and ComboBox?

Adding GUI
forms in PowerShell must be done manually by code.

It’s not
that hard, you just need to love PowerShell and see what it can do to automate
IT administration and makes your life easier.

Anyway,
code below introduces how to add GUI to PowerShell and it also illustrates how
to make use of those GUI buttons and send a command to remote computers.

Code to add buttons, textbox and combobox in PowerShell, and how to execute a command after the button is clicked.

#initialize
the main form

$form = new-object Windows.forms.form

$form.text = «Server
Selection Form»

$form.minimumSize = New-Object System.Drawing.Size(600,300)

$form.maximumSize = New-Object System.Drawing.Size(600,300)

#add a button to the form

$button = new-object windows.forms.button

$button.text = «Close
Me»

#action that the button will execute after it has been clicked

$button.add_click({$form.close()})

#add a textbox to the form

$theTbox = New-Object system.Windows.Forms.Textbox

$theTbox.location = New-Object system.Drawing.Size(0,50)

$theTbox.size = New-Object System.Drawing.Size(100,20)

#add a drop down combobox to the form

$the_combo = New-Object system.Windows.Forms.ComboBox

$the_combo.location = New-Object system.Drawing.Size(0,90)

$the_combo.size = New-Object System.Drawing.Size(200,20)

$the_combo.DropDownStyle = «Dropdownlist»

#add another button to the form

$Go_button = new-object windows.forms.button

$Go_button.text = «Do
the Action»

$Go_button.location = New-Object system.Drawing.Size(0,190)

$Go_button.size = New-Object System.Drawing.Size(110,30)

#You can customized the command on this button

#Example below will shutdown the selected
computer
#Invoke-command for remote computer can also be used (imagination is your
friend 😊 )

$Go_button.add_click({Stop-Computer -ComputerName $theTbox.text})

#the “@” symbol will create an array out
of the text file contents

$ComboList_Items = Get-Content -Path @(«C:\dev\server_list.txt»)

#Loop thru the text file or the array

#and add the contents to the combobox for
selection

ForEach ($Server in $ComboList_Items) {

  $the_combo.Items.Add($Server)

}

$form.controls.add($theTbox)

$form.controls.add($button)

$form.controls.add($Go_button)

$form.controls.add($the_combo)

$form.Add_shown({$form.Activate()})

#action that will capture every time a
value is selected on the combobox

$the_combo_SelectedIndexChanged=

{

 $theTbox.text= $the_combo.text

}

$the_combo.add_SelectedIndexChanged($the_combo_SelectedIndexChanged)

$form.ShowDialog()

#===== CODE ends here ======

#The contents of the text file just look
like this:

Server-1

Server-2

Server-3

Server-4

Server-5

Server-6

Server-7

Localhost

Above
contents is the one that is being read by this line below, change the path and
the filename as necessary. It’s just for example purposes.

PowerShell Forms GUI allows users to create graphical user interfaces for their scripts, making it easier for users to interact with PowerShell commands through visual elements rather than the command line.

Here’s a simple code snippet to create a basic form in PowerShell:

Add-Type -AssemblyName System.Windows.Forms

$form = New-Object System.Windows.Forms.Form
$form.Text = 'My PowerShell GUI'
$form.Size = New-Object System.Drawing.Size(300,200)

$button = New-Object System.Windows.Forms.Button
$button.Location = New-Object System.Drawing.Point(100,70)
$button.Size = New-Object System.Drawing.Size(100,30)
$button.Text = 'Click Me'
$button.Add_Click({ [System.Windows.Forms.MessageBox]::Show('Hello, World!') })

$form.Controls.Add($button)
$form.ShowDialog()

Understanding Windows Forms

What is Windows Forms?

Windows Forms is a graphical (GUI) class library included as a part of the .NET Framework, allowing developers to create rich desktop applications. It provides a straightforward way to build user interfaces by offering a wide array of pre-defined controls. Since its introduction, Windows Forms has evolved to become a staple for developers looking to create traditional desktop applications for Windows.

Creating a Basic Windows Form

To get started with PowerShell Forms GUI, you first need to utilize the System.Windows.Forms namespace, which contains classes for building forms and controls. Here’s a simple code snippet to create a basic form:

Add-Type -AssemblyName System.Windows.Forms
$form = New-Object System.Windows.Forms.Form
$form.Text = "Hello World Form"
$form.ShowDialog()

This code initializes a basic Windows Form that simply displays a dialog with the title «Hello World Form.» The `ShowDialog()` method displays the form as a modal dialog box, blocking input to other windows until the form is closed.

Картинка с сайта: powershellcommands.com

Mastering PowerShell Format for Effortless Command Crafting

Designing a PowerShell GUI

Essential GUI Components

Common Controls are the building blocks of any GUI. Here’s a brief overview of some significant controls you’ll often use:

• Buttons: Triggers actions when clicked, such as executing commands or submitting forms.
• TextBoxes: Allows users to input text data.
• Labels: Displays static text or information that is read-only.
• ListBoxes: Displays a list of items from which users can select.

Layout Management

Effective layout management is crucial for usability. Various layout options like `FlowLayoutPanel` and `TableLayoutPanel` can help organize your controls neatly within the form. These layouts adjust dynamically based on the size and position of individual controls, improving the overall user experience.

Example: Building a Simple Calculator

Initial Setup

To illustrate how to create a more complex GUI, we’ll build a simple calculator. Here’s how to set up the initial form:

$form = New-Object System.Windows.Forms.Form
$form.Text = "Simple Calculator"
$form.Size = New-Object System.Drawing.Size(250, 200)
# Additional setup code will go here

Adding Controls

Next, we can add buttons and text boxes for our calculator functionality. For example, we’ll add two text boxes for input and a button for the addition operation.

$num1 = New-Object System.Windows.Forms.TextBox
$num2 = New-Object System.Windows.Forms.TextBox
$result = New-Object System.Windows.Forms.TextBox
$button = New-Object System.Windows.Forms.Button

$num1.Location = New-Object System.Drawing.Point(20, 20)
$num2.Location = New-Object System.Drawing.Point(20, 60)
$result.Location = New-Object System.Drawing.Point(20, 140)
$button.Location = New-Object System.Drawing.Point(20, 100)
$button.Text = "+"
$form.Controls.Add($num1)
$form.Controls.Add($num2)
$form.Controls.Add($result)
$form.Controls.Add($button)

Event Handling

Event handling is where PowerShell Forms really shines. You can make your application interactive by responding to user actions. Here’s how to handle the button click event:

$button.Add_Click({
    $result.Text = [int]$num1.Text + [int]$num2.Text
})

This code will take the text from the two input text boxes, convert them into integers, and display the sum in the result text box when the button is clicked.

Customizing the Form

Styling and Appearance are important aspects of any GUI. You can enhance your form’s appearance by adjusting control properties, such as size, colors, and fonts:

$form.BackColor = [System.Drawing.Color]::LightGray
$button.BackColor = [System.Drawing.Color]::Green
$form.Size = New-Object System.Drawing.Size(300, 250)

Using Icons and Images is another way to make your application visually appealing. Setting an icon for your form can provide a professional touch:

$form.Icon = [System.Drawing.Icon]::ExtractAssociatedIcon("app.ico")

Картинка с сайта: powershellcommands.com

Mastering the PowerShell Formatter: A Quick Guide

Advanced Techniques

Integrating PowerShell Scripts with GUI

One of the most powerful features of a PowerShell Forms GUI is the capability to execute scripts from the GUI. For instance, you can run a PowerShell script when a specific action occurs, such as a button click.

Populating Data into Controls

Another advanced feature is dynamic data binding. You can populate a ListBox or ComboBox control with dynamic data from arrays or other data sources. Here’s how you would populate a ComboBox:

$comboBox = New-Object System.Windows.Forms.ComboBox
$comboBox.Location = New-Object System.Drawing.Point(20, 180)
$comboBox.Items.AddRange(@("Option 1", "Option 2", "Option 3"))
$form.Controls.Add($comboBox)

Validating User Input

Input validation is essential for maintaining the integrity of your application. When collecting user data, it’s important to ensure that the data entered meets the expected criteria:

if (-not $num1.Text -or -not $num2.Text) {
    [System.Windows.Forms.MessageBox]::Show("Both fields must be filled!")
}

Using MessageBox to display alerts can help inform users about input errors effectively.

Картинка с сайта: powershellcommands.com

PowerShell Format Number: Essentials Made Easy

Debugging and Error Handling

Common Errors in PowerShell GUI

While working with PowerShell Forms, you might encounter typical pitfalls, such as control placement issues or incorrect data types. Understanding these issues can save you time during development.

Implementing Error Handling

To create a smooth user experience, implementing error handling using try-catch blocks is crucial:

try {
    # Code that may cause an exception
    $result.Text = [int]$num1.Text + [int]$num2.Text
} catch {
    [System.Windows.Forms.MessageBox]::Show("An error occurred: $_")
}

This ensures that your application handles unexpected issues gracefully, providing valuable feedback to users rather than crashing.

Картинка с сайта: powershellcommands.com

Mastering PowerShell ToString: Quick Conversion Guide

Conclusion

In summary, creating a PowerShell Forms GUI allows you to develop rich, interactive applications that make use of PowerShell’s powerful scripting capabilities. From creating simple forms and controls to implementing advanced features like event handling and dynamic data binding, the possibilities are vast.

As you experiment with these techniques, don’t be afraid to think creatively and challenge yourself. Each project you undertake builds your skills further. For ongoing learning, explore the wealth of resources available such as books, tutorials, and online communities centered around PowerShell.

By starting today, you can create beautiful and functional GUIs that not only enhance your automation scripts but also broaden your capabilities as a developer in the PowerShell ecosystem. Happy scripting!