怎么用vbs分割与合并文本文件-创新互联

这篇文章主要为大家展示了“怎么用vbs分割与合并文本文件”,内容简而易懂,条理清晰,希望能够帮助大家解决疑惑,下面让小编带领大家一起研究并学习一下“怎么用vbs分割与合并文本文件”这篇文章吧。

站在用户的角度思考问题,与客户深入沟通,找到策勒网站设计与策勒网站推广的解决方案,凭借多年的经验,让设计与互联网技术结合,创造个性化、用户体验好的作品,建站类型包括:网站设计、成都做网站、企业官网、英文网站、手机端网站、网站推广、域名申请虚拟主机、企业邮箱。业务覆盖策勒地区。

怎么用vbs分割与合并文本文件
然而想到其他地方再次下载时发现一次性导入几万个地址非常缓慢,所以有必要把它分割了:(在这个txt文件中,一个地址占一行)
url_split.vbs文件内容:


代码如下:


Set fs =CreateObject("scripting.filesystemobject")
Set gs =CreateObject("scripting.filesystemobject")
Set f=fs.opentextfile("url.txt",1,true) 'url.txt是要分割的txt文件,里面保存了几万个地址
n=0
do while f.atendofstream<>true
n=n+1
data=""
Set g=gs.opentextfile(CStr(n)+".lst",2, true) '分割后的文件保存为:1.lst 2.lst 3.lst……
if f.atendofstream<>true then
for a=1 to 1000 '分割后,一个文件保存1000地址
data=f.readline
g.writeline data
next
end if

loop
f.close
g.close

呵呵,这个vbs是以行为单位来分割文件,怎么以字节为单位来分割文件呢?,欢迎大家和我讨论!
怎么用vbs分割与合并文本文件


以上是“怎么用vbs分割与合并文本文件”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注创新互联行业资讯频道!


本文题目:怎么用vbs分割与合并文本文件-创新互联
本文网址:http://bzwzjz.com/article/dpgjed.html

其他资讯

Copyright © 2007-2020 广东宝晨空调科技有限公司 All Rights Reserved 粤ICP备2022107769号
友情链接: 网站制作报价 网站建设公司 高端品牌网站建设 成都定制网站建设 高端网站设计 自适应网站设计 企业网站制作 成都网站制作公司 网站设计制作报价 app网站建设 成都网站建设 成都网站建设 重庆网站制作 成都做网站建设公司 营销型网站建设 营销型网站建设 四川成都网站制作 成都网站制作 网站建设公司 成都网站建设 网站建设 网站设计制作