vba check two files are identical

[MetLife]

Hi,

Is there a way to check if two text files are identical using VBA?

c:\file1.txt
c:\file2.txt

?

 

[rowebca]

You can use something like:

Dim FirstFile As String, SecondFile As String
Open "c:\file1.txt" For Binary As #1
FirstFile = Space(LOF(1))
Get 1, , FirstFile
Open "c:\file2.txt" For Binary As #2
SecondFile = Space(LOF(2))
Get 2, , SecondFile
If FirstFile = SecondFile Then
    MsgBox "Files are the same."
Else: MsgBox "Files are NOT the same."
End If
Close

Hope I understand what you want.

Regards,
GB

 

[MetLife]

You can use something like:

Dim FirstFile As String, SecondFile As String
Open "c:\file1.txt" For Binary As #1
FirstFile = Space(LOF(1))
Get 1, , FirstFile
Open "c:\file2.txt" For Binary As #2
SecondFile = Space(LOF(2))
Get 2, , SecondFile
If FirstFile = SecondFile Then
    MsgBox "Files are the same."
Else: MsgBox "Files are NOT the same."
End If
Close

Hope I understand what you want.

Regards,
GB

Thanks!

That works. Do you know what the function
Space does to check?