Forum Discussion
destruk
7 years agoStreaming Star
You can still have a generic function to pass a value to. Something like
Function ComputeHash(input As String) As String
If input<>""
ba = CreateObject("roByteArray")
ba.FromAsciiString(input)
digest = CreateObject("roEVPDigest")
digest.Setup("sha256")
Result = digest.Process(ba)
Else
Result=hardcoded_value
End If
Return Result
End Function
Function ComputeHash(input As String) As String
If input<>""
ba = CreateObject("roByteArray")
ba.FromAsciiString(input)
digest = CreateObject("roEVPDigest")
digest.Setup("sha256")
Result = digest.Process(ba)
Else
Result=hardcoded_value
End If
Return Result
End Function