shiggyshag
Programmer
Hi
I wish to comapare two text file just to see if they are different.
Ie
Same = true
Diff = false
Cheers
I wish to comapare two text file just to see if they are different.
Ie
Same = true
Diff = false
Cheers
Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Compare two text files
- Thread starter shiggyshag
- Start date
- Status
Code:
Dim fso, f1, f2, contents1, contents2
Set fso = CreateObject("Scripting.FileSystemObject")
Set f1 = fso.OpenTextFile("file1.txt", 1)
contents1 = f1.ReadAll
f1.Close
Set f2 = fso.OpenTextFile("file2.txt", 1)
contents2 = f2.ReadAll
f2.Close
If (contents1 = contents2) Then
Same = true
Diff = false
End If- Thread starter
- #3
- Status
Similar threads
- Locked
- Question