快精灵印艺坊 您身边的文印专家
广州名片 深圳名片 会员卡 贵宾卡 印刷 设计教程
产品展示 在线订购 会员中心 产品模板 设计指南 在线编辑
 首页 名片设计   CorelDRAW   Illustrator   AuotoCAD   Painter   其他软件   Photoshop   Fireworks   Flash  

 » 彩色名片
 » PVC卡
 » 彩色磁性卡
 » 彩页/画册
 » 个性印务
 » 彩色不干胶
 » 明信片
   » 明信片
   » 彩色书签
   » 门挂
 » 其他产品与服务
   » 创业锦囊
   » 办公用品
     » 信封、信纸
     » 便签纸、斜面纸砖
     » 无碳复印纸
   » 海报
   » 大篇幅印刷
     » KT板
     » 海报
     » 横幅

怎样读取一个文本文件的内容?

Ever want to know how to display the contents of a text document using ASP. Here is a easy way to read
from a text file   

<!--Start of ASP Code---->

<%
\\'by James Seymour, http://jamesdot.org

Dim write
Dim fileSysObj, tf, read

\\' Read the read.txt

\\' Store the file name where the Information is stored into a variable called read

read = "read.txt"

\\' Retrieve the fullpath of the read file

read = LEFT(Server.Mappath(Request.ServerVariables("PATH_INFO")), InStrRev(Server.Mappath
(Request.ServerVariables("PATH_INFO")), "")) & read

\\' Create an instance of FileSystem Object and store it into a variable called fileSysObj

Set fileSysObj = createObject("Scripting.FileSystemObject")

\\' Check whether the read file exists

IF (fileSysObj.FileExists(read)) Then
\\' if the file exists, then open it for reading
Set tf = filesysobj.OpenTextFile(read, 1)
read = tf.ReadLine
tf.Close
ELSE
\\' if you can\\'t find read.text, display default message
read = "I can\\'t find the file read.txt! So this is my default message."

END IF
%>


\\' table the displays the read.txt  file
<div align="center">
<center>
<table border="0" width="40%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%" bgcolor="#EEEECC"><B><%=read%></B>
</td>
</tr>
<tr>
<td width="100%">


<!-- End of the ASP -->


use the code above, click and drag your mouse over the code to highlight it.   Then right click on the
highlighted code and click "Copy."   Now you may paste it into your code editor.


返回类别: 教程
上一教程: 利用ASP.NET设计FTP文件上传(中)
下一教程: ASP技巧集锦(官方权威版)-3

您可以阅读与"怎样读取一个文本文件的内容?"相关的教程:
· 怎样读取一个文本文件的内容
· 读取一个文本文件的内容
· 从文本文件中读取信息并存储入数据库
· 用ADODB.STREAM代替FSO读取文本文件
· ASP中文本文件与数据库文件的数据交换
    微笑服务 优质保证 索取样品