Question

我在过去几天一直在做一些研究，要求附加InfoPath文件（.xsn），将其转换为.cab并从中提取所有文件。我似乎无法找到允许这种情况发生的任何好的代码片段。到目前为止，我遇到的大多数线程都需要使用我想要不惜一切代价避免使用的第三方软件。我在想我需要使用批处理文件来进行提取。我无法找到任何好的帖子或帖子（这项工作）。

非常感谢有关如何通过Visual Basic或批处理文件完成此任务的任何有用的输入或帖子。

Answer 1

您必须添加对Microsoft Shell控件和自动化的引用。完成后，请参阅此代码snipet：

        Dim sc As New Shell32.Shell()
    IO.Directory.CreateDirectory("C:\test")
    Dim output As Shell32.Folder = sc.NameSpace("C:\test")
    Dim input As Shell32.Folder = sc.NameSpace("C:\Form1.cab")
    output.CopyHere(input.Items, 4)

这应该可以解决问题。

在Visual Basic中提取CAB文件。可能？

1 个答案: