Compare 2 files based on date-Install Patch 1

[vb8304]

I need to install a patch on 450 plus computers for IE6. I will be comparing 2 files by their dates and based on that the script will determine if it needs to run the patch. The script has been done using Kix32 but it does not work. We currently use vbs but I am unceratin how to compare the 2 files based on their dates and if the installed file is older then the patch version install this patch.

Any ideas?
Thanks,
Vince.

 

[JohnYingling]

Dim objFS
Dim objFolder
Dim objFiles
Dim objFile
set objfs = CreateObject("Scripting.FileSystemObject&quot
set objFolder = objfs.Gtfolder(strFolderName)
set objFiles = objFolder.Files
For Each objFile in objFiles
With objFile
.DateCreatd
.DatelastAccessed
.dateLastModified
Next

http://www.VBCompare.com

Compare Code (Text)

http://www.VBSortGen.com

Generate Sort in VB or VBScript

 

[vb8304]

Here is the approach I took. Can you see any potential problems using this method?

sFileName1 = FileDateTime ("c:\windows\system\spoolss.dll&quot 'check file/date/time

sFileName2 = FileDateTime("x:\server\spoolss.dll&quot ' check file/date/time

If sFileName1 => sFileName2 Then
msgbox ("Your IE6 is Up to date&quot
Else
wshshell.run ("installation for patch goes here)
End If

 

[JohnYingling]

"Returns a Variant (Date) that indicates the date and time when a file was created or last modified."

I don't trust it.
There is a new FSO method in VBScript 5.6. I have 5.1.

Try objFSO.GetFileVersion.

http://msdn.microsoft.com/library/d...y/en-us/script56/html/jsmthGetFileVersion.asp

Download

http://msdn.microsoft.com/downloads...=/MSDN-FILES/027/001/733/msdncompositedoc.xml

http://www.VBCompare.com

Compare Code (Text)

http://www.VBSortGen.com

Generate Sort in VB or VBScript

 

[vb8304]

WHen using this methid
Dim objFS
Dim objFolder
Dim objFiles
Dim objFile
set objfs = CreateObject("Scripting.FileSystemObject&quot
set objFolder = objfs.Gtfolder(strFolderName)
set objFiles = objFolder.Files
For Each objFile in objFiles
With objFile
.DateCreatd
.DatelastAccessed
.dateLastModified
Next

If the first file is located on the c:\winnt\system32 folder and the second file is on a mapped drive, t:\folder\, how would you use the script to compare and then execute a file if the dates are equal? I really appreciate the help. You right about the previous method I was using, does not work well everytime.

Thanks again,
Vince.

 

[JohnYingling]

I would leave c:\winnt\system32 folder alone if date/times are equal. But to qoute Dennis Miller, "That's my opinion, but I could be wrong."

http://www.VBCompare.com

Compare Code (Text)

http://www.VBSortGen.com

Generate Sort in VB or VBScript