檢查.txt文件的文件夾是否包含列表框中的單詞

Question

我試圖製作一個程序，用於加密或散列md5中的單詞列表。到目前爲止，我可以做到這一點很容易，現在我試圖找出如何檢查8 .txt，看看他們是否包含存儲在列表框中的散列字符串。如果不添加哈希和單詞（哈希：單詞）。

 Public Function Md5FromString(ByVal Source As String) As String 
    Static local_MD5 As MD5 = MD5.Create 
    Dim sb As New StringBuilder() 
    For Each b As Byte In local_MD5.ComputeHash(Encoding.Default.GetBytes(Source)) 
     sb.Append(b.ToString("x2")) 
    Next 
    Return sb.ToString() 
End Function 

生成10K左右後，我想檢查.txts，看看它們是否包含任何匹配。如果找不到匹配項，請添加它們。還我已經每個.TXT排序如下： Hash_Pass1.text存儲散列用0或1 Hash_Pass2.txt存儲開始散列用2或3 等 開始的路徑8的.txt

\ HP \ Hash_Pass1.txt

\ HP \ Hash_Pass2.txt

我想象某種形式的for循環在這裏工作只是不知道從哪裏開始。 正則表達式在這裏工作更好嗎？

Answer 1

我假設你的問題只是爲了檢查所有的文件，所以有一些方法可以開始。

Dim listOfMd5 As New List(Of String) ' Your MD5 list 
For Each md5 In listOfMd5 
    Dim fileName = "\HP\Hash_Pass" & GetFileNumberFromMd5(md5) & ".txt" ' Function to get the correct file to check according to what you want 
    Using reader As New StreamReader(fileName) 
     While Not reader.EndOfStream 
      Dim line As String = reader.ReadLine() 
      If line.Contains(md5) Then ' md5 found 
       ' Found : do stuff 
       Continue For 
      End If 
      ' Not found : do stuff 
     End While 
    End Using 
Next 

關於正則表達式我不確定這會比這更有效。 希望這有助於。