中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-08 17:06
47,811 主题排行 / 349,895 发帖 / 今日 0 篇 / 48,253 会员排行
DOS批处理 & 脚本技术(批处理室) » 批处理命令可不可以直接用echo向xls文件写入数据?
可打印版本  1,496 / 12
第1楼 pykacha 发表于 2008-05-13 18:09
初级用户 发帖 73 积分 156
批处理命令可不可以直接用echo向xls文件写入数据?
问题描述:
我们可以用"echo %变量1% %变量2% >1.txt"命令向txt文件写入数据,为了方便数据的处理,我想直接把数据写入电子表格xls文件.
请问有没有办法做到?
第2楼 bat-zw 发表于 2008-05-13 18:19
金牌会员 发帖 1,276 积分 3,105
I will tell you that bat have no idea
第3楼 slore 发表于 2008-05-13 18:24
铂金会员 发帖 2,478 积分 5,212
I will tell you that vbs can do it.
第4楼 pykacha 发表于 2008-05-13 18:38
初级用户 发帖 73 积分 156
Originally posted by slore at 2008-5-13 06:24 PM:
I will tell you that vbs can do it.


关于VBS我也上网看过些文章,但还不会编写代码,前辈可不可以帮忙写个代码?
先谢谢!
第5楼 pooronce 发表于 2008-05-13 18:54
中级用户 发帖 250 积分 484
标准的xls有特殊格式,直接是不行的
不过你可以直接用echo配合数据及tab分割符来达到效果,文件名定义成xls就行了
第6楼 slore 发表于 2008-05-13 19:00
铂金会员 发帖 2,478 积分 5,212
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
Set
objWb = objExcel.Workbooks.Add
Set objWs = objWb.Worksheets.Add
objExcel.Cells(1, 1).Value = "slore"

Set objExcel = Nothing
第7楼 pykacha 发表于 2008-05-14 16:28
初级用户 发帖 73 积分 156
slore前辈实现了真正意义的xls文件,可惜没自动保存。如果可以用bat文件把变量传递给它,调用它来保存为xls文件就好了。
pooronce前辈这种方法如果数据过多的时候再写入时会不会很慢?
第8楼 slore 发表于 2008-05-14 16:44
铂金会员 发帖 2,478 积分 5,212
有自动保存,我只是为了让你看见=。=没有写……


Set objExcel = CreateObject("Excel.Application")
'objExcel.Visible = True 显示对象
'objExcel.DisplayAlerts = FALSE 覆盖方式保存
Set objWb = objExcel.Workbooks.Add
Set objWs = objWb.Worksheets.Add
objExcel.Cells(1, 1).Value = "Slore"
objWb.SaveAs("C:\Test.xls")
objExcel.Quit
Set objExcel = Nothing

参数当然有……自己可以查看VBS的Argument对象
或者找找例子
第9楼 pooronce 发表于 2008-05-14 17:11
中级用户 发帖 250 积分 484
汗……不要用那样的称呼,受不起
我说的相当于你直接写入到一个文本格式文件里,只是设定它的后辍为xls罢了,所以理论上说只会比标准xls快。

如果是大量数据需要处理的话,可以考虑学习使用gawk
第10楼 zh159 发表于 2008-05-14 17:39
金牌会员 发帖 1,467 积分 3,687
还有另外一个方法:echo后缀为csv文件,数据采用“,”分号(英文分号)分割,可以直接用Excel打开,Excel处理后再存为xls文件

PS:简单测试发现支持部分公式:
csv


[ Last edited by zh159 on 2008-5-14 at 05:41 PM ]
第11楼 slore 发表于 2008-05-14 17:51
铂金会员 发帖 2,478 积分 5,212
文本(以制表符分隔)(*.txt) (Windows)
文本 (Macintosh)
文本(OS/2 或 MS-DOS)
CSV(以逗号分隔)(*.csv) (Windows)
CSV (Macintosh)
CSV(OS/2 或 MS-DOS)

如果需要将工作簿保存为以制表符分隔或以逗号分隔的文本文件,以便在另一个操作系统中使用,请选择合适的转换器以确保制表符、分行符以及其他符号正确的转换。
只保存活动工作表。


2个是一样的道理……

一个是TAB间隔,一个是逗号间隔而已。

txt的把你的逗号改成TAB,也支持公式
第12楼 cnLiou 发表于 2008-05-14 19:16
新手上路 发帖 6 积分 16
与html的格式一致即可. 如下可供考:

@Echo Off

Echo ^<Table border="1"^>>Excel.xls
REM Title
Echo ^<TR^>>>Excel.xls
Echo ^<TD^>Sn^</TD^>>>Excel.xls
Echo ^<TD^>Name^</TD^>>>Excel.xls
Echo ^<TD^>Age^</TD^>>>Excel.xls
Echo ^</TR^>>>Excel.xls
REM Content
Echo ^<TR^>>>Excel.xls
Echo ^<TD^>1^</TD^>>>Excel.xls
Echo ^<TD^>Liou^</TD^>>>Excel.xls
Echo ^<TD^>25^</TD^>>>Excel.xls
Echo ^</TR^>>>Excel.xls
Echo ^<TR^>>>Excel.xls
Echo ^<TD^>2^</TD^>>>Excel.xls
Echo ^<TD^>Tony^</TD^>>>Excel.xls
Echo ^<TD^>26^</TD^>>>Excel.xls
Echo ^</TR^>>>Excel.xls
Echo ^<TR^>>>Excel.xls
Echo ^<TD^>3^</TD^>>>Excel.xls
Echo ^<TD^>Eric^</TD^>>>Excel.xls
Echo ^<TD^>27^</TD^>>>Excel.xls
Echo ^</TR^>>>Excel.xls
Echo ^</Table^>>>Excel.xls
第13楼 pykacha 发表于 2008-05-21 17:53
初级用户 发帖 73 积分 156
不停地学习中,谢谢大家
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023