Files
Escalante-Pastor/atalhos/Abrir Planejador.vbs
2026-06-26 18:07:04 -03:00

20 lines
546 B
Plaintext

Set shell = CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
atalhosDir = fso.GetParentFolderName(WScript.ScriptFullName)
baseDir = fso.GetParentFolderName(atalhosDir)
pythonw = baseDir & "\.venv\Scripts\pythonw.exe"
python = baseDir & "\.venv\Scripts\python.exe"
app = baseDir & "\web_app.py"
If fso.FileExists(pythonw) Then
exe = pythonw
ElseIf fso.FileExists(python) Then
exe = python
Else
exe = "pythonw"
End If
shell.CurrentDirectory = baseDir
shell.Run """" & exe & """ """ & app & """", 0, False