chore: 漏了一个

2026-02-22 22:47:54 +08:00
parent 4c1578f9aa
commit dc7d6b3e91
1 changed files with 9 additions and 8 deletions
@@ -1075,7 +1075,7 @@ Public Module ModBase
 Re:
        Try
            '获取 MD5
-            Dim File As New FileStream(FilePath, FileMode.Open, FileAccess.Read, FileShare.ReadWrite)
+            Using File As New FileStream(FilePath, FileMode.Open, FileAccess.Read, FileShare.ReadWrite)
                Using h = MD5Cng.Create()
                    Dim Retval As Byte() = h.ComputeHash(File)
                    Dim Result As New StringBuilder(Retval.Length * 2)
@@ -1085,6 +1085,7 @@ Re:

                    Return Result.ToString
                End Using
+            End Using
        Catch ex As Exception
            If Retry OrElse TypeOf ex Is FileNotFoundException Then
                Log(ex, "获取文件 MD5 失败：" & FilePath)