把txt文件转化成Excel文件

jxjjljf 2008-04-01 08:28:07
~W2G2
东莞廷冠反光材料有限公司
料品基本资料表--料品小分类
~W1G2
程 式:INV40102
列印日期:2008/04/01 列印者:KFB 页次: 1
====================================================================================================================================
料品代号 料品名称 料品规格 速寻码 供应形态
厂库代号 部门代号 料品大分类 料品小分类
厂库说明 安全存量 再订购点 使用状况 单位材积 计重单位 料品重量 库存单位 批号控制 辅助控制 辅助单位
====================================================================================================================================
0AB0130130099980 1704 4 采购件
W004 P3 资材 R 反光材料类 C 原料类
原料仓 1 正常 YD N N
------------------------------------------------------------------------------------------------------------------------------------
0AB0130130110601 4 采购件
W004 P3 资材 R 反光材料类 C 原料类
原料仓 1 正常 YD N N
------------------------------------------------------------------------------------------------------------------------------------
0AB0130130124302 58"宽满天星 浅灰(1:1) 單重:350g 1822 4 采购件
W004 P3 资材 R 反光材料类 C 原料类
原料仓 1 正常 YD N N
====================================================================================================================================
~W2G2
东莞廷冠反光材料有限公司
料品基本资料表--料品小分类
~W1G2
程 式:INV40102
列印日期:2008/04/01 列印者:KFB 页次: 2
====================================================================================================================================
料品代号 料品名称 料品规格 速寻码 供应形态
厂库代号 部门代号 料品大分类 料品小分类
厂库说明 安全存量 再订购点 使用状况 单位材积 计重单位 料品重量 库存单位 批号控制 辅助控制 辅助单位
====================================================================================================================================
0AB0130130099980 1704 4 采购件
W004 P3 资材 R 反光材料类 C 原料类
原料仓 1 正常 YD N N
------------------------------------------------------------------------------------------------------------------------------------
0AB0130130110601 4 采购件
W004 P3 资材 R 反光材料类 C 原料类
原料仓 1 正常 YD N N
------------------------------------------------------------------------------------------------------------------------------------
0AB0130130124302 58"宽满天星 浅灰(1:1) 單重:350g 1822 4 采购件
W004 P3 资材 R 反光材料类 C 原料类
原料仓 1 正常 YD N N
====================================================================================================================================
.
.
.
.
下面还有更多的数据...,有很多页次


我只要把类似下面的数据(下面的算一条)弄到EXCEL里去,每条总共20个字段,

下面是20个字段:

料品代号
料品名称
料品规格
速寻码
供应形态 //上面的字段在这里换行了一次

厂库代号
部门代号
料品大分类
料品小分类 //上面的字段在这里换行了一次

厂库说明
安全存量
再订购点
使用状况
单位材积
计重单位
料品重量
库存单位
批号控制
辅助控制
辅助单位 //上面的字段在这里换行了一次

每2个字段内容之间有个空格

------------------------------------

下面的内容就是我要转到EXCEL里去的一条数据:

0AB0130130099980 1704 4 采购件
W004 P3 资材 R 反光材料类 C 原料类
原料仓 1 正常 YD N N
...全文
851 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
jxjjljf 2008-04-01
  • 打赏
  • 举报
回复
2种情况:

从===后面开始读,如果是数字或字母,那么就开始读第一个字段,长度是16,第一个字段后有一个空格,空格后开始读第二个字段,长度是42,
到第5个字段的时候换行,到第9个字段的时候换行,到第20个字段的时候换行,
依次类推,当读到有----的时候表示第一条数据结束,然后把这一条数据写入到EXCEL里面。

从---后面开始读,如果是数字或字母,那么就开始读第一个字段,长度是16,第一个字段后有一个空格,空格后开始读第二个字段,长度是42,
到第5个字段的时候换行,到第9个字段的时候换行,到第20个字段的时候换行,
依次类推,当读到有----的时候表示第一条数据结束,然后把这一条数据写入到EXCEL里面。
jxjjljf 2008-04-01
  • 打赏
  • 举报
回复
每个字段的长度如下:

料品代号16
料品名称42
料品规格41
速寻码4
供应型态6
厂库代号4
部门代号7
料品大分类38
料品小分类31
厂库说明24
安全存量12
再订购点5
使用状况6
单位材积5
计重单位4
料品重量5
库存单位5
批号控制4
辅助控制4
辅助单位4

2,497

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