中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟

中国DOS联盟论坛
现在时间是 2026-08-05 05:22

共 48,038 主题排行 / 350,123 发帖 / 今日 0 篇 / 48,251 会员排行

DOS批处理 & 脚本技术（批处理室） » 如何把A 文件的所有内容写入C文件的A 行上面

可打印版本　867 / 5

第1楼　zhouxiaohuanv	发表于 2007-06-25 11:22
初级用户　发帖 29　积分 87
如何把A 文件的所有内容写入C文件的A 行上面请问有没有脚本能让A 文件的所有内容写入C文件的A 行上面，B 文件的所有内容写入C文件的B行上面！ [ Last edited by bjsh on 2007-7-31 at 11:17 AM ]

第2楼　lxmxn	发表于 2007-06-25 13:49
版主　发帖 4,938　积分 11,386
举个具体的例子吧。

第3楼　jmz573515	发表于 2007-06-26 07:56
银牌会员　发帖 464　积分 1,212
set fso=createobject("scripting.filesystemobject") ah=inputbox("请输入A的行号：") bh=inputbox("请输入B的行号：") set cfile=fso.OpenTextfile("c.txt") do while cfile.atendofstream<>true n=cfile.readline:hh=cfile.line-1 if hh=cint(ah) then n= a & n '此处看看A文件和B文件最后一行是不是以回车结束 if hh=cint(bh) then n= b & n '如果不是可改为n= b & vbcrlf & n s=s & n & vbcrlf loop cfile.close set file=fso.createtextfile("#c.txt") file.write s file.close createobject("wscript.shell").run "#C.TXT" function a set file=fso.opentextfile("a.txt") a=file.readall file.close end function function b set file=fso.opentextfile("b.txt") b=file.readall file.close end function

第4楼　zhouxiaohuanv	发表于 2007-06-26 09:14
初级用户　发帖 29　积分 87
例子: 文件A有多行文字文件B有多行文字文件C里我作了标，但是行数没有规定的 C文件内容：如：我想把文件A里面的内容放到这：A 我想把文件B里面的内容放到这：B

第5楼　wudixin96	发表于 2007-06-26 09:17
银牌会员　发帖 931　积分 1,928
楼主是想把A文件的内容当成一行插入C文件的A行的位置？还是只是把A文件的内容插入C文件的A行中？

第6楼　slore	发表于 2007-06-26 13:12
铂金会员　发帖 2,478　积分 5,212
instr(":A")成立 replace(C文本 ,":A" & vbcrlf & A文本)

[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023