文件编码查看

595262556

.版本 2
.支持库 spec

M ＝ 文件_枚举 (编辑框2.内容, “*.txt”, 数组, 真, 假, 真)
调试输出 (取数组成员数 (数组), M)

.计次循环首 (取数组成员数 (数组), N)

    临时路径 ＝ 数组 [N]
    调试输出 (临时路径)

    临时内容 ＝ 读入文件 (临时路径)
    编码 ＝ 文件_取文本编码 (临时路径)
    调试输出 (编码)


.计次循环尾 ()


会崩溃是啥问题 有谁知道吗            
编码 ＝ 文件_取文本编码 (临时路径) 不用模块就不会


但不知道有啥好的方式判断编码 有大神 给个判断编码的范例呗

cobi

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
数组	文本型		0
M
N
临时路径	文本型
文本对象	快速文本对象
临时内容	文本型
编码

M ＝ 文件_枚举 (编辑框2.内容, “*.txt”, 数组, 真, 假, 假)
调试输出 (取数组成员数 (数组), M)
计次循环首 (取数组成员数 (数组), N)
临时路径 ＝ 数组 [N]
调试输出 (临时路径)
编码 ＝ 文件_取文本编码 (临时路径)
调试输出 (编码)
文本对象.从文件读 (临时路径)
临时内容 ＝ 文本对象.取文本 (, )
调试输出 (临时内容)
计次循环尾 ()

i支持库列表	支持库注释
commobj	通用对象支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 commobj<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 数组, 文本型, , "0"<br /> .局部变量 M<br /> .局部变量 N<br /> .局部变量 临时路径, 文本型<br /> .局部变量 文本对象, 快速文本对象<br /> .局部变量 临时内容, 文本型<br /> .局部变量 编码<br /> <br /> M ＝ 文件_枚举 (编辑框2.内容, “*.txt”, 数组, 真, 假, 假)<br /> 调试输出 (取数组成员数 (数组), M)<br /> <br /> .计次循环首 (取数组成员数 (数组), N)<br /> <br />     临时路径 ＝ 数组 [N]<br />     调试输出 (临时路径)<br />     编码 ＝ 文件_取文本编码 (临时路径)<br />     调试输出 (编码)<br /> <br />     文本对象.从文件读 (临时路径)<br />     临时内容 ＝ 文本对象.取文本 (, )<br />     调试输出 (临时内容)<br /> <br /> .计次循环尾 ()

按你的代码测试没问题呢，换成快速文本对象也没问，或者你可以换个版本的精易模块试试，我用的是 v11.0.5

尛龍科技

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
临时路径	文本型
数组	文本型		0
编码类型	文本型

临时路径 ＝ 数组 [N]
编码类型 ＝ 取文本编码 (临时路径)

子程序名	返回值类型	公开	备 注
取文本编码	文本型
参数名	类 型	参考	可空	数组	备 注
文件路径	文本型

变量名	类 型	静态	数组	备 注
文件号	整数型
头部数据	字节集

如果真 (文件是否存在 (文件路径) ＝ 假)
返回 (“文件不存在”)

文件号 ＝ 打开文件 (文件路径, #读入, )
如果真 (文件号 ＝ 0)
返回 (“打开失败”)

头部数据 ＝ 读入字节集 (文件号, 3)
关闭文件 (文件号)
判断 (取字节集长度 (头部数据) ≥ 3)
判断 (头部数据 [1] ＝ 239 且 头部数据 [2] ＝ 187 且 头部数据 [3] ＝ 191)  ' UTF-8 BOM
返回 (“UTF-8”)






判断 (取字节集长度 (头部数据) ≥ 2)
判断 (头部数据 [1] ＝ 255 且 头部数据 [2] ＝ 254)  ' UTF-16 LE
返回 (“UTF-16 LE”)
判断 (头部数据 [1] ＝ 254 且 头部数据 [2] ＝ 255)  ' UTF-16 BE
返回 (“UTF-16 BE”)
' 无BOM情况
如果真 (是否UTF8无BOM (文件路径))
返回 (“UTF-8”)
返回 (“ANSI”)




返回 (“ANSI”)

子程序名	返回值类型	公开	备 注
是否UTF8无BOM	逻辑型
参数名	类 型	参考	可空	数组	备 注
文件路径	文本型

返回 (假)

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 临时路径, 文本型<br /> .局部变量 数组, 文本型, , "0"<br /> .局部变量 编码类型, 文本型<br /> <br /> 临时路径 ＝ 数组 [N]<br /> 编码类型 ＝ 取文本编码 (临时路径)<br /> <br /> .子程序 取文本编码, 文本型<br /> .参数 文件路径, 文本型<br /> .局部变量 文件号, 整数型<br /> .局部变量 头部数据, 字节集<br /> <br /> .如果真 (文件是否存在 (文件路径) ＝ 假)<br />     返回 (“文件不存在”)<br /> .如果真结束<br /> <br /> 文件号 ＝ 打开文件 (文件路径, #读入, )<br /> .如果真 (文件号 ＝ 0)<br />     返回 (“打开失败”)<br /> .如果真结束<br /> <br /> 头部数据 ＝ 读入字节集 (文件号, 3)<br /> 关闭文件 (文件号)<br /> <br /> <br /> .判断开始 (取字节集长度 (头部数据) ≥ 3)<br />     .判断开始 (头部数据 [1] ＝ 239 且 头部数据 [2] ＝ 187 且 头部数据 [3] ＝ 191)  ' UTF-8 BOM<br />         返回 (“UTF-8”)<br />     .默认<br /> <br />     .判断结束<br /> <br /> .默认<br /> <br /> .判断结束<br /> <br /> .判断开始 (取字节集长度 (头部数据) ≥ 2)<br />     .判断开始 (头部数据 [1] ＝ 255 且 头部数据 [2] ＝ 254)  ' UTF-16 LE<br />         返回 (“UTF-16 LE”)<br />     .判断 (头部数据 [1] ＝ 254 且 头部数据 [2] ＝ 255)  ' UTF-16 BE<br />         返回 (“UTF-16 BE”)<br />     .默认<br />         ' 无BOM情况<br />         .如果真 (是否UTF8无BOM (文件路径))<br />             返回 (“UTF-8”)<br />         .如果真结束<br />         返回 (“ANSI”)<br />     .判断结束<br /> <br /> .默认<br /> <br /> .判断结束<br /> <br /> 返回 (“ANSI”)<br /> <br /> .子程序 是否UTF8无BOM, 逻辑型<br /> .参数 文件路径, 文本型<br /> <br /> 返回 (假)

这就是判断编码的方式