中国DOS联盟

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

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

举个具体的例子吧。

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

例子:
文件A有多行文字
文件B有多行文字
文件C里我作了标，但是行数没有规定的

C文件内容：
如：



我想把文件A里面的内容放到这
：A



我想把文件B里面的内容放到这

：B

楼主是想把A文件的内容当成一行插入C文件的A行的位置？

还是只是把A文件的内容插入C文件的A行中？

instr(":A")成立
replace(C文本 ,":A" & vbcrlf & A文本)