Fix the problem that the plug-in setting window cannot be opened on 32-bit OS

diff --git a/Plugins/dlls/ApplyPatch.sct b/Plugins/dlls/ApplyPatch.sct
index f2a73de..b2a53f5 100644 (file)
--- a/Plugins/dlls/ApplyPatch.sct
+++ b/Plugins/dlls/ApplyPatch.sct
@@ -253,7 +253,7 @@ Function ShowSettingsDialog()
     tfile.Write Translate(getResource("dialog1"))
     tfile.Close
     exportSettingsToJSONFile jsonfile
-    mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\mshta.exe")
+    mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\System32\mshta.exe")
     If Not fso.FileExists(mshta) Then
         mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\SysWOW64\mshta.exe")
     End If

diff --git a/Plugins/dlls/CompareMSExcelFiles.sct b/Plugins/dlls/CompareMSExcelFiles.sct
index 3ba6ca0..9b28a35 100644 (file)
--- a/Plugins/dlls/CompareMSExcelFiles.sct
+++ b/Plugins/dlls/CompareMSExcelFiles.sct
@@ -660,7 +660,7 @@ Function ShowSettingsDialog()
        tfile.Write Translate(getResource("dialog1"))
        tfile.Close
        exportSettingsToJSONFile jsonfile
-       mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\mshta.exe")
+       mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\System32\mshta.exe")
        If Not fso.FileExists(mshta) Then
                mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\SysWOW64\mshta.exe")
        End If

diff --git a/Plugins/dlls/CompareMSPowerPointFiles.sct b/Plugins/dlls/CompareMSPowerPointFiles.sct
index f282b10..70dafb0 100644 (file)
--- a/Plugins/dlls/CompareMSPowerPointFiles.sct
+++ b/Plugins/dlls/CompareMSPowerPointFiles.sct
@@ -346,7 +346,7 @@ Function ShowSettingsDialog()
        tfile.Write Translate(getResource("dialog1"))
        tfile.Close
        exportSettingsToJSONFile jsonfile
-       mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\mshta.exe")
+       mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\System32\mshta.exe")
        If Not fso.FileExists(mshta) Then
                mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\SysWOW64\mshta.exe")
        End If

diff --git a/Plugins/dlls/CompareMSVisioFiles.sct b/Plugins/dlls/CompareMSVisioFiles.sct
index 83bc1a3..79ab2a9 100644 (file)
--- a/Plugins/dlls/CompareMSVisioFiles.sct
+++ b/Plugins/dlls/CompareMSVisioFiles.sct
@@ -304,7 +304,7 @@ Function ShowSettingsDialog()
        tfile.Write Translate(getResource("dialog1"))
        tfile.Close
        exportSettingsToJSONFile jsonfile
-       mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\mshta.exe")
+       mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\System32\mshta.exe")
        If Not fso.FileExists(mshta) Then
                mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\SysWOW64\mshta.exe")
        End If

diff --git a/Plugins/dlls/CompareMSWordFiles.sct b/Plugins/dlls/CompareMSWordFiles.sct
index 3603eb8..d6d474b 100644 (file)
--- a/Plugins/dlls/CompareMSWordFiles.sct
+++ b/Plugins/dlls/CompareMSWordFiles.sct
@@ -343,7 +343,7 @@ Function ShowSettingsDialog()
        tfile.Write Translate(getResource("dialog1"))
        tfile.Close
        exportSettingsToJSONFile jsonfile
-       mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\mshta.exe")
+       mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\System32\mshta.exe")
        If Not fso.FileExists(mshta) Then
                mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\SysWOW64\mshta.exe")
        End If

diff --git a/Plugins/dlls/PrediffLineFilter.sct b/Plugins/dlls/PrediffLineFilter.sct
index 30e46a4..5ca4e94 100644 (file)
--- a/Plugins/dlls/PrediffLineFilter.sct
+++ b/Plugins/dlls/PrediffLineFilter.sct
@@ -167,7 +167,7 @@ Function ShowSettingsDialog()
   tfile.Write Translate(getResource("dialog1"))\r
   tfile.Close\r
   exportSettingsToJSONFile jsonfile\r
-  mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\mshta.exe")\r
+  mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\System32\mshta.exe")\r
   If Not fso.FileExists(mshta) Then\r
     mshta = wsh.ExpandEnvironmentStrings("%SystemRoot%\SysWOW64\mshta.exe")\r
   End If\r