vweraion 4

This commit is contained in:
2025-05-19 17:03:16 +02:00
parent 4e70f497cd
commit 1ad3773a3e

View File

@@ -1,12 +1,24 @@
# Importamos el módulo necesario para crear la interfaz gráfica
#Script Robocopy con GUI
# Importamos el módulo necesario para crear la interfaz gráfica
Import-Module -Name 'Windows.Forms'
# Creamos una ventana
$Form = New-Object Windows.Forms.Form
$Form.Text = "Copiador de archivos con Robocopy"
$Form.Text = "Copiado de archivos con Robocopy"
$Form.Size = New-Object Drawing.Size(400, 250)
$Form.FormBorderStyle = [System.Windows.Forms.FormBorderStyle]::FixedSingle
$Form.MaximizeBox = $false
# Etiqueta y campo de texto para la ruta de origen
$Labelby = New-Object Windows.Forms.Label
$Labelby.Text = "Ruta de origen:"
$Labelby.Location = New-Object Drawing.Point(50, 50)
$Form.Controls.Add($Label2Source)
$LabelSource = New-Object Windows.Forms.Label
$LabelSource.Text = "Ruta de origen:"
$LabelSource.Location = New-Object Drawing.Point(10, 10)
@@ -49,22 +61,13 @@ $Button.Add_Click({
# Actualizamos la barra de progreso
$ProgressBar.Value = 100
$LabelSource.Text = "Copia completada"
})
# Abrir docuemto de logs
Start-Process 'C:\WINDOWS\system32\notepad.exe' $DestinationPath\log.txt
})
$Form.Controls.Add($Button)
# Crear un botón de borrado
$ButtonDelete = New-Object Windows.Forms.Button
$ButtonDelete.Text = "Borrar"
$ButtonDelete.Location = New-Object Drawing.Point(290, 180) # Ajusta la ubicación
$ButtonDelete.Size = New-Object Drawing.Size(80, 23) # Ajusta el tamaño
$Form.Controls.Add($ButtonDelete)
# Evento de clic para el botón de borrado
$ButtonDelete.Add_Click({
$TextBoxSource.Text = ""
$TextBoxDestination.Text = ""
})
# Mostramos la ventana
$Form.ShowDialog()