网络编程
位置:首页>> 网络编程>> Asp编程>> Asp中Scripting.TextStream 对象介绍(2)

Asp中Scripting.TextStream 对象介绍(2)

作者:CNLei 来源:CNLEI.Blog 发布时间:2007-11-02 12:19:00 

标签:TextStream,Stream,FileSystemObject,对象

  1. 创建新的文本文件


    可以用 CreateTextFile 方法创建新的文本文件,或覆盖一个已存在的文件。返回的 TextStream 对象可用来读写文件。

    首先创建一个 FileSystemObject 对象,用来创建 TextStream 对象。下面这个例子是用 VBScript 创建一个“普通的”(即非 Unicode)名为 MyFile.txt 的文件,并覆盖已存在的同名文件:


    'In VBScript:
    Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
    Set objTStream = objFSO.CreateTextFile("C:TextFilesMyFile.txt", True, False)
    //In Jscript:
    var objFSO = Server.CreateObject('Scripting.FileSystemObject');
    var objTStream = objFSO.CreateTextFile('C:TextFilesMyFile.txt', True, False);

    打开已存在的文本文件


    OpenTextFile 方法用于打开一个已有的文本文件。它返回一个 TextStream 对象,可用这个对象对文件读或追加数据。

    同样,首先创建一个 FileSystemObject 对象,然后用其创建一个 TextStream 对象。下面的 VBScript 程序例子打开一个名为 MyFile.txt 的文件,准备读出其内容:

    'In VBScript:
    Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
    Set objTStream = objFSO.OpenTextFile("C:TextFilesMyFile.txt", ForReading)
    //In Jscript:
    var objFSO = Server.CreateObject('Scripting.FileSystemObject');
    var objTStream = objFSO.OpenTextFile('C:TextFilesMyFile.txt', ForReading);


    为了写入一个文件或创建一个不存在的文件,可以用以下代码:

    'In VBScript:
    Set objTStream = objFSO.OpenTextFile("C:TextFilesMyFile.txt", ForWriting, True)
    //In Jscript:
    var objTStream = objFSO.OpenTextFile('C:TextFilesMyFile.txt', ForWriting, True);


    如果要打开一个已有的 Unicode 文件,准备对其追加数据,但是不创建不存在的文件,可以用:

    'In VBScript:
    Set objTStream = objFSO.OpenTextFile("C:TextFilesMyFile.txt", ForReading, False, TristateTrue)
    //In Jscript:
    var objTStream = objFSO.OpenTextFile('C:TextFilesMyFile.txt', ForReading, False, TristateTrue);


    作为一个 TextStream 对象打开一个 File 对象

    可用 File 对象的 OpenAsTextStream 方法打开与该对象相应的文件,并且返回一个能对该文件进行读、写和追加的 TextStream 对象。所以,给定一个 File 对象(这种情况下不是FileSystemObject对象)——objFileObject,可作为一个“普通的”(非 Unicode)TextStream 对象打开它,以供追加文件内容:

    'In VBScript:
    Set objTStream = objFileObject.OpenAsTextStream(ForAppending, False)
    //In Jscript:
    var objTStream = objFileObject.OpenTextFile(ForAppending, False);


    注意,使用这种方法不需要文件名,因为程序的执行通过引用 File 对象进行,并且没有 create 参数,因为该文件必须已存在,如果想从一个新的空的文件开始,可以用:

    'In VBScript:
    Set objTStream = objFileObject.OpenAsTextStream(ForWriting)
    //In Jscript:
    var objTStream = objFileObject.OpenTextFile(ForWriting);


    如果想读取该文件:

    'In VBScript:
    Set objTStream = objFileObject.OpenAsTextStream(ForReading)
    //In Jscript:
    var objTStream = objFileObject.OpenTextFile(ForReading);

0
投稿

猜你喜欢

手机版 网络编程 asp之家 www.aspxhome.com