这个是字串变16进制
Private Function EnCode(ByVal strString As String) As String
Dim str As String
Dim arrByte() As Byte
arrByte = System.Text.Encoding.GetEncoding("GB2312").GetBytes(strString)
For i As Integer = 0 To arrByte.Length - 1
str += System.Convert.ToString(arrByte(i), 16)
Next
Return str
End Function请问怎么还原
Private Function EnCode(ByVal strString As String) As String
Dim str As String
Dim arrByte() As Byte
arrByte = System.Text.Encoding.GetEncoding("GB2312").GetBytes(strString)
For i As Integer = 0 To arrByte.Length - 1
str += System.Convert.ToString(arrByte(i), 16)
Next
Return str
End Function请问怎么还原
Dim arrByte() As Byte
arrByte = System.Text.Encoding.GetEncoding("GB2312").GetBytes(strString)
For i As Integer = 0 To arrByte.Length - 1
Response.Write(System.Convert.ToString(arrByte(i), 16) & "<br/>")
Next
Response.Write(System.Text.Encoding.GetEncoding("GB2312").GetString(arrByte))