方法一: 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
责任编辑：cyth
