Re: faq705-3579

[cykopat]

I was wondering if someone could quickly tell me how to modify this to also include the TIME checking. Thanks very much..
faq705-3579

I tried to find the authors email to avail..

 

[jrbarnett]

Use the "Send a comment" link at the bottom of the FAQ to contact the author regarding it.

John

 

[cykopat]

thanks.. I figured out my own way to do the same thing..Maybe this can help someone also..



Update " PathSource Here ", "PathTarget Here"


Function Update(sSource, sTarget)
Dim oFSO
Dim oSource

Set oFSO = WScript.CreateObject("Scripting.FileSystemObject&quot

If oFSO.FileExists(sSource) Then
Set oSource = oFSO.GetFile(sSource)
If Not oFSO.FileExists(sTarget) Then
oSource.Copy sTarget, True
ElseIf oSource.DateLastModified > oFSO.GetFile(sTarget).DateLastModified Then
oSource.Copy sTarget, True
End If
Else
MsgBox "Source file does not exist!"
End If
End Function