0

我有一个循环,可以在 .ini 文件中找到重复的行。我可以愉快地找到重复的行,并使用 FileSystemObject 将新行写入文件,但是......我似乎不知道如何删除重复的行。我想要做的是按行号删除行,因为我已经确定了相关的行号。

有没有一种本地方法可以做到这一点,或者是重写文件减去重复行的情况?

任何帮助是极大的赞赏。

谢谢。

我查找重复条目的方法如下:

  Do While Not file.AtEndOfStream
    intLineNumber = intLineNumber + 1
    strReadLineText = file.ReadLine
    If strSearchText <> "" And InStr(strReadLineText, strSearchText) > 0 Then
      session("message") = "Line Exists on " + Cstr(intLineNumber)
      '' # delete duplicate line...

    End If
  Loop
  file.Close()

您可以看到我的评论在哪里,是我希望删除找到的行的地方。

4

1 回答 1

5

在 VBScript(或内部对象)中没有内置的方法可以做到这一点。

我的投票是使用字符串连接来实现这一点;即不是删除行,而是逐行创建一个新文件,并且仅在您正在构建的字符串中不存在该行时附加到字符串。

于 2009-09-01T23:52:22.660 回答