VB如何操作复合文件？

找了N多的資料，全是VC的。
用的OLE32.dll中的API函數，但在VB中又引用不進來。
哪們仁兄有VB這方面的資料？

解决方案 »

  1.   

    //用的OLE32.dll中的API函數，但在VB中又引用不進來可以尝试声明这些api函数(一般ms都会相应封装一些简单的api函数)或者你也考虑借助于tlb文件解决
      

  2.   

    你是说实现Persist吧，简单的使用这个我写了一个blog：http://blog.csdn.net/technofantasy/archive/2004/04/12/2973.aspx复杂的你可以上网搜索一下IPersist Visual basic
      

  3.   

    看看这个网站：
    http://www.mvps.org/emorcillo/en/index.shtml里面有比较多这样的文章。
      

  4.   

    这是柠檬的作品
    http://www.hackeroo.com/htm_data/9/0604/1004.html
      

  5.   

    不明白什么是复合文件的可以先看看这里:
    http://tech.163.com/05/0906/15/1SVQC7U300091589.html至于在vb中怎么调用其中的函数,大致有两种情况:
    1 类似:
    StgCreateDocfile()  建立一个复合文件，得到根存储对象  
    StgOpenStorage()  打开一个复合文件，得到根存储对象  
    StgIsStorageFile()  判断一个文件是否是复合文件
    这样的win api函数没什么说的,先声明后调用即可2 涉及到的IStorage和IStream等接口的方法,如:
    CreateStorage()  在当前存储中建立新存储，得到子存储对象  
    CreateStream()  在当前存储中建立新流，得到流对象  
    OpenStorage()  打开子存储，得到子存储对象  
    等,可以通过引用tlb文件实现,用StgCreateDocfile或StgOpenStorage获得对象实例后,就可以调用其中的方法了(这个tlb文件可以自己写odl,然后编译获得,也可以用一些现成的东东,我是从:http://www.mvps.org/emorcillo/download/vb6/tl_ole.zip获取的,用这个的好处是,他封装了一些相关的api函数),如果不想用tlb文件的话,也可以,需要根据vTable用内联汇编实现(不过不建议这样用,毕竟这样做太麻烦了)
      
      

  6.   

    http://www.mndsoft.com/blog/blogview.asp?logID=622&cateID=
    有vb的例程源码
      

  7.   

    感謝rainstormmaster(暴风雨 v2.0)，
    感謝TechnoFantasy(（VB MVP），我自己已經解決，但不是用rainstormmaster(暴风雨 v2.0)所說的方法。從TechnoFantasy(（VB MVP）給的網址中找到一些資料。我是創建一個壓縮包，把幾個文件丟進去，
    然後在不解壓的情況下，直接從壓縮包中讀取指定文件的內容。
    也達到的跟複合文件差不多的效果。柠檬，我還是要找你的。（希望你能看到這句話）