浅谈FSO的调用方法

    文章来源:万象互联 更新时间:2012-11-6 16:53:46
分享:

本文使用VB来实现的,主要介绍两种方法:

方法一:
  Dim   objFso   
  Set   objFso   =   CreateObject("Scripting.FileSystemObject")   
    
    方法二: 
工程->引用->Microsoft   Scripting   Runtime

    第二种相对简单些,但是有的时候,会提示 不能加载SCRRUN.dll,此时就只能用第一种了,我用第一种的时候,还提示  什么什么没注册  在 运行 那输入 regsvr32 scrrun.dll 注册一下即可正常使用了

下面是一个删除文件的简单例子:

Dim Fso
Dim File1
Private Sub Command1_Click()       ’点击按钮则删除
Fso.DeleteFile (File1)
End Sub
Private Sub Form_Load()
Set Fso = CreateObject("scripting.filesystemobject")  
Set File1 = Fso.GetFile("F:\web\123.rar") 

'请保证文件存在 不然会报错 
End Sub

文章来源:http://www.hulian.top,转载请注明!

版权说明:本站原创文章,由万象互联SEO优化发表.
本文地址:https://www.hulian.top/zixun/post/5376.html
在线咨询
  • 在线时间
  • 8:00-21:00