[svn.haxx.se] · SVN Dev · SVN Users · SVN Org · TSVN Dev · TSVN Users · Subclipse Dev · Subclipse Users · this month's index

Re: Excel diff script (extended version)

From: Jared Silva <jayrod_at_gmail.com>
Date: 2007-05-11 00:03:41 CEST

Jared Silva wrote:
> I have some concerns with your script updates.
>
> The use of "xObject" in lines 13 and 26 break the script for me.

I think xObject is for JScript, and Object is for VBScript. The
attached svn diff fixes this issue. The script should run again.

> "Dummy_for_Comparison" should be hidden (Format > Sheet > Hide).
>
> The script update should run on the entire Workbook, not just the first Sheet.
>
> The script update should activate (display) the same Sheet in each file.
>
> The script update changes the base file(s). The file(s) should be
> marked as unchanged (saved).

I will get to these as soon as I can.

Index: diff-xls.vbs
===================================================================
--- diff-xls.vbs (revision 194)
+++ diff-xls.vbs (working copy)
@@ -10,7 +10,7 @@
 sBaseDoc = objArgs(0)
 sNewDoc = objArgs(1)

-Set objScript = CreatexObject("Scripting.FileSystemxObject")
+Set objScript = CreateObject("Scripting.FileSystemObject")
 If objScript.FileExists(sBaseDoc) = False Then
     MsgBox "File " + sBaseDoc +" does not exist. Cannot compare the
documents.", vbExclamation, "File not found"
     Wscript.Quit 1
@@ -23,7 +23,7 @@
 Set objScript = Nothing

 On Error Resume Next
-Set objExcelApp = Wscript.CreatexObject("Excel.Application")
+Set objExcelApp = Wscript.CreateObject("Excel.Application")
 If Err.Number <> 0 Then
    Wscript.Echo "You must have Excel installed to perform this operation."
    Wscript.Quit 1

---------------------------------------------------------------------
To unsubscribe, e-mail: users-unsubscribe@tortoisesvn.tigris.org
For additional commands, e-mail: users-help@tortoisesvn.tigris.org
Received on Fri May 11 00:03:55 2007

This is an archived mail posted to the TortoiseSVN Users mailing list.