私は、asp.net (この段階では 2.0) に変換している従来の ASP サイトで古いハッシュ アルゴリズムを継承しました。
私の人生では、C#で一致するコードを記述できるほど古い関数に頭を悩ませることはできません。とても単純なことだと思いますが、現時点では木に森が見えません。
これは、文字列を受け取る元の古典的な asp コードです。同等の C# コードに関するヘルプをいただければ幸いです。
Function PHash( pValue )
Dim dValue
Dim dAccumulator
Dim lTemp
Dim sValue
sValue = UCase(Trim("" & pValue))
dAccumulator = 0
For lTemp = 1 to Len(sValue)
dValue = Asc(Mid(sValue, lTemp, 1))
If (lTemp AND 1) = 1 Then
dAccumulator = Sin( dAccumulator + dValue )
Else
dAccumulator = Cos( dAccumulator + dValue )
End If
Next
dAccumulator = dAccumulator * CLng(10 ^ 9)
PHash = CLng(dAccumulator)
End Function