Software components for data protection, secure storage and transfer
Private Function GetHash(ByVal path As String) As String
Dim fs As New FileStream(path, FileMode.Open, FileAccess.Read)
Dim strHsh As String = ""
Dim hash As New TElHashFunction(SBConstants.Unit.SB_ALGORITHM_DGST_SHA1)
strHsh = SBUtils.Unit.BinaryToString(hash.Finish())
Number of guests: 1, registered members: 0,
in total hidden: 0
Copyright (c) 2017, /n software, inc.
As of July 15, 2016 EldoS business operates as a division of /n software, inc. For more information, please read the announcement.