mirror of
https://github.com/jstrdev/ps5directo.git
synced 2026-10-28 17:01:37 +01:00
24 lines
933 B
Plaintext
24 lines
933 B
Plaintext
' Abre PS5 Directo sin ventana negra (en su propia ventana de aplicacion).
|
|
' Puedes arrastrar archivos encima de este archivo o de su acceso directo.
|
|
Set sh = CreateObject("WScript.Shell")
|
|
Set fso = CreateObject("Scripting.FileSystemObject")
|
|
dir = fso.GetParentFolderName(WScript.ScriptFullName)
|
|
sh.CurrentDirectory = dir
|
|
args = ""
|
|
For Each a In WScript.Arguments
|
|
args = args & " """ & a & """"
|
|
Next
|
|
py = ""
|
|
If fso.FileExists(dir & "\python\pythonw.exe") Then
|
|
py = """" & dir & "\python\pythonw.exe"""
|
|
ElseIf sh.Run("cmd /c where pyw >nul 2>nul", 0, True) = 0 Then
|
|
py = "pyw -3"
|
|
ElseIf sh.Run("cmd /c where pythonw >nul 2>nul", 0, True) = 0 Then
|
|
py = "pythonw"
|
|
End If
|
|
If py = "" Then
|
|
MsgBox "Faltan archivos de PS5 Directo (la carpeta python). Vuelve a instalarlo con PS5Directo-Setup.exe desde github.com/jstrdev/ps5directo/releases", 48, "PS5 Directo"
|
|
Else
|
|
sh.Run py & " """ & dir & "\app.py""" & args, 0, False
|
|
End If
|