关于获得文本文件的行数的问题 10万行 行不?

zjzb0409 2008-10-25 11:57:06
在asp下 这有一个别人写好的函数
Function ShowCode(hq)
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set cnrs = fso.OpenTextFile(hq, 1)
k = 0
While Not cnrs.AtEndOfStream
rsline = rsline&cnrs.ReadLine
k = k+1
Wend
'rsline = split(rsline,"&vbCrLf")
'response.Write ubound(rsline)
ShowCode=k '//这行返回统计的行数

end Function

我把此函数 放到无惧上传中了 传行数不太多的文本文件 是很快就能算出有多少行 但是 我传了一个 接近10万行的文本文件 点上传就没反应了。。 有没有快速算出 文本文件 有多少行的方法呢 高人 给贴代码~~~~~~~~~~~~~~~~
...全文
50 5 打赏 收藏 举报
写回复
5 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
zjzb0409 2008-10-25
顶上去
  • 打赏
  • 举报
回复
sy_binbin 2008-10-25
那你就看看
http://topic.csdn.net/t/20030905/17/2228536.html
这个帖子吧
  • 打赏
  • 举报
回复
zjzb0409 2008-10-25
没有能直接返回 最后一行的函数么 不用一行一行的读 读10万条 读完 得多少分钟啊
  • 打赏
  • 举报
回复
sy_binbin 2008-10-25
10W行阿??

那要看你服务器的配置了

配置好点的,打开速度也会相对快点
  • 打赏
  • 举报
回复
Atai-Lu 2008-10-25
rsline = rsline&cnrs.ReadLine
只需要行数的话,不必把内容存到变量里的...
10w行的文本数据也是相当大的了...
  • 打赏
  • 举报
回复
相关推荐
发帖
ASP
加入

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2008-10-25 11:57
社区公告
暂无公告