Question

我需要创建一个日志文件（test.log），该文件在执行时间戳和操作后在此脚本的每个步骤之后写入。

我还需要创建一个文本文件（test_input.txt），它将写入以下行： “玛丽有只小羊羔” “谁住在海底的菠萝里” “我发誓说我养了一只puddu猫”

关闭输入文件打开文本文件进行阅读读取每一行并仅写入与条件语句确定的海绵（第2行）关联的行（if / end if）关闭文本文件关闭日志

Answer 1

你可以尝试自己做功课，也许你会从中学到一些东西（这是作业的目的，不是吗？）

您还可以尝试弄清楚这些代码正在做什么以满足您的要求，您肯定会从中学到一些东西：

Set al = createobject("System.Collections.ArrayList")
for each f in array("Mary had a little lamb", "Who lives in a pineapple under the sea", "I tawt I taw a puddu cat")
    for each l in filter(split(CreateObject("scripting.filesystemobject").OpenTextFile("c:\temp\in.txt", 1).readall, vbNewLine), f)
        if not isEmpty(l) then al.add l
    next
next
CreateObject("scripting.filesystemobject").OpenTextFile("G:\temp\out.txt", 2, true).write join(al.ToArray(), vbNewLine)

写入文件的Vbs然后仅输出该文件中的某些文本

1 个答案: