问题标签 [fso]

我正在尝试从文本文件中写入所有内容，但它只写入第一个字符。

这是我的代码：

我也试过这个，但同样只写第一个字符：

请帮忙。谢谢！

以下是在文件夹中搜索“需求”之类的文件夹的过程。当开始逐步执​​行时，我收到一条错误消息，因为FileSystemObject：

用户定义类型未定义

我错过了什么？

我目前有一个删除用户表单中文件的代码。我输入一个参考，这个术语填充到一个工作表中，所有的计算都被计算出来了。

我要做的是删除旧的现有文档，然后保存标题中带有“CLOSED”一词的新副本。我觉得这段代码应该可以工作，但看不出它为什么找不到指定的文件。

I'm writing a subroutine that needs to extract text from files in a directory. The routine is below. It works as long as there is only one file in the directory. When there are more than one, it tells me Set intFSO = intFSO.OpenTextFile(filePath, 1) line below.

I assume there is something I need to be doing to reset for the next file but I cannot seem to figure out what it is. Any tips?

There is more to this script. The routine above is called recursively in order to traverse the sub directories. All of that is working fine.

我正在尝试使用 FileSystemObject 打开一个文件，但是当我尝试运行它时，系统什么也不做。不显示调试，没有运行时错误，不编译。它只是保持原样。我还检查了参考资料中的“MS Scripting Runtime”。以下是我为此使用的代码：

我有 txt 和 csv 文件要每行读取。一行以 . 结尾CR-LF。但是在某些文件中，有CR和没有LF; 相反，下一个物理行以FF. UFT 12 将它们一起读取，就像是一行一样。我使用 fso 读取文件：

我需要将这些文件的每一行与另一个文本文件进行比较：

我试图将FileStrRas 数组分开：

但是在这里，我坚持阅读 File2 的下一行，以与之后的内容进行比较FF。

更新 试图跳线：

在这种和平的代码中，该行print ln&"-"&ln+h&"-"&h打印正确的数字（ln 应该是当前读取的行号）。但是字符串 print ( print "F1: "&FileStr & VBNewLine & "F2: "&File2str) 给出了以下内容：

F1: 2|8122|TX|...

F2: 4|8123|FG|...

似乎即使ln+h是 'ln' 而 'h' 为 0，但又fso跳过了一行。

我对 VBA 相当陌生，非常感谢您对这个程序的任何帮助！

该程序的目标是将所有特定文件类型 (.pdf) 从网络复制到桌面上的文件夹中。但是，(.pdf) 文件位于每个文件夹的子文件夹中。

如果我让用户定义文件夹（带有许多子文件夹），我希望程序将每个 .pdf 从每个子文件夹复制到目标文件夹中。

这是我到目前为止浏览互联网所得到的。

当我运行它时，我得到： Run-time Error '424' Object Required for

我是否以正确的方式处理此代码？还是有替代方法来完成这项任务？

谢谢！

在本地 Windows 10 机器上使用 VBScript 来自动化一些任务。处理大型二进制文件（500 MB 到 2 GB）。FileSystemObject的文件处理速度非常慢！ADODB速度很快，但会将整个文件加载到内存中，这是一个很大的禁忌，因为我将同时在多个文件（在多个磁盘上）上运行脚本。有什么选择吗？

下面是一个FSO大约需要 26 秒来处理 607 MB 文件的示例。仅跳过 600 MB 就消耗了惊人的 25 秒！

如您所见，仅在从磁盘读取数据的同时进行测试，以消除任何由写入磁盘引起的减速的可能性。一样的区别！

我发现有两种方法可以在 Excel VBA 中创建和写入文本文件：使用 microsoft 标准库或使用 Microsoft Scripting Runtime。它们是等价的吗？下面我们有两者的例子。

我有一个包含大约 6gb 数据的 .txt。由分号分隔的字段。

我需要根据预构建字典逐行检查其中一个字段，如果匹配，则将相应行的所有字段复制到二维数组中。

目前这是代码的相关部分（省略了声明和功能。不在此问题的范围内）：

第一个循环大约需要 19 分钟。第二多一点。

已经尝试打开附加，但它崩溃了，可能是因为我在 4gb 的 RAM 上运行。一次加载整个文件的任何方式似乎都会使机器崩溃。Open for input 不会读取整个文件，因此会丢失数据。如果它可以处理超过 256 个条目，那么在第一个循环中使用集合来避免重新循环 txt 会很棒......当然，循环内的动态 redim 数组是毫无疑问的，因为它是性能杀手。

有没有比这更快的方法？