👨🏽‍✈️ 💇🏽 🤖 पॉवरशेल और जीयूआई। यह मुश्किल नहीं है 🦃 🥓 📩

कुछ समय पहले, कंपनी ने एक टर्मिनल फार्म लॉन्च किया।
सबसे पहले, एक निश्चित पीले कार्यक्रम के उपयोगकर्ताओं को इसके लिए हटा दिया गया था।
उसके बाद, पीले कार्यक्रम के समर्थन विभाग ने मुझसे पूछा कि क्या एक ही बार में सभी को खेत उपयोगकर्ताओं को संदेश भेजना संभव है XaocCPS ने मुझे WPF की ओर खेलने की सलाह दी। आवश्यक स्क्रिप्ट लिखी गई थी, लेकिन मैं इसके काम से संतुष्ट नहीं था:
1. बाहरी घटक PowerShellPack को स्थापित करना आवश्यक है।
2. फार्म सर्वर (x64) पर लगाए गए घटक ने इनकार कर दिया।
3. क्‍लॉज 1 के कारण इस तरह के निर्णय को वितरित करना हर किसी के लिए बहुत सुविधाजनक नहीं है।

Xaegr ने सुझाव दिया कि मैं WPF परत से छुटकारा पा सकता हूं।
आप लिख सकते हैं, आप खूबसूरती से भी लिख सकते हैं। स्क्रिप्ट जहां भी होती है, वहां चलती है .नेट फ्रेमवर्क - एक्सपी, विन 7 और सबसे अधिक संभावना है कि यह x64 फार्म सर्वर पर भी काम करेगा।
कैसे लिखें - कटौती के तहत।

स्क्रिप्ट के अनुरोध पर UPD स्काईड्राइव पर पोस्ट किया गया है, अंत में लिंक

और इसलिए - समर्थन विभाग से प्राप्त टीके "टर्मिनल फार्म के सभी उपयोगकर्ताओं को संदेश भेज रहा था"।
मैंने TK का विस्तार किया है:
1. सर्वर का विकल्प।
2. उपयोगकर्ताओं की पसंद।
3. संदेश पाठ दर्ज करें।
4. हस्ताक्षर सम्मिलित करें - संदेश भेजने वाले उपयोगकर्ता का पहचानकर्ता - विंडो शीर्षक में दिखाई देता है, लेकिन इस पर थोड़ा ध्यान दिया जाता है; मैंने कई पूर्वनिर्धारित विकल्पों में से एक विकल्प चुना।
5. अनजाने प्रेषण के खिलाफ संरक्षण।

पहले, यह पाया गया कि Win7 और 2008 में * एक संदेश कमांड है, जिसकी मदद से संदेश डेटा भेजा जाएगा, लेकिन संदेशों के रिसेप्शन को सक्षम करना आवश्यक है, जिसने एक सरल regedit फ़ाइल बनाई:

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

दुर्भाग्य से, यदि सूची से कोई उपयोगकर्ता सर्वर से जुड़ा नहीं है - स्क्रिप्ट बहुत कुछ है और कसम खाता है। मुझे अभी तक यह पता नहीं चला है कि संदेश आउटपुट कैसे प्राप्त करें, और इसे प्रोसेस करें।
स्क्रिप्ट पर अधिकतम टिप्पणी की गई है।
~ 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

परिणाम ऐसी ही एक पूर्वधारणा है

पाठकों द्वारा वांछित होने पर, स्क्रिप्ट कहीं रखी जा सकती है।

यकीन नहीं होता कि प्रोफ़ाइल में प्रकाशित करने के लिए पर्याप्त कर्म हैं, इसलिए मैंने इसे यहां पोस्ट किया

गिटहब लिपि स्रोत

पॉवरशेल और जीयूआई। यह मुश्किल नहीं है

More articles: