帮忙翻译两个ASP函数
Function CodeCookie(str)
Dim i
Dim StrRtn
For i = Len(Str) to 1 Step -1
StrRtn = StrRtn & Ascw(Mid(Str,i,1))
If (i <> 1) Then StrRtn = StrRtn & "a "
Next
CodeCookie = StrRtn
End Function
Function DecodeCookie(Str)
Dim i
Dim StrArr,StrRtn
StrArr = Split(Str, "a ")
For i = UBound(StrArr) - LBound(StrArr) to 0 Step -1
If isNumeric(StrArr(i)) = True Then
StrRtn = StrRtn & Chrw(StrArr(i))
Else
StrRtn = Str
Exit Function
End If
Next
DecodeCookie = StrRtn
End Function
几个函数,不知道C#中对应的是怎么。
感谢高手指点学习一下。
------解决方案--------------------For i = Len(Str) to 1 Step -1 -> for(int i=0;i <str.Length;i++)
StrRtn = StrRtn & Ascw(Mid(Str,i,1)) -> string StrRtn += (int)str[i];