中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客注册登录会员网志搜索命令提示符 Bash 上传统计

中国DOS联盟论坛
现在时间是 2026-06-15 04:40

欢迎新会员 luminwei　 RSS
共 47,998 篇主题 / 350,065 篇帖子 / 今日 2 篇 / 48,211 位会员

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

楼主 如何把A 文件的所有内容写入C文件的A 行上面发表于 2007-06-25 11:22　·　中国广东广州电信

zhouxiaohuanv

初级用户

★

积分 87
发帖 29
注册 2007-03-31 01:15
UID 83440
性别女

状态离线

请问有没有脚本能让A 文件的所有内容写入C文件的A 行上面，B 文件的所有内容写入C文件的B行上面！

[ Last edited by bjsh on 2007-7-31 at 11:17 AM ]

第 2 楼发表于 2007-06-25 13:49　·　中国湖北武汉电信

lxmxn

版主

★★★★★

积分 11,386
发帖 4,938
注册 2006-07-23 17:10
UID 59080

状态离线

举个具体的例子吧。

第 3 楼发表于 2007-06-26 07:56　·　中国辽宁本溪联通

jmz573515

银牌会员

★★★

积分 1,212
发帖 464
注册 2006-12-13 21:11
UID 73417
性别男

状态离线



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