Hallo,
ich habe ein PS im INet gefunden und für meinen Bedarf verändert. Jetzt habe ich aber noch das Problem, dass ich die getroffene Auswahl des RadioButtons nicht abfragen kann. Wer kann mir da helfen?
$computername = "Client007" $Quelle = "\\SRV004\d$\Tools\Powershell_Scriptsammlung" $Files = gci -name -Path $Quelle *.ps1 -Exclude Menue.*| foreach {$_ -replace ".ps1", ""} #region Import the Assemblies [reflection.assembly]::loadwithpartialname("System.Windows.Forms") | Out-Null [reflection.assembly]::loadwithpartialname("System.Drawing") | Out-Null #endregion ############################################################## # Funktion Deklarieren! (wird nicht ausgeführt!) Function Create-MenuRadioButtons { param ( # Parameter der die Form darstellt in der die RadioButtons erzeugt werden # Die Form wird als Parameter übergeben! [Parameter(Mandatory=$True)] [ValidateNotNull()] [System.Windows.Forms.Form]$Form ) foreach ($d in $Files) { $k = $k += 1 $RadioButton = New-Object System.Windows.Forms.RadioButton $RadioButton.DataBindings.DefaultDataSourceUpdateMode = 0 $System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 30 $System_Drawing_Point.Y = 33 * $k $RadioButton.Location = $System_Drawing_Point $RadioButton.Name = "radioButton" + $k $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 50 $System_Drawing_Size.Width = 200 $RadioButton.Size = $System_Drawing_Size $RadioButton.TabIndex = 3 $RadioButton.TabStop = $true $RadioButton.Text = -join ($k,". ",$d) $RadioButton.UseVisualStyleBackColor = $True $Form.Controls.Add($RadioButton) } } ############################################################## #region Generated Form Objects $form1 = New-Object System.Windows.Forms.Form $button3 = New-Object System.Windows.Forms.Button $button2 = New-Object System.Windows.Forms.Button $button1 = New-Object System.Windows.Forms.Button #endregion Generated Form Objects $button1_OnClick= { Write-Host "D=" $d Write-Host "K=" $k #write-host "powershell.exe " "$Quelle\$($Files[$d]).ps1 $computername" #Start-Process "powershell.exe " "$Quelle\$($Files[$d]).ps1 $computername" } $button3_OnClick= { $form1.close() } $button2_OnClick= {¬epad # Funktion Aufrufen Radiobuttons erzeugen in der Form #Create-MenuRadioButtons $form1 } #---------------------------------------------- #region Generated Form Code $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 500 $System_Drawing_Size.Width = 500 $form1.ClientSize = $System_Drawing_Size $form1.DataBindings.DefaultDataSourceUpdateMode = 0 $form1.Name = "form1" $form1.Text = "Client Support" $form1.StartPosition = 1 $form1.FormBorderStyle = 1 $System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 280 $System_Drawing_Point.Y = 160 $button3.Location = $System_Drawing_Point $button3.DataBindings.DefaultDataSourceUpdateMode = 0 $button3.Name = "button3" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 35 $System_Drawing_Size.Width = 140 $button3.Size = $System_Drawing_Size $button3.TabIndex = 2 $button3.Text = "Beenden" $button3.UseVisualStyleBackColor = $True $button3.add_Click($button3_OnClick) $form1.Controls.Add($button3) $System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 280 $System_Drawing_Point.Y = 110 $button2.Location = $System_Drawing_Point $button2.DataBindings.DefaultDataSourceUpdateMode = 0 $button2.Name = "button2" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 35 $System_Drawing_Size.Width = 140 $button2.Size = $System_Drawing_Size $button2.TabIndex = 1 $button2.Text = "Notepad" $button2.UseVisualStyleBackColor = $True $button2.add_Click($button2_OnClick) $form1.Controls.Add($button2) $System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 280 $System_Drawing_Point.Y = 60 $button1.Location = $System_Drawing_Point $button1.DataBindings.DefaultDataSourceUpdateMode = 0 $button1.Name = "button1" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height =35 $System_Drawing_Size.Width = 140 $button1.Size = $System_Drawing_Size $button1.TabIndex = 0 $button1.Text = "Run Script" $button1.UseVisualStyleBackColor = $True $button1.add_Click($button1_OnClick) $form1.Controls.Add($button1) # Funktion Aufrufen Radiobuttons erzeugen in der Form Create-MenuRadioButtons $form1 #endregion Generated Form Code #Show the Form $form1.ShowDialog()| Out-Null
IT Berater