<
html
><
head
><
title
>
基於文字的訊息發布系統
title
>
head
>
<
body
>
<
table
border
="1"
cellspacing
="0"
cellpadding
="1"
bordercolorlight
="#dfdfdf"
bordercolordark
="#ffffff"
align
="center"
>
<
tr bgcolor
="#cccce6"
>
<
td algin
="center"
colspan
="2"
>
最新訊息
td>
tr>
<%
setfso
=server.createobject(
"ing.filesystemobject")
setfp="
message.txt"))
'開啟message.txt
dowhile
fp.atendofstream
<>
trues=
fp.readline
'讀取一條資料p=
instr
(s,"*"
) '取得*號的位置
messagetitle
=mid
(s,1,p-
1) '取得*號前邊的字串(訊息標題)s=
mid(s,p+1
,len
(s)-
p) '
設變數s為*號後邊的字串p=
instr
(s,"*"
)messageurl
=mid
(s,1,p-
1) '取得*號後邊的字串(鏈結位址)s=
mid(s,p+1
,len
(s)-
p)ttime=s
'設定訊息發布時間ttime為s
%>
<
tr>
<
td><
a href
='<%=messageurl%
>
'>
<%
=messagetitle
%>
a>
td>
<
td>
<%
=ttime
%>
td>
tr>
<%
loop
fp.close
setfp
=nothing
setfso
=nothing
%>
table
>
body
>
html
>
簡單的方法
<%
dimfso,f
setfso
=server.createobject(
"scripting.filesystemobject")
setf ="
1.txt"),
1)
dowhile
notf.atendofstream
response.write f.readline
loop
f.close
setf
=nothing
setfso
=nothing
%>
ASP讀取顯示TXT檔案內容
html head title 基於文字的訊息發布系統 title head body table border 1 cellspacing 0 cellpadding 1 bordercolorlight dfdfdf bordercolordark ffffff align center tr ...
讀取本地txt檔案內容
include include fopen函式是在當前目錄下開啟乙個檔案,其呼叫的一般形式為 1.檔案指標名 fopen 檔名,使用檔案方式 2.檔案指標名 必須是被宣告為file 型別的指標變 1 量 3.檔名 是被開啟檔案的檔名 4.使用檔案方式 是指檔案的型別和操作要求 5.檔名 是字串常量或...
vs讀取 txt檔案內容
vs讀取.txt檔案內容,首先確定.txt檔案的位置,string filename txt 開啟檔案 ifstream camfile filename,ios in 判斷是否為非空 if camfile 取.txt中的第一行內容 string s string newfilename while...