Beiträge von Hingo

Hingo

Also gibt $_.PSisContainer an ob es sich um ein Ordnerverzeichniss handelt oder nicht.

Hingo

Perfekt danke.

Edit:
Kann es sein das dein Code nur bei Ordnern funktioniert. Habe ausprobiert die Registry damit auszulesen geht nicht.#

Fehlermeldung:

Code

Get-ChildItem : Die Methode kann nicht aufgerufen werden. Der Anbieter unterstützt keine Verwendung von Filtern.
In C:\Users\DL6T4RR\Desktop\User löschen\User löschen.ps1:47 Zeichen:1
+ Get-ChildItem $RegUser -filter * | ? { $_.PSisContainer -eq $true -and $Regexclu ...
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : NotImplemented: (:) [Get-ChildItem], PSNotSupportedException
    + FullyQualifiedErrorId : NotSupported,Microsoft.PowerShell.Commands.GetChildItemCommand

Hingo

Moin Leute,
ich muss den Ordner C:\Users auslesen und alle User Ordner außer Administrator, Default und Öffentlich löschen.
Geht es die Ordner zu filtern mit diesem Attribute Where-Object {$_.Name -like "*python*"}

Das wäre jetzt mein Ansatz, ist nur die Funktion zum auslesen.

Spoiler anzeigen

Bash

Get-ChildItem -Path $User | SELECT Name | Format-Table -AutoSize | Where-Object {$_.Name -ne "Administrator","Default","Public"};

Danke schonmal.

Hingo

Moin hab das hier gefunden, schau mal ob du damit was anfangen kannst.

Class name ändern

Hingo

Danke @Zeitriss hat Funktioniert.

Spoiler anzeigen

Bash

Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing


  #MessageBox erstellen
  $form = New-Object System.Windows.Forms.Form                                 
  $form.Text = "MessageBox mit Button"                                          
  $form.Size = New-Object System.Drawing.Size(300,120)                       
  $form.StartPosition = "CenterScreen"                                         


  #Label erstellen
  $label = New-Object System.Windows.Forms.Label                               
  $label.Location = New-Object System.Drawing.Point(75,10)                     
  $label.Size = New-Object System.Drawing.Size(150,30)                          
  $label.Text = "Drücke auf >Weiter<"                                          
   $form.Controls.Add($label) 


  #Schließen Button
  $SchButton = New-Object System.Windows.Forms.Button                          
  $SchButton.Location = New-Object System.Drawing.Point(65,40)                 
  $SchButton.Size = New-Object System.Drawing.Size(75,23)                      
  $SchButton.Text = "Schließen"                                                
  $SchButton.DialogResult = [System.Windows.Forms.DialogResult]::OK            
   $form.AcceptButton = $SchButton                                            
   $form.Controls.Add($SchButton)                                              


  #Weiter Button
  $WeiButton = New-Object System.Windows.Forms.Button
  $WeiButton.Location = New-Object System.Drawing.Point(145,40)
  $WeiButton.Size = New-Object System.Drawing.Size(65,23)
  $WeiButton.Text = "Weiter"
   $form.AcceptButton = $WeiButton
   $form.Controls.Add($WeiButton)


   
 
  #Erstellt die 2te GUI
  $form1 = New-Object System.Windows.Forms.Form
  $form1.Text = "MessageBox mit Button"
  $form1.Size = New-Object System.Drawing.Size(300,150)
  $form1.StartPosition = "CenterScreen"


  #Erstellt das 2te Label
  $label = New-Object System.Windows.Forms.Label
  $label.Location = New-Object System.Drawing.Point(65,10)
  $label.Size = New-Object System.Drawing.Size(150,35)
  $label.Text = "Gebe etwas ein und drücke auf >Senden<"
   $form1.Controls.Add($label)


  #Erstellt eine InputBox
  $objInput = New-Object System.Windows.Forms.TextBox
  $objInput.Size = New-Object System.Drawing.Size(150,10)
  $objInput.Location = New-Object System.Drawing.Point(65,45)
   $form1.Controls.Add($objInput)


  #SendButton
  $SendButton = New-Object System.Windows.Forms.Button
  $SendButton.Size = New-Object System.Drawing.Size(75,23)
  $sendButton.Location = New-Object System.Drawing.Point(145,75)
  $SendBUtton.Text = "Senden"
   $form1.AcceptButton = $SendButton
   $form1.Controls.Add($SendButton)


  #Erstellt den SchließenButton No.2
  $Sch2Button = New-Object System.Windows.Forms.Button
  $Sch2Button.Location = New-Object System.Drawing.Point(60,75)
  $Sch2Button.Size = New-Object System.Drawing.Size(75,23)
  $Sch2Button.Text = "Schließen"
  $Sch2Button.DialogResult = [System.Windows.Forms.DialogResult]::OK
   $form1.AcceptButton = $Sch2Button
   $form1.Controls.Add($Sch2Button)


  #Erstellt Label :-) und (-:
  $:Label = New-Object System.Windows.Forms.Label
  $:Label.Location = New-Object System.Drawing.Point(20,10)
  $:Label.Size = New-Object System.Drawing.Size(20,20)
  $:Label.Text = ":-)"
   $form1.Controls.Add($:Label)
  $:Label2 = New-Object System.Windows.Forms.Label
  $:Label2.Location = New-Object System.Drawing.Point(245,10)
  $:Label2.Size = New-Object System.Drawing.Size(20,20)
  $:Label2.Text = "(-:"
   $form1.Controls.Add($:Label2)
  $:Label3 = New-Object System.Windows.Forms.Label
  $:Label3.Location = New-Object System.Drawing.Point(20,80)
  $:Label3.Size = New-Object System.Drawing.Size(20,20)
  $:Label3.Text = ":-)"
   $form1.Controls.Add($:Label3)
  $:Label4 = New-Object System.Windows.Forms.Label
  $:Label4.Location = New-Object System.Drawing.Point(245,80)
  $:Label4.Size = New-Object System.Drawing.Size(20,20)
  $:Label4.Text = "(-:"
   $form1.Controls.Add($:Label4)

  #Erstellt Label -------> und <-------
  $Label1 = New-Object System.Windows.Forms.Label
  $Label1.Location = New-Object System.Drawing.Point(20,48)
  $Label1.Size = New-Object System.Drawing.Size(50,20)
  $Label1.Text = "------->"
   $form1.Controls.Add($Label1)
  $Label5 = New-Object System.Windows.Forms.Label
  $Label5.Location = New-Object System.Drawing.Point(220,48)
  $Label5.Size = New-Object System.Drawing.Size(50,20)
  $Label5.Text = "<-------"
   $form1.Controls.Add($Label5)




#Funktion InputBox senden an PC mit Antwort des PC´s
$SendButton.Add_Click{
 If ($objInput.Text -eq "Hallo")
   {
    [System.Windows.Forms.MessageBox]::Show("Moin wer ist da?","Nachricht",0)
   }
  else
   {
    [System.Windows.Forms.MessageBox]::Show("Was willst du von mir?","Nachricht",0)
   }
}




#Funktion WeiterButton
$WeiButton.Add_Click(
  {
    $form1.Add_Shown({$textBox.Select})
    $result = $form1.ShowDialog()
  }
)




  #Zeigt die Haupt GUI
  $form.Add_Shown({$textBox.Select})                                           
  $result = $form.ShowDialog()

Alles anzeigen

Hingo

Mit deiner Lösung zeigt er immer an "Was willst du von mir?". Er soll es ja nur anzeigen wenn nichts in die InputBox geschrieben wurde.

Hingo

Danke.
Aber das Funkt auch nicht, habe auch schon gegooglet.
Muss aber erst mal wieder an Autoit ran, das ist so stressig

Hingo

Moin,
wenn ihr Lust und Zeit habt könnt ihr ja mal drübergucken.
Also ich habe eine GUI mit einer InputBox, dort möchte ich wenn man Hallo ein gibt und auf Senden klickt, das der PC eine MsgBox zurück gibt, wenn man nicht Hallo eingibt dann soll er dies auch machen doch mit einer anderen Nachricht.

Hier mein Code:

Spoiler anzeigen

Bash

Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing




  $form = New-Object System.Windows.Forms.Form                 
  $form.Text = "MessageBox mit Button"                                 
  $form.Size = New-Object System.Drawing.Size(300,120)                   
  $form.StartPosition = "CenterScreen"                                         




  $label = New-Object System.Windows.Forms.Label                              
  $label.Location = New-Object System.Drawing.Point(75,10)                    
  $label.Size = New-Object System.Drawing.Size(150,30)                          
  $label.Text = "Drücke auf >Weiter<"                                         
   $form.Controls.Add($label) 




  $SchButton = New-Object System.Windows.Forms.Button                          
  $SchButton.Location = New-Object System.Drawing.Point(65,40)                
  $SchButton.Size = New-Object System.Drawing.Size(75,23)                     
  $SchButton.Text = "Schließen"                                               
  $SchButton.DialogResult = [System.Windows.Forms.DialogResult]::OK           
   $form.AcceptButton = $SchButton                                              
   $form.Controls.Add($SchButton)                                               




  $WeiButton = New-Object System.Windows.Forms.Button
  $WeiButton.Location = New-Object System.Drawing.Point(145,40)
  $WeiButton.Size = New-Object System.Drawing.Size(65,23)
  $WeiButton.Text = "Weiter"
   $form.AcceptButton = $WeiButton
   $form.Controls.Add($WeiButton)




  $form1 = New-Object System.Windows.Forms.Form
  $form1.Text = "MessageBox mit Button"
  $form1.Size = New-Object System.Drawing.Size(300,150)
  $form1.StartPosition = "CenterScreen"




  $label = New-Object System.Windows.Forms.Label
  $label.Location = New-Object System.Drawing.Point(65,10)
  $label.Size = New-Object System.Drawing.Size(150,35)
  $label.Text = "Gebe etwas ein und drücke auf >Senden<"
   $form1.Controls.Add($label)




  $input = New-Object System.Windows.Forms.TextBox
  $input.Size = New-Object System.Drawing.Size(150,10)
  $input.Location = New-Object System.Drawing.Point(65,45)
   $form1.Controls.Add($input)




  $SendButton = New-Object System.Windows.Forms.Button
  $SendButton.Size = New-Object System.Drawing.Size(75,23)
  $sendButton.Location = New-Object System.Drawing.Point(145,75)
  $SendBUtton.Text = "Senden"
   $form1.AcceptButton = $SendButton
   $form1.Controls.Add($SendButton)




  $Sch2Button = New-Object System.Windows.Forms.Button
  $Sch2Button.Location = New-Object System.Drawing.Point(60,75)
  $Sch2Button.Size = New-Object System.Drawing.Size(75,23)
  $Sch2Button.Text = "Schließen"
  $Sch2Button.DialogResult = [System.Windows.Forms.DialogResult]::OK
   $form1.AcceptButton = $Sch2Button
   $form1.Controls.Add($Sch2Button)






$SendButton.Add_Click{
 If ($input = "Hallo")
   {
    [System.Windows.Forms.MessageBox]::Show("Moin wer ist da?","Nachricht",0)
   }
  else
   {
    [System.Windows.Forms.MessageBox]::Show("Was willst du von mir?","Nachricht",0)
   }
   }






$WeiButton.Add_Click(
  {
    $form1.Add_Shown({$textBox.Select})
    $result = $form1.ShowDialog()
  }
)


  $form.Add_Shown({$textBox.Select})
  $result = $form.ShowDialog()

Alles anzeigen

Danke schon mal im voraus.

Hingo

Moin, du musst den Include von der MsgBox einfügen.

Das heißt am Anfang deines Skriptes muss #include <MsgBoxConstants.au3> stehen.

Bei mir kommt dann aber eine MsgBox mit sehr vielen Zeichen, meinst du das mit PDF auslesen?

Hingo

Perfekt funktioniert wenn ich es in "" setze. Danke nochmal.

Hingo

Danke

Hingo

Wie kann ich das in die andere Kategorie stellen?

Hingo

Code

'_________________________Checkliste_________________________
' | out-file C:\logs\TestPowershell.txt                                                   #out-file erstellt eine Textdatei
                                                                                          #Add-Content fügt Text in ein txtfile hinzu
Add-Content C:\logs\TestPowershell.txt '            BPCS Checkliste               
=======================================
Current Date/Time'                                                        
Get-Date                                  >> C:\logs\TestPowershell.txt                   #>> fügt Text in ein txtfile hinzu


'*************Computer Data*************' >> C:\logs\TestPowershell.txt
getmac                                    >> C:\logs\TestPowershell.txt
''                                        >> C:\logs\TestPowershell.txt


'*****************Users*****************' >> C:\logs\TestPowershell.txt
#User DL6T4RR exists
If (Test-Path C:\Users\DL6T4RR)
{
     'Der User DL6T4RR existiert'         >> C:\logs\TestPowershell.txt
}
else
{
     'Der User DL6T4RR existiert nicht'   >> C:\logs\TestPowershell.txt
} 
'
'                                         >> C:\logs\TestPowershell.txt 


'****************Software***************' >> C:\logs\TestPowershell.txt
#Video Converter
If (Test-Path C:\Users\DL6T4RR\Desktop\Video Converter\Video Converter v 1.0.3.0\Video Converter v1.0.3.0.exe)
{
   'Video Converter                 [X]' >> C:\logs\TestPowershell.txt
}
else
{
   'Video Converter                 [ ]' >> C:\logs\TestPowershell.txt
}


#Uhr
If (Test-Path C:\Users\DL6T4RR\Desktop\Uhr\Uhr.exe) 
{
    'Uhr.exe                         [X]' >> C:\logs\TestPowershell.txt
}
else
{
    'Uhr.exe                         [ ]' >> C:\logs\TestPowershell.txt
}


#Net Fremwork
If (Test-Path C:\Windows\Microsoft.NET\Framework\NETFXSBS10.exe)
{
    '.net fremwork                   [X]' >> C:\logs\TestPowershell.txt
}
else
{
    '.net fremwork                   [ ]' >> C:\logs\TestPowershell.txt
}


'=======================================' >> C:\logs\TestPowershell.txt

Alles anzeigen

Die Fehlermeldung:

Test-Path : Es wurde kein Positionsparameter gefunden, der das Argument "Converter\Video" akzeptiert.
In C:\Users\DL6T4RR\Desktop\Test.ps1:32 Zeichen:5
+ If (Test-Path C:\Users\DL6T4RR\Desktop\Video Converter\Video Converter v 1.0.3.0 ...
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+ CategoryInfo : InvalidArgument: (:) [Test-Path], ParameterBindingException
+ FullyQualifiedErrorId : PositionalParameterNotFound,Microsoft.PowerShell.Commands.TestPathCommand

Hingo

Ja gut, ähm keine Ahnung was meine Idee damit war.

Hingo

Ok hab meinen Fehler gefunden, ich weiß zwar nicht warum, aber ich glaube weil es einfach Technik ist.

AutoIt

While 1
		Switch GUIGetMsg()
			Case $GUI_EVENT_CLOSE, $Close


			ExitLoop
		EndSwitch
	Wend


	While GUIGetMsg(-3)
	WEnd


	GUIDelete($hGUI1)


EndFunc

Alles anzeigen

Hingo

Aber ich habe ja $GUI_EVENT_CLOSE als Func genommen doch der Button funktioniert immer noch nicht.

AutoIt

While 1
		Switch GUIGetMsg()
			Case $GUI_EVENT_CLOSE, $Close


			ExitLoop
		EndSwitch
	Wend


	While GUIGetMsg() <> -3
	WEnd


	GUIDelete($hGUI1)


EndFunc

Alles anzeigen

Hingo

Wo finde ich die, ist die in dem AutoIt Ordner mit drinne?

Hingo

Achso ok, gibt es irgendwo ne Liste wo die ganzen Events mit den Zahlen stehen?

Hingo

GUIGetMsg() fragt ja nach Ereignissen, und die Schleife ist dazu da das es die ganze Zeit wiederholt wird, doch wofür ist <> -3 da?

Hingo

Meintest du die While Schleife, die ich umbauen muss?

AutoIt

While GUIGetMsg() <> -3
WEnd

Beiträge von Hingo

Bestimmte Unterordner auslesen Powershell

Bestimmte Unterordner auslesen Powershell

Bestimmte Unterordner auslesen Powershell

CLASS-Name für eigene Projekte festlegen

Powershell If Bedingung Hilfe

Powershell If Bedingung Hilfe

Powershell If Bedingung Hilfe

Powershell If Bedingung Hilfe

PDF Inhalt lesen

Powershell Fehlermeldung

Powershell Fehlermeldung

Powershell Fehlermeldung

Powershell Fehlermeldung

Problem mit 2ter GUI

Problem mit 2ter GUI

Problem mit 2ter GUI

Problem mit 2ter GUI

Problem mit 2ter GUI

Problem mit 2ter GUI

Problem mit 2ter GUI