做网页--怎么在单元格中显示某个文本内容

来源:百度知道 编辑:UC知道 时间:2024/05/16 04:28:40
比如说,我有几个文本文件,想让网页直接读取文本内容.....

还有寻找一个做网页的高手 带带我,男女不限,年龄不限....我是一只菜鸟.....
你们的答案都不错,可是那么多的代码我不懂,唉,谁叫自己是菜鸟呢,有没有愿意带我的啊,给我空间发信息啊...
http://155052121.q-zone.qq.com

网页直接读取文本内容
**************************************************
'函数名:FSOFileRead
'作 用:使用FSO读取文件内容的函数
'参 数:filename ----文件名称
'返回值:文件内容
'**************************************************
function FSOFileRead(filename)
Dim objFSO,objCountFile,FiletempData
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objCountFile = objFSO.OpenTextFile(Server.MapPath(filename),1,True)
FSOFileRead = objCountFile.ReadAll
objCountFile.Close
Set objCountFile=Nothing
Set objFSO = Nothing
End Function

'**************************************************
'函数名:FSOlinedit
'作 用:使用FSO读取文件某一行的函数
'参 数:filename ----文件名称
' lineNum ----行数
'返回值:文件该行内容
'**************************************************
function FSOlinedit(filename,lineNum)
if linenum < 1 then exit function
dim fso,f,tempar