• Home
 · 
• Files/File Controls/Input/Output
 · 
• Compares files to see if they are the same or not.

Compares files to see if they are the same or not.

Compares files to see if they are the same or not.

Rate Compares files to see if they are the same or not.

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

  Dim FileOneContents As String
  Dim FileTwoContents As String

  Open FileOne For Input As #1
    FileOneContents = LOF(1)
  Close #1
  Open FileTwo For Input As #1
    FileTwoContents = LOF(1)
  Close #1
  
  If FileOneContents = FileTwoContents Then
    CompareFiles = True
    Else
    CompareFiles = False
  End If
End Function