Dim FileSys       As New fileSystemObject
   Set FileSys = CreateObject("scripting.filesystemobject")还有    Dim w As Object
    Set w = CreateObject("wscript.shell")
还有
    Dim Wsh
    Set Wsh = CreateObject("WScript.Shell")
    Wsh.Run App.Path & "\报表\" & Combo1.Text & "\" & Combo2.Text & "\" & Combo3.Text & ".xls"
    Set Wsh = Nothing
它们中的scripting,wscript是什么东东?哪儿可以找到详细介绍它们使用方法的教程??另外,第一句   Dim FileSys       As New fileSystemObjectVB提示我出错,“用户自定义类未定义”,怎么改呢?
谢谢!

解决方案 »

  1.   

    你这是使用文件系统对象----FSO对象,FSO对象模型包含在Scripting类型库(scrrun.dll)中,对其进行引用,可选择“工程”菜单中的“引用”命令,在打开的对话框中选择“Microsoft Scripting Runtime”复选框,
    第一句  Dim FileSys      As New fileSystemObjectVB提示我出错,“用户自定义类未定义”出错就是因为没引用FSO对象,引用后可创建FSO对象,
    Dim fso1 As New FileSystemObjectDim fso2 As ObjectSet fso2 = CreateObject("scripting.filesystemobject")创建后可以利用它对文件\文件夹进行打开/关闭/删除/移动等很多操作
      

  2.   

    Wscript 对象参考http://topic.csdn.net/u/20081002/11/96d9104e-ae47-4334-a69c-a11c18f8e58d.html
      

  3.   

    http://www.cngr.cn/article/54/65/2006/2006071944713.shtml
      

  4.   

    引用Microsoft Scripting Runtime  就可以了
      

  5.   

    pls refer the upper viewpoint.
      

  6.   

    pls refer the upper viewpoint.
      

  7.   

    TO 1楼:
    Dim fso1 As New FileSystemObject Dim fso2 As Object Set fso2 = CreateObject("scripting.filesystemobject") 
    这样后不需要对其进行引用,可选择“工程”菜单中的“引用”命令,在打开的对话框中选择“Microsoft Scripting Runtime”复选框就能用了,为什么(这个引用是什么个机理啊)?
    还有那个fso1都没有用到,我要用fso1怎么用?