怎么读取txt的ansi编码(如何从txt格式转到ansi编码格式)

本文目录
- 如何从txt格式转到ansi编码格式
- 去哪里才可以找到ANSI编码的TXT文本,就是小说!
- 如何把TXT小说转换成ANSI编码
- 怎样把TXT格式的文件转换成ansi格式的文件
- .txt文件也有编码么怎么查看.txt的编码如何修改
- VB 怎么获取或判断txt文件的编码格式
- 如何搞出ANSI编码格式的TXT文本MP3下歌词要用急!~
- 如何查看txt文本文档的编码格式
- ansi格式的TXT字符串在ios如何解析
如何从txt格式转到ansi编码格式
保存或另存为是在保存按钮旁边有编码选项。
LPSTR Convert(LPCSTR str, int sourceCodepage, int targetCodepage)
{
int len=_tcslen(str);
int unicodeLen=MultiByteToWideChar(sourceCodepage,0,str,-1,NULL,0);
wchar_t* pUnicode;
pUnicode=new wchar_t;
memset(pUnicode,0,(unicodeLen+1)*sizeof(wchar_t));
MultiByteToWideChar(sourceCodepage,0,str,-1,(LPWSTR)pUnicode,unicodeLen);
BYTE * pTargetData;
int targetLen=WideCharToMultiByte(targetCodepage,0,(LPWSTR)pUnicode,-1,(char *)pTargetData,0,NULL,NULL);
pTargetData=new BYTE;
memset(pTargetData,0,targetLen+1);
WideCharToMultiByte(targetCodepage,0,(LPWSTR)pUnicode,-1,(char *)pTargetData,targetLen,NULL,NULL);
LPSTR szResult=new TCHAR;
wsprintf(szResult,"%s",pTargetData);
delete pUnicode;
delete pTargetData;
return szResult;
}
用法
编码
Convert(str,936,CP_UTF8);
解码
Convert(str,CP_UTF8,936);
去哪里才可以找到ANSI编码的TXT文本,就是小说!
***隐藏网址***
知道小说的名字的话,可以在迅雷里直接搜索,选择格式为txt就可以了,一般的小说上面都有的
如何把TXT小说转换成ANSI编码
打开文档之后,点文件那个选项,选“另存为”,然后会出现一个对话框,然后在对话框最下面一栏那儿点“编码”出现一个下拉列表,直接选中ANSI这个编码就可以了。应该比较容易理解了吧。。。
怎样把TXT格式的文件转换成ansi格式的文件
打开你的TXT文件--左上角的文件--另存为--在编码选择ANSI,保存即可,希望对你有帮助
.txt文件也有编码么怎么查看.txt的编码如何修改
1.用记录本新建一个空白文档并另存为utf-8编码到d盘为“文本模板.txt”;
2.把下面代码保存为注册表文件“指定新建文本默认模板.reg”,并执行即可:
windows
registry
editor
version
5.00
"filename"="d:\\文本模板.txt"
这样原来的文本默认编码为ansi,现在就转变为了utf-8编码了,避免出现乱码。
VB 怎么获取或判断txt文件的编码格式
哈哈!一周前我刚刚遇到类似问题 慷慨把代码给你吧!!顺便贴上所有格式转UTF8的代码
(我本来是给XML读取用的 MSXML太挑剔了 只读UTF-8格式- - 不过转UTF-8的还是有点问题 记事本打开看上去读取没有问题 但是用MSXML读取依然有点问题。)
原理:根据文件前两个字符判断
注意 放在一个模块里面。
使用:GetEncoding(文件路径),返回一个Encoding枚举体(仿.net)
例如:
Dim ReturnEncoding As Encoding
ReturnEncoding = GetEncoding("C:\1.txt")
If ReturnEncoding = UTF8 Then
’UTF处理
ElseIf ReturnEncoding = Unicode Then
’Unicode
Elseif ReturnEncoding = UnicodeBigEndian Then
’Unicode-BE处理
Else
’ANSI处理
End If
========模块Encoding.bas==========
Option Explicit
Public Enum Encoding
ANSI
Unicode
UnicodeBigEndian
UTF8
End Enum
Public Function GetEncoding(FileName As String) As Encoding
On Error GoTo Err
Dim fBytes(1) As Byte, freeNum As Integer
freeNum = FreeFile
Open FileName For Binary Access Read As #freeNum
Get #freeNum, , fBytes(0)
Get #freeNum, , fBytes(1)
Close #freeNum
If fBytes(0) = &HFF And fBytes(1) = &HFE Then GetEncoding = Unicode
If fBytes(0) = &HFE And fBytes(1) = &HFF Then GetEncoding = UnicodeBigEndian
If fBytes(0) = &HEF And fBytes(1) = &HBB Then GetEncoding = UTF8
Err:
End Function
Public Sub FileToUTF8(FileName As String)
Dim fBytes() As Byte, uniString As String, freeNum As Integer
Dim ADO_Stream As Object
freeNum = FreeFile
ReDim fBytes(FileLen(FileName))
Open FileName For Binary Access Read As #freeNum
Get #freeNum, , fBytes
Close #freeNum
uniString = StrConv(fBytes, vbUnicode)
Set ADO_Stream = CreateObject("ADODB.Stream")
With ADO_Stream
.Type = 2
.Mode = 3
.Charset = "utf-8"
.open
.WriteText uniString
.SaveToFile FileName, 2
.Close
End With
Set ADO_Stream = Nothing
End Sub
如何搞出ANSI编码格式的TXT文本MP3下歌词要用急!~
你打开TXT文本,在文件那里点一下看到另存为,在编码那里改成ANSI。
如果你的文本名称还是同一个的话建议改一下名称或者存在另外一个文件夹里
如何查看txt文本文档的编码格式
你是指ANSI和Unicode,还是GB2312/Big5呢,如果是前者你打开该文本文档点另存为,看文本类型;后者的话你需要用IE看,里面有编码选择,也可以自己判断,比如如果是big5码属于ansi类型,如果你是简体系统,那用记事本打开肯定是乱码,反之gb2312属ansi类型,繁体打开同样乱码,如果unicode就无法判断了,当然你可以通过另存为不同ansi类型是否乱码来判断。
下载UE或EditPlus看看,好像能看到文件的编码类型,试试吧。
ansi格式的TXT字符串在ios如何解析
当判断txt的编码不是unicode编码时,再用这些case一个一个去解码,如果解码成功,这个函数是会返回解码后的NSString,如果解码失败,返回nil。做个循环就可以了
txt主流编码有unicode(utf-8,utf16 big,utf16 little), ansi编码(gb2312等),另外起始字节要分有无bom,所以你得先根据每个编码的不同从头几个字节判断该文件为哪种编码,然后再用对应的解码去解。 unicode解码就不说了,ansi解码苹果也有对应的解码器,以下代码列出的5种就可以解码ansi的编码
case 1:
testString = ;
break;
case 2:
testString = ;
break;
case 3:
testString = ;
break;
case 4:
testString = ;
break;
case 5:
testString = ;
default:

更多文章:
跷二郎腿太低好吗?想要通过贴墙站改正二郎腿影响的话,有哪些要点需要注意
2026年10月11日 05:10
易语言点击js按钮(易语言网页填表怎样点击链接为“javascript:void(0)“的按钮)
2026年10月11日 03:00
compare with造句(用compared with和compared to造句)
2026年10月10日 23:30
tensorflow与keras对应版本(为什么tensorflow2.8没有keras)
2026年10月10日 22:10
maven仓库jar网站(如何在maven仓库中添加jar包)
2026年10月10日 19:50




