Python语言技术文档

微信小程序技术文档

php语言技术文档

jsp语言技术文档

asp语言技术文档

C#/.NET语言技术文档

html5/css技术文档

javascript

c/vc/c++语言

点击排行

您现在的位置:首页 > 技术文档 > asp技巧

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

来源:中文源码网    浏览: 次    日期:2018年9月2日
【下载文档:  怎样读取一个文本文件的内容_.txt 】
(友情提示:右键点上行txt文档名->目标另存为)


怎样读取一个文本文件的内容? 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

<%
'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







<%=read%>
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.

亲,试试微信扫码分享本页! *^_^*

精彩推荐

相关内容