博科:技院 文件糸统对象操作 Hmc ■引用 Microsoft Scripting Runtime ■创建FSO对象。两种方法: 令Dm<变量名> as New Filesystemobject . Dim fs as new File systemobject OHO 令Se<变量名>= Createobject(“ Scripting. FileSystemobject) 4 Set fs =Createobject( Scripting Filesystemobject) F ■使用FSO访问驱动器、文件夹和文件。例如设 8 Dim fs as New Filesystemobject 8 Dim fi as file ☆ set fil= fs. getfile(“C: config.Sys") ■ Visual BASIC 程 序 设 计 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. 文件系统对象操作 ◼ 引用 Microsoft Scripting Runtime ◼ 创建FSO对象。两种方法： ❖ Dim <变量名> as New FileSystemObject ❖ Dim fs as New FileSystemObject ❖ Set <变量名> =CreateObject(“ Scripting.FileSystemObject”) ❖ Set fs =CreateObject(“ Scripting.FileSystemObject”) ◼ 使用FSO访问驱动器、文件夹和文件。例如 ❖ Dim fs as New FileSystemObject ❖ Dim fil as File ❖ set fil=fs.getfile(“c:\config.sys”)