以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 导出文本文件,如何去标题行 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=93752) |
-- 作者:qwz405 -- 发布时间:2016/12/6 11:47:00 -- 导出文本文件,如何去标题行 Dim ex As New Exporter ex.SourceTableName = "AtdRecord88" \'指定导出表 ex.FilePath = "D:\\Reports\\" \'指定目标文件路径 ex.Format = "Delimited" \'导出格式为符号分割的文本文件 ex.Fields = "CardNo,RecDate,RecTime" ex.NewTableName = "20161206" \'指定文件名,注意无须扩展名 ex.Export() \'开始导出 Dim str As String = FileSys.ReadAllText("D:\\Reports\\20161206.txt", Encoding.Default) str = str.Replace("""", "") str = str.Replace(",", " ") FileSys.WriteAllText("D:\\Reports\\20161206.txt", str, False, Encoding.Default)
|
-- 作者:有点蓝 -- 发布时间:2016/12/6 11:55:00 -- Dim ex As New Exporter ex.SourceTableName = "AtdRecord88" \'指定导出表 ex.FilePath = "D:\\Reports\\" \'指定目标文件路径 ex.Format = "Delimited" \'导出格式为符号分割的文本文件 ex.Fields = "CardNo,RecDate,RecTime" ex.NewTableName = "20161206" \'指定文件名,注意无须扩展名 ex.Header = False ex.Export() \'开始导出 Header 逻辑型,用于指定导出文本文件的时候,是否包括列名称。 |