Rakseeibra/arrr-erp
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Make Local Agent desktop dashboard single-instance

Browse Source
This commit is contained in:
A R R R Associates
2026-09-04 14:31:10 +05:30
parent 7bc97be1b1
commit c418dcb45a
6 changed files with 32 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files
app/modules/documents/local_agent_runtime/ERPAgentSupervisor.pyw
+2
View File
@@ -275,6 +275,7 @@ class Supervisor:
"check_config.py",
"check_config.bat",
"open_dashboard.bat",
"Open ERP Local Agent Dashboard.vbs",
"install_task_scheduler.bat",
"start_task_scheduler.bat",
"stop_task_scheduler.bat",
@@ -314,6 +315,7 @@ class Supervisor:
"check_config.py",
"check_config.bat",
"open_dashboard.bat",
"Open ERP Local Agent Dashboard.vbs",
"install_task_scheduler.bat",
"start_task_scheduler.bat",
"stop_task_scheduler.bat",
app/modules/documents/local_agent_runtime/Open ERP Local Agent Dashboard.vbs
+13 -17
View File
@@ -1,26 +1,22 @@
Option Explicit
Dim fso, shell, baseDir, launcher, pyw, py, cmd
Set fso = CreateObject("Scripting.FileSystemObject")
Dim shell, fso, root, pythonw, dashboard, command
Set shell = CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
baseDir = fso.GetParentFolderName(WScript.ScriptFullName)
launcher = baseDir & "\ERPAgentDashboard.pyw"
pyw = baseDir & "\.venv\Scripts\pythonw.exe"
py = baseDir & "\.venv\Scripts\python.exe"
root = fso.GetParentFolderName(WScript.ScriptFullName)
pythonw = fso.BuildPath(root, ".venv\Scripts\pythonw.exe")
dashboard = fso.BuildPath(root, "ERPAgentDashboard.pyw")
If Not fso.FileExists(launcher) Then
MsgBox "ERPAgentDashboard.pyw was not found in " & baseDir, 16, "ERP Local Agent"
WScript.Quit
If Not fso.FileExists(pythonw) Then
MsgBox "ERP Local Agent Python environment was not found:" & vbCrLf & pythonw, vbCritical, "ERP Local Agent"
WScript.Quit 1
End If
If fso.FileExists(pyw) Then
cmd = """" & pyw & """ """ & launcher & """"
ElseIf fso.FileExists(py) Then
cmd = """" & py & """ """ & launcher & """"
Else
MsgBox "ERP Local Agent Python environment was not found.", 16, "ERP Local Agent"
WScript.Quit
If Not fso.FileExists(dashboard) Then
MsgBox "ERP Local Agent dashboard launcher was not found:" & vbCrLf & dashboard, vbCritical, "ERP Local Agent"
WScript.Quit 1
End If
shell.Run cmd, 0, False
command = Chr(34) & pythonw & Chr(34) & " " & Chr(34) & dashboard & Chr(34)
shell.Run command, 0, False
app/modules/documents/local_agent_runtime/erp_local_agent/__init__.py
+1 -1
View File
@@ -1,2 +1,2 @@
__version__ = "1.22.12"
__version__ = "1.22.13"
AGENT_NAME = "ERP Local Agent"
app/modules/documents/local_agent_runtime/install_task_scheduler.bat
-2
View File
@@ -18,10 +18,8 @@ if errorlevel 1 goto :failed
echo ERP Local Agent Supervisor installed and started successfully.
echo Use the desktop shortcut "ERP Local Agent Dashboard" to open the local dashboard.
pause
exit /b 0
:failed
echo ERROR: ERP Local Agent installation failed. Run this file as Administrator.
pause
exit /b 1
app/modules/documents/local_agent_runtime/open_dashboard.bat
+14 -1
View File
@@ -1,3 +1,16 @@
@echo off
setlocal
cd /d "%~dp0"
wscript.exe "%~dp0Open ERP Local Agent Dashboard.vbs"
if not exist ".venv\Scripts\pythonw.exe" (
echo ERROR: ERP Local Agent Python environment was not found.
exit /b 1
)
if not exist "ERPAgentDashboard.pyw" (
echo ERROR: ERPAgentDashboard.pyw was not found.
exit /b 1
)
start "" ".venv\Scripts\pythonw.exe" "ERPAgentDashboard.pyw"
exit /b 0