相思资源网 Design By www.200059.com

 Write(StrING)

    WriteLine(StrING)

    WriteBlankLines(LINES)

 

    〈html〉

    〈head〉

    〈http-equiv="Content-Type" content="text/html;

    charset=gb2312"〉

    〈title〉春风精彩之文本文件显示〈/title〉

    〈/head〉

 

   〈body〉

    <% LANGUAGE = VBScript %>

    <%

Const ForReading = 1, ForWriting = 2, ForAppending = 3

' 参数为可选,决定输入/输出模式:①ForReading=1只读;②ForWriting=2 可读写;③ForAppending=3追加.

Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0

  ' 参数为可选,指出以何种格式打开文件:①忽略此参数,以 ASCII格式打开文件;②TristateUseDefault=-2 以系统默认格式打开文件;③TristateTrue=-1 以 Unicode 格式打开文件;④TristateFalse=0 以 ASCII 格式打开文件,当然我们也可用OpenTextFile方法打开文件.

      

    Dim filename

    filename = "test.txt"

      ' 缺省路径c:\win.

 

    Set fs = CreateObject("Scripting.FileSystemObject")

    Set f = fs.GetFile(filename)

    Set readf = f.OpenAsTextStream(ForReading,TristateFalse)

 

    s = readf.ReadLine

    Do While readf.AtEndOfLine <> True

        s = readf.ReadLine

        Response.write s & ""

            ' 逐行读文件并写屏.

    Loop

    readf.close

    %>

    </body></html>

标签:
|如何|何显|显示|示一|一个|个文|文本|本文|文件|件?|?|

相思资源网 Design By www.200059.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
相思资源网 Design By www.200059.com

评论“如何显示一个文本文件?”

暂无如何显示一个文本文件?的评论...

RTX 5090要首发 性能要翻倍!三星展示GDDR7显存

三星在GTC上展示了专为下一代游戏GPU设计的GDDR7内存。

首次推出的GDDR7内存模块密度为16GB,每个模块容量为2GB。其速度预设为32 Gbps(PAM3),但也可以降至28 Gbps,以提高产量和初始阶段的整体性能和成本效益。

据三星表示,GDDR7内存的能效将提高20%,同时工作电压仅为1.1V,低于标准的1.2V。通过采用更新的封装材料和优化的电路设计,使得在高速运行时的发热量降低,GDDR7的热阻比GDDR6降低了70%。