<p>学习ASP之设计 FileSystemObject</p> <p>要用 FileSystemObject (FSO) 对象模式来编程,则: <br /> <br /> 1使用 CreateObject 方法来创建 FileSystemObject 对象。 <br /> 2在新创建的对象上使用适当的方法。 <br /> 3访问对象的属性。 <br /> FSO 对象模式包含在 Scripting 类型库中,该库位于 Scrrun.dll 文件中。因而,要使用 FSO 对象模式,必须把 Scrrun.dll 放在 Web 服务器的适当系统目录中。 <br /> <br /> 创建 FileSystemObject 对象 <br /> 首先,使用 CreateObject 对象来创建 FileSystemObject 对象, 在 VBScript 中,使用下面的代码来创建 FileSystemObject 的一个实例: <br /> <br /> Dim fso <br /> Set fso = CreateObject(&quot;Scripting.FileSystemObject&quot;) <br /> <br /> 示例代码示范了如何创建 FileSystemObject 的一个实例。 <br /> 在 JScript 中,使用下面的代码来做同样的事情: <br /> <br /> <br /> var fso; <br /> fso = new ActiveXObject(&quot;Scripting.FileSystemObject&quot;); <br /> <br /> 在这两个示例中,Scripting 是类型库的名字,而 FileSystemObject 则是想要创建的对象的名字。可以只创建 FileSystemObject 对象的一个实例,而不管试图创建另一个实例的次数。 <br /> <br /> 使用适当的方法 <br /> 其次,使用 FileSystemObject 对象的适当方法。例如,要创建一个新的对象,则使用 CreateTextFile 或 CreateFolder (FSO 对象模式不支持驱动器的创建或删除)。 <br /> 要删除对象,则使用 FileSystemObject 对象的 DeleteFile 和 DeleteFolder 方法,或 File 和 Folder 对象的 Delete 方法。也可以使用适当的方法,来复制和移动文件与文件夹。 <br /> <br /> 注意 FileSystemObject 对象模式中的某些功能是多余的。例如,可以用 FileSystemObject 对象的 CopyFile 方法,也可以用 File 对象的 Copy 方法来复制文件。这两种方法功能是相同的;两种方法都能使编程灵活。 <br /> <br /> 访问现有驱动器、文件和文件夹 <br /> 要访问现有驱动器、文件或文件夹,则使用 FileSystemObject 对象中的适当的 &quot;get&quot; 方法: <br /> <br /> GetDrive <br /> GetFolder <br /> GetFile <br /> 在 VBScript 中要访问现有文件: <br /> <br /> Dim fso, f1 <br /> Set fso = CreateObject(&quot;Scripting.FileSystemObject&quot;) <br /> Set f1 = fso.GetFile(&quot;c:\test.txt&quot;) <br /> <br /> 在 JScript 中要做同样的事情,则使用下面的代码: <br /> <br /> var fso, f1; <br /> fso = new ActiveXObject(&quot;Scripting.FileSystemObject&quot;); <br /> f1 = fso.GetFile(&quot;c:\\test.txt&quot;); <br /> <br /> 不要对新创建的对象使用 &quot;get&quot; 方法,因为 &quot;create&quot; 函数已经返回那个对象的一个句柄。例如,如果使用 CreateFolder 方法创建了一个新的文件夹,则不要使用 GetFolder 方法来访问它的属性,如 Name、Path、Size等等。只需设一个变量给 CreateFolder 函数,来获得新创建文件夹的句柄名,然后访问它的属性、方法和事件。要在 VBScript 中这样做,则使用下面的代码: <br /> <br /> Sub CreateFolder <br /> Dim fso, fldr <br /> Set fso = CreateObject(&quot;Scripting.FileSystemObject&quot;) <br /> Set fldr = fso.CreateFolder(&quot;C:\MyTest&quot;) <br /> Response.Write &quot;Created folder: &quot; &amp; fldr.Name <br /> End Sub <br /> <br /> 在 JScript 中给 CreateFolder 函数设置一个变量,则使用下面的语法: <br /> <br /> function CreateFolder() <br /> { <br /> var fso, fldr; <br /> fso = new ActiveXObject(&quot;Scripting.FileSystemObject&quot;); <br /> fldr = fso.CreateFolder(&quot;C:\\MyTest&quot;); <br /> Response.Write(&quot;Created folder: &quot; + fldr.Name); <br /> } <br /> <br /> 访问对象的属性 <br /> 一旦有了对象的句柄,就可以访问它的属性。例如,要获得特定文件夹的名字,首先创建该对象的一个实例,然后用适当的方法获得它的句柄(在这个例子中是 GetFolder 方法,因为该文件夹已经存在了)。 <br /> 在 VBScript 中,用该代码来获得 GetFolder 方法的一个句柄: <br /> <br /> <br /> Set fldr = fso.GetFolder(&quot;c:\&quot;) <br /> <br /> 在 JScript 中要做同样的事情,则使用下面的代码: <br /> <br /> <br /> var fldr = fso.GetFolder(&quot;c:\\&quot;); <br /> <br /> 现在,已经有了 Folder 对象的句柄,就可以检查它的 Name 属性了。在 VBScript 中使用下面的代码来检查: <br /> <br /> Response.Write &quot;Folder name is: &quot; &amp; fldr.Name <br /> <br /> 在 JScript 中要检查 Name 属性,则使用下面的语法: <br /> <br /> Response.Write(&quot;Folder name is: &quot; + fldr.Name); <br /> <br /> 要找出最后一次修改文件的时间,则使用下面的 VBScript 语法: <br /> <br /> Dim fso, f1 <br /> Set fso = CreateObject(&quot;Scripting.FileSystemObject&quot;) <br /> ' 获得要查询的文件对象。 <br /> Set f1 = fso.GetFile(&quot;c:\detlog.txt&quot;) <br /> ' 打印信息。 <br /> Response.Write &quot;File last modified: &quot; &amp; f1.DateLastModified <br /> <br /> 在 JScript 中要找出同样的事情,则使用下面的代码: <br /> <br /> var fso, f1; <br /> fso = new ActiveXObject(&quot;Scripting.FileSystemObject&quot;); <br /> // 获得要查询的文件对象。 <br /> f1 = fso.GetFile(&quot;c:\\detlog.txt&quot;); <br /> // 打印信息。 <br /> Response.Write(&quot;File last modified: &quot; + f1.DateLastModified);</p>
返回顶部 留言