道招

asp读取txt文本文档内容至数组,并控制输出指定行(列)

如果您发现本文排版有问题,可以先点击下面的链接切换至老版进行查看!!!

asp读取txt文本文档内容至数组,并控制输出指定行(列)

针对很多朋友想知道如何用asp获取.txt文件的内容,并存入数组,输出指定行或列
<%
Sub ReadFiles() 
Dim objFSO 
Dim objText 
Dim ObjFile
Dim strTextContent
Dim objDrive
'创建一个文件操作对象实例
Set objFSO = CreateObject("Scripting.FileSystemObject")
'要打开的文件
ObjFile = "1.txt"
ObjFile=server.mappath(ObjFile)
Response.write ObjFile&"<br>" '输出文件完整路径及文件名
'Response.end
IF objFSO.FileExists(ObjFile) then 
    '打开TXT文件,并赋值给变量
    Set objText = objFSO.OpenTextFile(ObjFile,1)
    'strTextContent = objText.ReadAll()
    '循环读取数据
i=0
redim a(0)'定义数组 
'While not objText.AtEndOfStream '到文件的末尾
While not objText.AtEndOfLine '到一行的末尾
     strTextContent = objText.ReadLine()
     a(i)=strTextContent'将每行的值存入数组元素
      b=split(a(i),"=")'将每行的值存入新数组元素,以=为分隔符
      maxBound=Ubound(b)'获取每一行分割为多少个部分
      for j=0 to maxBound
      if j<maxBound then '输出该行的每个分割部分,用逗号隔开,最后一个部分时换行
      Response.write(b(j)) &" "
      else
      Response.write(b(j)) &"<br>"
      end if
      next
     'response.write a(i)&"_"&"<br>"
wend
i=i+1
    Call objText.Close
else
      response.write "文件不存在"
      response.end
end if
End Sub 
'调用过程,读取文件
readfiles()
%>
其中1.txt的内容如下:
姓名    编号
张三    135
李四    136
更新时间:
上一篇:最简单的android手机联系人vcard(vcf后缀格式)规范格式下一篇:修改高亮显示代码插件wp-syntax-button插件

相关文章

将object型转换为数组array型

object貌似是最大的类型了,在使用数据的时候有的数据的键和值得形式基本上就是数组了,但是它却不是array类型,可以这样的函数转换一下就行了。 function object_to_arr 阅读更多…

java数组应用

用java实现数到3退出(一群小朋友围成一个圈,数到3的朋友自动退出该圈) Count3Quit.java的源代码如下 [code lang="java"] package com.daoz 阅读更多…

javascript数组降维

网上有不少提供数组降维的方法,但是一般是二维数组,并且对多维数组的处理不好。降维自然会想到用concat方法,如果只是全部循环用push的话,那样写起来更麻烦,必要时该用concat的就用concat 阅读更多…

java实现数组相减

先定义两个数组,前面的一个小,后面的一个比前面的大,名为相减其实就是求大数组中小数组不包含的那一部分的集合 我们可以看Test.java源代码 [code lang="java"] packag 阅读更多…

php将二维数组转换成字符串

假设现在我们有数组如下: Array ( [1] =&gt; 错 [3] =&gt; 错 ) 想将其转化为字符串,即转化成 1错3错 我们可以这样实现 &lt;?php $a = arra 阅读更多…

将excel里面的数据导入mysql

1.将excel里面选中的数据快儿拷贝到一个TXT文本文件中(记得把后面的空格消掉。。否则导入数据库后会有对应的空行),假如存到“D:da ta.txt”这个位置里。 2.根据要导入的数据快儿 阅读更多…

关注道招网公众帐号