VB中FSO的调用的二种方法

发布日期：2019/4/16

方法一:

Dim objFso

Set objFso = CreateObject(ScriptingFileSystemObject)

方法二:

工程>引用>Microsoft Scripting Runtime

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

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

Dim Fso

Dim File

Private Sub Command_Click() 点击按钮则删除

FsoDeleteFile (File)

End Sub

Private Sub Form_Load()

Set Fso = CreateObject(scriptingfilesystemobject)

Set File = FsoGetFile(F:\web\rar)

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

End Sub