From cc73db51c85a6eaf70dd10a2485d9eb42c0658ae Mon Sep 17 00:00:00 2001 From: vkalenic Date: Sat, 29 Jan 2022 18:09:27 +0200 Subject: [PATCH] Rename service VBoxDrv to VBoxSup since VB-6.1.32 Since VirtualBox-6.1.32-149290 service (driver) VBoxDrv renamed to VBoxSup and cannot be managed by Portable-VirtualBox. Fixed --- source/Portable-VirtualBox.au3 | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/source/Portable-VirtualBox.au3 b/source/Portable-VirtualBox.au3 index 2a3b559..81fd800 100644 --- a/source/Portable-VirtualBox.au3 +++ b/source/Portable-VirtualBox.au3 @@ -625,8 +625,8 @@ If (FileExists(@ScriptDir & "\app32\virtualbox.exe") Or FileExists(@ScriptDir & SplashOff() - If RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\VBoxDRV", "DisplayName") <> "VirtualBox Service" Then - RunWait("cmd /c sc create VBoxDRV binpath= ""%CD%\" & $arch & "\drivers\VBoxDrv\VBoxDrv.sys"" type= kernel start= auto error= normal displayname= PortableVBoxDRV", @ScriptDir, @SW_HIDE) + If RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\VBoxSUP", "DisplayName") <> "VirtualBox Service" Then + RunWait("cmd /c sc create VBoxSUP binpath= ""%CD%\" & $arch & "\drivers\VBoxSup\VBoxSup.sys"" type= kernel start= auto error= normal displayname= PortableVBoxSUP", @ScriptDir, @SW_HIDE) Local $DRV = 1 Else Local $DRV = 0 @@ -707,7 +707,7 @@ If (FileExists(@ScriptDir & "\app32\virtualbox.exe") Or FileExists(@ScriptDir & EndIf If $DRV = 1 Then - RunWait("sc start VBoxDRV", @ScriptDir, @SW_HIDE) + RunWait("sc start VBoxSUP", @ScriptDir, @SW_HIDE) EndIf If $USB = 1 Then @@ -779,7 +779,7 @@ If (FileExists(@ScriptDir & "\app32\virtualbox.exe") Or FileExists(@ScriptDir & RunWait(@SystemDir & "\regsvr32.exe /S /U " & $arch & "\VBoxC.dll", @ScriptDir, @SW_HIDE) If $DRV = 1 Then - RunWait("sc stop VBoxDRV", @ScriptDir, @SW_HIDE) + RunWait("sc stop VBoxSUP", @ScriptDir, @SW_HIDE) EndIf If $USB = 1 Then @@ -843,7 +843,7 @@ If (FileExists(@ScriptDir & "\app32\virtualbox.exe") Or FileExists(@ScriptDir & EndIf If $DRV = 1 Then - RunWait("sc delete VBoxDRV", @ScriptDir, @SW_HIDE) + RunWait("sc delete VBoxSUP", @ScriptDir, @SW_HIDE) EndIf If $USB = 1 Then