问题标签 [fso]

以下代码提取特定文件夹路径中的所有文件夹。

我正在尝试修改此脚本以仅提取上周在此路径中填充的文件夹，但我不确定如何实现此目的。先感谢您。

我正在尝试将文件夹路径中的所有 .xlsm 文件保存为 .xlsx ，尽管脚本可以成功运行，但每个工作簿都会损坏。有人可以解释我如何克服这个问题

先感谢您。

已编写以下脚本以打开文件夹中的所有 .xlsm 文件类型并将它们保存为新目录中的 .xlsx 类型，但尝试另存为 .xlsx 时脚本一直失败。

返回的错误消息是运行时错误“1004”

所有解决此问题的尝试都失败了，非常感谢您的帮助，我提前感谢您。

我正在尝试将数据从 VBA 写入文本文件。我的语法没有显示调试或编译错误，但是当方法完成并打开文本文件时，它没有任何可读性。这一切似乎都是中文的。这是我的语法，是什么导致输出无法辨认？

编辑 - 附加信息
这些是传递的值（不是描述的粗体文本）
数据库名称： C:\Test\db1.accdb
表名：日志
连接信息： ODBC;DRIVER=SQL Server;SERVER=servername;UID =userid;PWD=密码;APP=Microsoft Office 2013;DATABASE=数据库

编辑 2
这是我用来调用的语法

我一直在研究 JS 中的 fso，并且想知道是否可以获取和播放本地存储在客户端计算机上的视频，只将路径保存在数据库中？

以下示例暗示在 IIS（或类似的东西）上运行的本地 Web 应用程序。

上传视频并将其放入数据库，但客户端可能使用的空间有限，因此将视频编码为 base64 并将其附加到数据库是不切实际的。所以我可以设置文件的不可见文件输入将是最好的解决方案（因为应用程序也必须离线工作，所以 youtube 不是一个选项）。

tl；博士
有没有办法只用视频/音频文件的路径来设置file属性？<input type="file">

我现在拥有的

我正在尝试将 Excel 工作簿从文件夹 X 复制到文件夹 Y，并且如果文件夹 Y 中已经存在该名称的文件，则该文件不会被覆盖，而是新文件的后缀为“-复制” , '- Copy (2)' 等 - 本质上是重新创建用于在文件夹中复制和粘贴相同文件的手动过程。

我原以为会有一个功能可以让你做到这一点，但到目前为止我没有尝试过似乎符合确切要求：

• Workbook.SaveAs提示用户一条消息，询问是否应该替换文件

• Workbook.SaveCopyAs只是在没有提示的情况下覆盖文件

• 该FileSystemObject.CopyFile方法有一个“覆盖”参数，但是如果设置为 false 并且文件已经存在，这只是错误，这是根据Microsoft 网站的预期行为

创建一个根据所选文件夹（.xls (1)、.xls (2) 等）中现有文件的数量递增的计数器并不难，但我希望可能有比这更直接的方法这个。

我正在使用此代码来获取目录的子文件夹：

现在当 m_sFolder 为“C:\Users\MyUser\Documents”时，一个子文件夹为“C:\Users\MyUser\Documents\Eigene Bilder”。“Eigene Bilder”是 Windows 将德语文件夹称为“我的图片”。

但是，文件夹“C:\Users\MyUser\Documents”不包含“我的图片”、“图片”或“Eigene Bilder”。

文件夹“我的图片”位于：C:\Users\MyUser\Pictures

谁能告诉我为什么 FSO 可能想告诉我这个目录“C:\Users\MyUser\Documents\Eigene Bilder”存在吗？

我完全感到困惑。

使用此代码

...我得到文件夹名称“C:\Users\MyUser\Documents\Eigene Bilder”

此文件夹不存在，似乎是一个 JUNCTION。

如何获取此文件夹的完全限定名称？

VBA - 访问

我正在使用 fso.DeleteFolder 删除服务器上的文件夹，该文件夹是同一 Access DB 中的早期函数创建的。fso.DeleteFolder 代码运行没有错误，并在显示文件夹不再存在后运行 fso.FolderExists（在删除之前，fso.FolderExists 表示该文件夹确实存在）。

但是，该文件夹仍列在服务器上的文件资源管理器中。刷新没有好处。双击服务器上的文件夹时，我收到一条错误消息，指出该文件夹不可访问且访问被拒绝（在删除之前，该文件夹是正常的）。

该文件夹可能有也可能没有子文件夹和/或文件 - 但我认为这并不重要，因为如果我使用不同的文件夹名称再次运行创建/删除过程，问题会重复 - 除了先前的文件夹现在不再在文件资源管理器中列出（现在按照上帝的意图真正删除了），替换为应该删除的新文件夹，并出现相同的双击错误，依此类推。

我在函数结束时杀死了我的 fso 对象，我相信同样的问题也会发生在 KILL 而不是 fso 上。

任何帮助/想法将不胜感激。

我正在尝试根据数字列表在目录中查找文件。每个文件都以 6 位数字开头，但可以以随机字母结尾。- 所以我设法编写了一个脚本，它只比较文件名的前六个字母。此外，我只想复制 .pdf 和 .dxf 文件——这就是为什么我还要检查文件类型。

只是为了使它更复杂，文件的“源文件夹”是不同的。它由数字的前 3 位数字和 2 个“_”组成。例如。

C:\文件\258__\258956.pdf

这可以通过将前三位数字和 __ 添加到源路径来轻松解决。（但尚未实施）

问题是我的脚本确实无限运行，因为它永远不会离开循环。它也只检查文件列表中的第一个数字。

在这个问题之前我真的在互联网上搜索过。另外，我想为 stackoverflow 社区提供支持，因为直到现在其他问题确实有帮助。

• 我通常只在 vba (Excel) 中编写脚本，这就是我不熟悉 vbs 的原因。

在我的文件列表的一部分之后，它定义了必须找到哪些文件

这是我已经拥有的脚本

我的问题的解决方案可能非常简单，但我真的被卡住了。所以任何帮助表示赞赏。总结一下，我的大问题是，脚本永远不会退出循环。但我不知道如何以及何时结束它，经过 10'000 次循环将是一个愚蠢的解决方案。