如何使用VBScript将数据加载到DIAdem的数据门户？

我想用VBScript将.tdm文件加载到DIAdem National Instruments中，但找不到如何执行此操作。我有一个对话框，打开一个浏览窗口，以字符串形式返回路径。所以我希望有一个函数可以像这样工作：

Call Data.Root.ChannelGroups.Load(myStringWithThePath)

---

刚刚注意到我在这个问题上得到了风滚草徽章。这是我上周找到的解决方案，如果有人在乎：

Set objDialog = CreateObject("UserAccounts.CommonDialog")

objDialog.Filter = "TDM-Datei(*.tdm)|*.tdm|All Files (*.*)|*.*"
objDialog.FilterIndex = 1

boolResult = objDialog.ShowOpen

If boolResult <> 0 Then
    Call Data.Root.ChannelGroups.RemoveAll()
    Call DataDelAll
    Call DataFileLoad(objDialog.FileName)
End If