乱码大全(三) (转)

乱码大全(三) (转)[@more@] 

Base64XML:namespace prefix = o ns = "urn:schemas-microsoft-com:Office:office" />

  Base64和下面将要介绍的Quoted-Printable都属于MIME(多部分( multi-part)、多媒体电子邮件和 WWW 超文本的一种编码标准,用于传送诸如图形、声音和传真等非文本数据)。MIME定义在rfc1341中。

  Base64是现今在互联网上应用最多的一种编码,几乎所有的电子邮件软件头把它作为默认的二进制编码,它已经成了现今电子邮件编码的代名词。

  下面是Base64的一个例子,从例子中,您也可以看到Base64与电子邮件的的紧密联系:

Content-Type: text/plain;charset="cn-gb"

Content-Transfer-Encoding: BASE64

 

CQkJICAgIKG2wtLC68vjt6i088irobcNCgnX99XfOm1vZ2Fvo6yw19TGu8a619W+o6h0ZWxuZXQ6

Ly8yMDIuMTEyLjIwLjEzMjoyM6Ops8nUsaGjDQoJICAgICAgxKq438jtvP65pNf3ytKjumh0dHA6

Ly9tb2dhby5iZW50aXVuLm5ldA0KCQkJRW1haWx0bzptb2dhb0AzNzEubmV0DQoJICAgKioqKioq

KioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqICAgICAgICAgICAgICAgDQoJ

ICAgKiCz/cHLvMfS5Mqyw7S2vLK7tPjX36Oss/3By9fjvKPKssO0tryyu8H0z8IqDQoJICAgKioq

KioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioq

 

  你可以把它单独存成一个文件,可以取名为:mogao.eml,双击可以用Outlook打开(前两行为邮件的原始信息,从第四行开始为编码内容)。

  Base64的算法同Uuencode的算法很接近,也很简单:它将字符流顺序放入一个 24 位的缓冲区,缺字符的地方补零。然后将缓冲区截断成为 4 个部分,高位在先,每个部分 6 位,用下面的64个字符重新表示:“ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/”。如果输入只有一个或两个字节,那么输出将用等号“=”补足。这可以隔断附加的信息造成编码的混乱。它每行一般为76个字符。

  下面我给出Base64的编码和解码的C语言描述:

/*Base64编码*/

void Base64(unsigned char chasc[3],unsigned char chuue[4])

/* 

  chasc:未编码的二进制代码

  chuue:编码过的Base64代码

*/

{

 int i,k=2;

 unsinged char t=NULL;

 for(i=0;i<3;i++)

 {

  *(chuue+i)=*(chasc+i)>>k;

  *(chuue+i)|=t;

  t=*(chasc+i)<

  t>>=2;

  k+=2;

 }

 *(chuue+3)=*(chasc+2)&63;

 

 for(i=0;i<4;i++)

  if((*(chuue+i)>=0)&&(*(chuue+i)<=25)) *(chuue+i)+=65;

  else if((*(chuue+i)>=26)&&(*(chuue+i)<=51)) *(chuue+i)+=71;

  else if((*(chuue+i)>=52)&&(*(chuue+i)<=61)) *(chuue+i)-=4;

  else if(*(chuue+i)==62) *(chuue+i)=43;

  else if(*(chuue+i)==63) *(chuue+i)=47;

 

}

/*Base64解码*/

void unBase64(unsigned char chuue[4],unsigned char chasc[3])

/* 

chuue:未解码的Base64代码

chasc:解码过的二进制代码

*/

{int i,k=2;

 unsigned char t=NULL;

 

 for(i=0;i<4;i++)

  if((*(chuue+i)>=65)&&(*(chuue+i)<=90)) *(chuue+i)-=65;

  else if((*(chuue+i)>=97)&&(*(chuue+i)<=122)) *(chuue+i)-=71;

  else if((*(chuue+i)>=48)&&(*(chuue+i)<=57)) *(chuue+i)+=4;

  else if(*(chuue+i)==43) *(chuue+i)=62;

  else if(*(chuue+i)==47) *(chuue+i)=63;

  else if(*(chuue+i)==61) *(chuue+i)=0;

 

 for(i=0;i<3;i++)

 {*(chhex+i)=*(chuue+i)<

  k+=2;

  t=*(chuue+i+1)>>8-k;

  *(chhex+i)|=t;

 }

}


