Dim compareLogic As New CompareLogic() 'Trial Mode
'Dim compareLogic As New CompareLogic("place user name here", "place license key here") 'License Mode
'Compare two files
File.WriteAllText(
"original.txt", "This line was deleted." & vbCrLf & "This line is the same." & vbCrLf & "This line is a changed.")File.WriteAllText(
"changed.txt", "This line is the same." & vbCrLf & "This line was changed." & vbCrLf & "This line was added.")Dim
result As ComparisonResult = compareLogic.CompareFiles("original.txt", "changed.txt")
'Output to HTML, also can export to CSV, or DataTable
Dim
outputLogic As New OutputHtmlLogic()outputLogic.OutputToFile(result,
"CompareFilesTest.html")
'Show the file in the browser
Dim
proc As New System.Diagnostics.Process()proc.StartInfo.FileName =
"CompareFilesTest.html"proc.Start()