txt文档数据导入乱码 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → txt文档数据导入乱码

共有2335人关注过本帖树形打印复制链接主题：txt文档数据导入乱码

ljh29206

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1359 积分：12028 威望：0 精华：0 注册：2012/3/5 11:32:00

txt文档数据导入乱码 发帖心情

Post By：2015/8/21 15:58:00 [只看该作者]

请看 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

求助这是什么问题如何解决