Changeset 10573 for trunk/winbin

Timestamp:

2005-08-26T16:40:29+12:00 (19 years ago)

Author:

chi

Message:

Modifications (re-compile in the WindowsXP+MSoffice2000) for allowing this script have backward
compatability with MS office Automation features.

Location:

trunk/winbin/bin

Files:

• word2html.exe (modified) ( previous)
• word2html.frm (modified) (2 diffs)
• word2html.vbp (modified) (1 diff)

trunk/winbin/bin/word2html.frm

@@ -41 +41 @@
     Dim dst As String
        
-    cmdln = Command()
+    cmdln = LCase(Command())
     'MsgBox ("Command:" + cmdln)
     'cmdln = Chr(34) & "H:\chi\gsdl\collect\WordTest\import\word01.doc" & Chr(34) & Chr(34) & "H:\chi\gsdl\collect\WordTest\tmp\word01.html" & Chr(34)
@@ -47 +47 @@
     src = Mid(src, 2, Len(src) - 2)
     If InStr(src, ":") <> 2 Then src = CurDir + "\" + src
+    
     dst = Trim(Right(cmdln, Len(cmdln) - (InStr(cmdln, ".doc") + 4)))
     dst = Mid(dst, 2, Len(dst) - 2)

trunk/winbin/bin/word2html.vbp

@@ -1 +1 @@
 Type=Exe
-Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automation
+Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\STDOLE2.TLB#OLE Automation
 Reference=*\G{91493440-5A91-11CF-8700-00AA0060263B}#2.7#0#C:\Program Files\Microsoft Office\OFFICE11\MSPPT.OLB#Microsoft PowerPoint 10.0 Object Library
 Reference=*\G{00020905-0000-0000-C000-000000000046}#8.2#0#C:\Program Files\Microsoft Office\OFFICE11\MSWORD.OLB#Microsoft Word 10.0 Object Library