PowerShell - PowerShell entre W10 y W7

#determino si el sistema operativo es de 32 o 64 bits

if ((Get-WmiObject win32_operatingsystem | select osarchitecture).osarchitecture -like "64*")

{

    #64bit code here

    $ruta = ${Env:ProgramFiles(x86)} + "\Random.ERP\*"

}

else

{

    #32bit code here

    $ruta = $Env:Programfiles + "\Random.ERP\*"

}

#Ahora obtengo los directorios Random

$carpetas_random = ls -Directory $ruta

#Este archivo será nuestra referencia.

$archivo_clave = "Ges_32.exe"

#Obtengo el archivo clave más fresco.

$archivo_fresco = ls -Recurse -Path $ruta -Filter $archivo_clave | Select-Object -First 1 | Sort-Object LastWriteTime -Descending

#Obtengo el directorio del archivo más fresco.

$directorio = ls -Directory $archivo_fresco

$directorio = $directorio.Directory

#Acá estoy obteniendo los usuarios

#$users = Get-ChildItem -Name $env:systemdrive/users

#Acá armo las rutas para los archivos que nos interesa

$dir_string = Convert-Path $directorio

$ges_32 = -join($dir_string,"\Ges_32.exe")

$con_32 = -join($dir_string,"\Con_32.exe")

$gp_32  = -join($dir_string,"\Gp_32.exe")

#Obtengo el escritorio común

$escritorio = [Environment]::GetFolderPath("CommonDesktopDirectory")

$escritorio = Convert-Path $escritorio

#Armo los enlaces

$ges_link = -join($escritorio,"\GestionGarmendia.lnk")

$con_link = -join($escritorio,"\ContabilidadGarmendia.lnk")

$gp_link  = -join($escritorio,"\ControlGarmendia.lnk")

#Primer Enlace

$WshShell = New-Object -comObject WScript.Shell

$Shortcut = $WshShell.CreateShortcut($con_link)

$Shortcut.TargetPath = $con_32

$Shortcut.WorkingDirectory = Convert-Path $directorio

$Shortcut.Save()

#Segundo enlace

$WshShell = New-Object -comObject WScript.Shell

$Shortcut = $WshShell.CreateShortcut($gp_link)

$Shortcut.TargetPath = $ges_32

$Shortcut.WorkingDirectory = Convert-Path $directorio

$Shortcut.Save()

#Tercer Enalce

$WshShell = New-Object -comObject WScript.Shell

$Shortcut = $WshShell.CreateShortcut($ges_link)

$Shortcut.TargetPath = $gp_32

$Shortcut.WorkingDirectory = Convert-Path $directorio

$Shortcut.Save()