vbscript - 在 vbscript 中比较 2 个文件

Question

我有 2 个文件，我想看看里面的内容是否相等。假设其中一个是文本文件，如 Sample1.txt，另一个是不同的文件，如 main.css，我如何比较两次看看里面的内容是否相同。

我的想法是这样的

Content1 = FSO.OpenTextFile(sample.txt).ReadAll
Content2 = FSO.OpenTextFile(main.css).ReadAll
if(Content1 = Content2) Then


End IF

有没有更好的方法来做到这一点。

谢谢

Answer 1

如果您只是对文件是否不同感兴趣，最简单的方法就是向 fc 发送邮件。 :

Function qq(str)
  qq = Chr(34) & str & Chr(34)
End Function

Function AreDifferent(f1, f2)
  cmd = "%COMSPEC% /c fc /b " & qq(f1) & " " & qq(f2)
  AreDifferent = CBool(CreateObject("WScript.Shell").Run(cmd, 0, True))
End Function