可能的菜鸟问题,但在这里幽默我......
我每晚将至少两个 xml 文件拉入一个单独的目录,这些文件被命名为“order_'type1/2'.12345.12345.xml”,其中“type1/2”可以是两个单词之一,并且数字字符串会有所不同基于日期。我正在寻找一些东西来拉入(不管日期字符串)名为“order_'type1'*.xml 的 xml 文件。据我所知,VBScript 不一定能很好地使用通配符,所以我在损失在这里。
我最初尝试了以下方法:
Const acAppendData = 2
Set objAccess = CreateObject("Access.Application")
objAccess.OpenCurrentDatabase ("C:\Path_to_testdb\test.accdb")
Application.ImportXML ("Path_on_the_server_\order_'type1'*.xml"), acAppendData
但无论出于何种原因,它停止工作(我发誓我没有疯)。所以,我环顾四周,发生了这样的事情:
Dim strPathFile As String
Dim strFile As String
Dim strPath As String
strPath = "C:\_where ever file is located_\"
strFile = Dir(strPath & "order_'type1'*.xml")
strPathFile = strPath & strFile
Application.ImportXML strPathFile, acAppendData
我希望这可以解决问题,但是它在第 1 行(哎哟!)char 17 上给了我一个“预期的语句结束”错误......在这一点上,我对语言本身的了解还不够,无法接受教育搜索我真正需要的东西。任何朝着正确方向的轻推都会受到欢迎!
TLDR:我希望使用 VBScript 从(可能)许多使用类似命名约定(不同日期字符串)的文件将单个 xml 文件导入 Access,并附加数据。这将每天进行,并且在新的一天放置在目录中的新文件将具有新的命名。用通配符来做这件事会很棒,但是 VBScript 要么不喜欢我,要么不喜欢通配符!
同样,我对 VBScript 的了解非常有限,因此非常感谢任何方向/帮助!
谢谢!