ASP或JS如何循环读取TXT文本内容 20
展开全部
Function Openfile(url)
Dim fileurl,mfile,content,fso
fileurl = url
Set Fso = CreateObject("Scripting.Filesystemobject") '定义FSO
Set mfile = Fso.Opentextfile(fileurl,1) '以读的方式打开文件
If Not mfile.Atendofstream Then
content = mfile.readall() '读取全部内容
End If
mfile.Close
openfile = content
End Function
asp的vbscript函数,试试看复制后使用效果.输出<%=content%>
Dim fileurl,mfile,content,fso
fileurl = url
Set Fso = CreateObject("Scripting.Filesystemobject") '定义FSO
Set mfile = Fso.Opentextfile(fileurl,1) '以读的方式打开文件
If Not mfile.Atendofstream Then
content = mfile.readall() '读取全部内容
End If
mfile.Close
openfile = content
End Function
asp的vbscript函数,试试看复制后使用效果.输出<%=content%>
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询