来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10748419/viewspace-1006057/,如需转载,请注明出处,否则将追究法律责任。

转载于:http://blog.itpub.net/10748419/viewspace-1006057/

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
### 回答1: Delphi是一种编程语言,它支持字符串的编码方式有很多种,其中一种是UTF-8。当我们使用UTF-8编码的字符串文件,可能会出现乱码的情况,这种情况可能是由于文件保存时使用了其他编码格式或者文件本身内容就是乱码造成的。我们需要使用一些方法来进行UTF-8换,从而解决乱码问题。 首先,可以尝试使用系统自带的函数进行UTF-8编码和解码处理,比如使用"AnsiToUtf8"函数将字符串换为UTF-8编码格式。但是需要注意的是,这种方法只支持部分字符集,如果遇到一些非常规字符,依然可能会出现乱码。 其次,我们可以使用第方库进行UTF-8换。比如"iconv"库可以将不同编码格式的字符串相互换,比如将ANSI编码格式的字符串换成UTF-8编码格式的字符串。另外,还有一些Unicode库也可以进行UTF-8换,比如"JEDI Code Library"。 最后,如果以上两种方法都不行,可以考虑使用文本编辑器处理乱码问题。比如将文本编辑器的编码格式修改为UTF-8格式,再打开乱码文件,并保存一遍即可。这种方法虽然比较麻烦,但往往可以解决绝大部分乱码问题。 ### 回答2: Delphi 是 Pascal 语言的一个高级集成开发环境,它支持 Unicode 编码。但在一些特定情况下,当我们使用 UTF-8 编码时,Delphi 可能会出现乱码问题。 要解决这个问题,我们可以采取以下方法: 1. 设置字符集 在 Delphi 的字符串和文件中,我们可以设置字符集以指示编码格式。可以使用 TEncoding 类和 TStringStream 类来集中处理编码问题,以便让 Delphi 处理 UTF-8 格式的数据时不会出现乱码。 2. 采用 Unicode 字符串 Unicode 是由万国码 (UCS)(Universal Character Set,ISO 10646)标准统一编码方式,它允许处理任何语言所使用的字符。在 Delphi 中,我们可以使用 Unicode 字符串来处理 UTF-8 编码的数据,以避免乱码问题。 3. 码 如果从其他程序获得的 UTF-8 编码的数据出现了乱码问题,我们可以尝试将其换成 Delphi 可以处理的编码方式,比如 Unicode 字符串,可以使用 TEncoding 类进行换。 总之,在 Delphi 中处理 UTF-8 格式的数据时出现乱码问题,我们应该通过设置字符集、采用 Unicode 字符串、码等方法来解决。这样可以确保 Delphi 处理这些数据时不会出现编码相关的错误。 ### 回答3: Delphi 是一种编程语言,在字符编码方面,它默认使用的是 ASCII 编码。而 UTF-8 是一种全球通用的字符编码方式,它支持各种语言文字的编码和展示。因此,在 Delphi 中进行 UTF-8 编码换时可能会出现乱码的情况。 若要解决 Delphi UTF-8 乱码问题,可以使用 Delphi 中自带的 WideString 类型,在这种类型下,可以使用 WideChar 格式对字符进行编码和解码,避免编码换过程中出现乱码。 另一种解决 Delphi UTF-8 乱码问题的方法是使用第方库,如 UTF8String、Utf8Decode、Utf8Encode 等,这些库能够将 UTF-8 编码的字符换为 Unicode 格式的字符,再进一步进行处理,展示出正确的结果。 总之,在 Delphi 中进行 UTF-8 编码换时,需要注意使用正确的编码方式,防止出现乱码的情况。可以使用 Delphi 自带的 WideString 类型或第方库来实现 UTF-8 编码换,保证编码的正确性和稳定性。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值