VB中base64编码如何转换到Android中,已有初步代码,但转换结果不一致

没搞过VB 现在给我一串VB中的base64编码,移植到Android中,按照我的想法写好之后,发现编码之后的结果并不一样,请大家给我看看。
VB:

 Set m_oXMLElement = m_oXMLDoc.createElement("TmpBase64")
        m_oXMLElement.dataType = "bin.base64"

Public Function Encode(ByVal strIn As String) As String
    Dim oElement As Object
    Dim aData() As Byte

    On Error GoTo errEncode:
    If m_bXMLObjectOK And Len(strIn) > 0 Then
        aData = StrConv(strIn, vbFromUnicode) '将Unicode编码转换为系统缺省码页
        m_oXMLElement.nodetypedvalue = aData
        Encode = m_oXMLElement.Text
        m_oXMLElement.Text = "" 
    End If
    Exit Function
errEncode:
    RaiseError Err.Number, Err.Description
End Function


Android:
public String encode (){
String test = testText.getText().toString();//从TextView控件中取得字符串
String code = Base64.encodeToString(name.getBytes(), Base64.NO_WRAP);

TEST_CODE = code;
return TEST_CODE;




两个测试中文,返回的结果不一样。





2个回答

解决了。


        byte[]  testCode= null;
        try {
            testCode = Base64.encode(test.trim().getBytes("GB2312"), Base64.NO_WRAP);   
            Test_CODE = new String(testcode, "GB2312");
        } 
        catch (UnsupportedEncodingException e) {
            e.printStackTrace();
        }
        return Text_CODE ;
blossom_q
YuKi_07 打开了。感觉是VB 那段代码我没有理解。我也没学过VB 网上搜索并搜不到什么。可能VB 那段并不是单纯的BASE64编码。
接近 4 年之前 回复
blossom_q
YuKi_07 我打不开这网站0.0
接近 4 年之前 回复
Csdn user default icon
上传中...
上传图片
插入图片
抄袭、复制答案,以达到刷声望分或其他目的的行为,在CSDN问答是严格禁止的,一经发现立刻封号。是时候展现真正的技术了!