Fall back to built-in GUID when looking for the VBScript engine in InputBox

ExplorerPatcher/utility.c

@@ -1093,7 +1093,7 @@ HRESULT InputBox(BOOL bPassword, HWND hWnd, LPCWSTR wszPrompt, LPCWSTR wszTitle,
     HRESULT hr = S_OK;
 
     GUID guidBuffer;
-    getEngineGuid(L".vbs", &guidBuffer);
+    hr = getEngineGuid(L".vbs", &guidBuffer);
 
     DWORD cchPromptSafe = 0, cchTitleSafe = 0, cchDefaultSafe = 0;
     LPWSTR wszPromptSafe = StrReplaceAllW(wszPrompt, L"\"", L"\"\"", &cchPromptSafe);
@@ -1117,7 +1117,7 @@ HRESULT InputBox(BOOL bPassword, HWND hWnd, LPCWSTR wszPrompt, LPCWSTR wszTitle,
     }
 
     IActiveScript* pActiveScript = NULL;
-    hr = CoCreateInstance(&guidBuffer, 0, CLSCTX_ALL,
+    hr = CoCreateInstance(FAILED(hr) ? &CLSID_VBScript : &guidBuffer, 0, CLSCTX_ALL,
         &IID_IActiveScript,
         (void**)&pActiveScript);
     if (SUCCEEDED(hr) && pActiveScript)

ExplorerPatcher/utility.h

@@ -53,6 +53,12 @@ DEFINE_GUID(IID_OpenControlPanel,
     0x1F, 0x56, 0x21, 0x99, 0x6A, 0xF1
 );
 
+DEFINE_GUID(CLSID_VBScript,
+    0xB54F3741, 
+    0x5B07, 0x11CF, 0xA4, 0xB0, 
+    0x00, 0xAA, 0x00, 0x4A, 0x55, 0xE8
+);
+
 typedef struct _StuckRectsData
 {
     int pvData[6];