我不断收到错误“object required”added4'“

我试图创建两个文件的数组，并比较两个，但我打了一堵墙。我不断收到错误“object required'added4'”，我也需要读取两个文件将它们放入一个数组中，比较两个文件并从第二个文件中删除不在第一个文件中的行。我也想记录我删除的行。我不断收到错误“object required”added4'“

'Reads Approvedshare txt and makes the txt file into an array 
     public objFSO 
     Set objFSO = CreateObject("Scripting.FileSystemObject") 
     Dim objTextFile 
     Set objTextFile = objFSO.OpenTextFile _ 
      ("TXT PATH") 
     do Until objTextFile.AtEndOfStream 
      strNextLine = objTextFile.Readline 
      public array1 : array1 = trim(strNextLine) 
      'wscript.echo "test array : " & array1 
      array1 = trim(array1) 
      loop 


     'Reads current shares txt and also makes that txt into an array 
     Set objTextFile2 = objFSO.OpenTextFile _ 
      ("SECOND TXT PATH") 
     do Until objTextFile2.AtEndOfStream 
     strNextLine2 = objTextFile2.Readline 
     public array2 : array2 = trim(strNextLine2) 
     'wscript.echo "test array : " & array2 
     array1 = trim(array2) 
     loop 

'This section is used to compare the two txt files and remove whatever variables that are in both txt files and deleting them. 
array2.files 
array2.files 
    For Each textstream1 In array1 
     found = False 
    For Each textstream2 In array2 
     If textstream1 = textstream2 Then 
     found = True 
     Exit For 
    End If 
     found = False 
    Next 
     If found = False Then 
     wscript.echo "This isn't on approve shares text : " &textstream2 
    End If 
    Next 

'Another section for logging the process, logging the lines that were deleted

来源

2013-10-17 Abdullahi Farah

请发布（短）您的输入和（所需）输出文件的样本。 –

输入：测试一个 teset1 的Flexera 的FLEXnet 型文件类型 ACT 法数据库 acttest –

输出将是第一个txt文件，但第二个同样的情况也有一对夫妇删除线不在第一个 –

不是一个答案：

鉴于包含行的文件X：含

A 
B 
C

文件Y：

和“删除该任务第二个文件中不在第一行的行“，因此Y看起来像：

A 
B 
C

显而易见的解决方案是一种通过Y复制X - 没有编码，没有编码的暴行，没有错误消息。

那么你的情况有什么不同？

来源

2013-10-17 15:59:33

我不断收到错误“object required”added4'“

回答

相关问题