AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Compare commits

base: AppStd:42f9c04b244ffd1ac2ec64e46e3e954fdbc06cd8
Branches Tags
AppStd:master AppStd:upgrade-to-NET8-1 AppStd:Monorepo-Update-.NET-8 AppStd:Newest-GDPictureVersion AppStd:ZugferdService-Redesign
...
compare: AppStd:e0df4da27d2c87f685172a666b30bb53c591d907
Branches Tags
AppStd:master AppStd:upgrade-to-NET8-1 AppStd:Monorepo-Update-.NET-8 AppStd:Newest-GDPictureVersion AppStd:ZugferdService-Redesign

2 Commits
42f9c04b24 ... e0df4da27d

Author SHA1 Message Date
Jonathan Jenne
e0df4da27d Filesystem: Version 1.0.4 2021-05-04 11:10:32 +02:00
Jonathan Jenne
5391bb8d79 File: clean up GetChecksum 2021-05-04 11:10:06 +02:00
2 changed files with 7 additions and 6 deletions
Expand all files Collapse all files

9
Modules.Filesystem/File.vb
View File

@@ -73,10 +73,11 @@ Public Class File
End Function End Function
Public Function GetChecksum(FilePath As String) As String Public Function GetChecksum(FilePath As String) As String
Using oStream As New BufferedStream(IO.File.OpenRead(FilePath), 1200000) Using oFileStream = IO.File.OpenRead(FilePath)
Dim oSHA As New SHA256Managed() Using oStream As New BufferedStream(oFileStream, 1200000)
Dim oChecksum() As Byte = oSHA.ComputeHash(oStream) Dim oChecksum() As Byte = SHA256.Create.ComputeHash(oStream)
Return BitConverter.ToString(oChecksum).Replace("-", String.Empty) Return BitConverter.ToString(oChecksum).Replace("-", String.Empty)
End Using
End Using End Using
End Function End Function

4
Modules.Filesystem/My Project/AssemblyInfo.vb
View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.0.3.0")> <Assembly: AssemblyVersion("1.0.4.0")>
<Assembly: AssemblyFileVersion("1.0.3.0")> <Assembly: AssemblyFileVersion("1.0.4.0")>