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提示我出错,“用户自定义类未定义”,怎么改呢?
谢谢!
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提示我出错,“用户自定义类未定义”,怎么改呢?
谢谢!
解决方案 »
- vb做报表,如何让表格线对正,对齐呢,有窍门吗?
- 项目中怎么获取当前目录
- 如何在点击combo时出现的下拉滚动条消失???
- 求教,如何把一个rs集合(在一个表select的结果),存到另一个表中(SQL Server).
- 改变MDI窗体大小时,怎样使子窗体始终位于MDI窗体的中心??(急)
- 如何让*.ocx\*.dll文件包信含在工程文件中?
- 如何在MSHFlexGrid控件中选定一行后,将行中的内容读入text中?紧急!!!!!!
- 我想在一个程序成功时发出beep鸣声,或者用evb如何使pocket pc发出beep声
- 文件拷贝
- datagird 问题,谢谢!
- 求助,字符串查找问题?
- 放在循环里出问题,请高手指教
第一句 Dim FileSys As New fileSystemObjectVB提示我出错,“用户自定义类未定义”出错就是因为没引用FSO对象,引用后可创建FSO对象,
Dim fso1 As New FileSystemObjectDim fso2 As ObjectSet fso2 = CreateObject("scripting.filesystemobject")创建后可以利用它对文件\文件夹进行打开/关闭/删除/移动等很多操作
Dim fso1 As New FileSystemObject Dim fso2 As Object Set fso2 = CreateObject("scripting.filesystemobject")
这样后不需要对其进行引用,可选择“工程”菜单中的“引用”命令,在打开的对话框中选择“Microsoft Scripting Runtime”复选框就能用了,为什么(这个引用是什么个机理啊)?
还有那个fso1都没有用到,我要用fso1怎么用?