diff --git a/word2html/src/plugin-resources/word2html.vbs b/word2html/src/plugin-resources/word2html.vbs
index 4325c8ff..672e7209 100644
--- a/word2html/src/plugin-resources/word2html.vbs
+++ b/word2html/src/plugin-resources/word2html.vbs
@@ -1,5 +1,5 @@
' Word2HTML.vbs
-' $Id: word2html.vbs,v 1.2 2003/06/18 01:37:45 dion Exp $
+' $Id: word2html.vbs,v 1.3 2003/06/18 06:39:54 dion Exp $
Option Explicit
' Creates the output directories to the same depth as the inputFile specified
@@ -41,6 +41,7 @@ End Function
' Main chunk of code
Dim basedir, FileSys, HTMLFormat, inputFile, obj, outputDir, outputFile
+On Error Resume Next
HTMLFormat = 8
' Fully Qualified File name
@@ -60,4 +61,6 @@ Set obj = WScript.CreateObject("Word.Application")
obj.Visible = FALSE
obj.Documents.Open inputFile,,True
obj.ActiveDocument.SaveAs outputFile, HTMLFormat
-obj.Quit
+Dim wdDoNotSaveChanges
+wdDoNotSaveChanges = 0
+obj.Quit wdDoNotSaveChanges