Changeset 24164

Timestamp:

2011-06-15T21:28:38+12:00 (12 years ago)

Author:

ak19

Message:

Docx to html with windows Scripting. Thanks to Veronica who found a VBScript that can launch Word in the background and do the conversion of docX to HTML now (for when the user has word). Modified the script to work with cmd line parameters and to run Word in invisible mode. gsConvert.pl now calls on docx2html.vbs if the inputfile is docx, else it still calls the default word2html.exe VB program as before to do windows scripting.

Location:

main/trunk

Files:

• binaries/windows/bin/docx2html.vbs (added)
• greenstone2/bin/script/gsConvert.pl (modified) (2 diffs)

main/trunk/greenstone2/bin/script/gsConvert.pl

@@ -789 +789 @@
                        $ENV{'GSDLOS'}, "word2html");
 
-    $vbScript = "word2html" if ($ENV{'GSDLOS'} =~ m/^windows$/i);
+    if ($ENV{'GSDLOS'} =~ m/^windows$/i) {
+    # if windows scripting with docx input, use new VBscript
+    if($input_filename =~ m/docx$/i) {
+        $vbScript = "docx2html.vbs"; 
+    } else { # use the usual word2html conversion VB executable
+        $vbScript = "word2html";
+    }
+    }
+
     if (-e "$output_filestem.html") {
     print STDERR "    The conversion file:\n";
@@ -811 +819 @@
     if (system($cmd)!=0)
     {
-    print STDERR "Error executing word2Html converter:$!\n";
+    print STDERR "Error executing $vbScript converter:$!\n";
     if (-s "$output_filestem.err") {
         open (ERRFILE, "<$output_filestem.err");