- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- txt文档数据导入乱码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=73566)
-- 发布时间：2015/8/21 15:58:00
-- txt文档数据导入乱码
请看 txt文本的最后一列 人名
导入的时候 识别不到
代码如下：
Tables("表A").StopRedraw
Dim strs As String = FileSys.ReadAllText("C:\\Users\\user\\Desktop\\扫描实绩.txt")
strs = strs.Replace(vblf,"")
Dim rs() As String = strs.Split(vbcr)
For i As Integer = 0 To rs.Length - 1
Dim cs() As String = rs(i).Split(",")
If cs.Length = 10 Then
Dim dr As DataRow = DataTables("表A").Addnew()
dr("第二列") =cs(1)
dr("第一列")= cs(9)
Output.Show(cs(9))
End If
Next
Tables("出货情况记录").ResumeRedraw
求助 这是什么问题 如何解决
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:扫描实绩.txt |
-- 发布时间：2015/8/21 16:02:00
--
Dim strs As String = FileSys.ReadAllText("C:\\Users\\user\\Desktop\\扫描实绩.txt",EnCoding.Default)
-- 发布时间：2015/8/21 16:16:00
--
老师能简单说明一下原因吗
-- 发布时间：2015/8/21 16:18:00
--
打开的时候，文件默认的编码的问题。