CompareFiles – Check whether two files contain the same data
‘ compare two files’ return True if they’re equalFunction CompareFiles(ByVal file1 As String, ByVal file2 As String) As Boolean Dim fnum1 As Integer, isOpen1 As Boolean Dim fnum2 As Integer,