用来分割文本的vbs脚本-范文、应用文-IT技术专栏-脚本栏目-范文大全-在线学习网

网站首页汉语字词英语词汇考试资料写作素材旧版资料

标题	用来分割文本的vbs脚本
范文	用来分割文本的vbs脚本，用来处理数据库中的文本代码，按行计算需要的朋友可以参考下。代码如下: On Error Resume Next 'Code By NetPatch Set Arg=Wscript.Arguments If Arg.Count=0 Then Wscript.Quit Set Fso = CreateObject("Scripting.FileSystemObject") Set Conn = CreateObject("ADODB.Connection") Set Rs = CreateObject("ADODB.Recordset") path=left(Arg(0),InstrRev(Arg(0),"\")) Fname=replace(Arg(0),path,"") i=0 Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&path&";Extended Properties=""text;HDR=NO;FMT=Delimited""" 'Rs.Open "Select count() FROM " & Fname,_ 'Conn, 3, 3, &H0001 'allline=rs(0) Rs.Open "Select FROM " & Fname,_ Conn, 3, 3, &H0001 'MsgBox rs(0).name Do Until Rs.EOF 'N/P Do Until n=5000 '要分割的行数 Set MyTables = fso.CreateTextFile(arg(0)&i&".txt",true) MyTables.WriteLine Rs.Fields.Item(0).Value Rs.MoveNext n=n+1 loop MyTables.Close Set MyTables = Nothing n=0 i=i+1 Loop Rs.Close Conn.Close Set fso = Nothing Set Rs = Nothing Set Conn = Nothing Wscript.echo "整理完毕！"
随便看	高三政治学习方法策略指导高三政治学习策略及复习技巧高考政治必背的常识知识点大全高三政治知识点归纳高三政治评析类题解题指导高三政治考前指导复习高三政治第一轮复习计划10篇高三政治知识点复习测试卷高考政治知识点最新整理 2022年高考全国甲卷政治卷真题及答案_2022年文综真题 2022年高考浙江卷政治真题及答案_高考文综真题 2022新高考Ⅰ卷政治卷真题及答案_高考政治真题 2022高考全国乙卷文综真题及答案解析_文综高考乙卷真题 2022高考全国乙卷政治卷真题及答案_文综高考乙卷真题 2022年湖北高考政治试卷真题及答案_2022高考文综真题 2022高考北京卷政治真题及答案_高考文综真题 2022年高考天津卷政治真题及答案解析_高考政治真题 2022新高考Ⅱ卷政治卷真题及答案_高考政治真题高考政治主观性试题必备答题技巧高考政治大题答题模板及技巧高考政治答题技巧2022 2022年高考政治答题技巧_政治大题答题万能模板 2022高考时事政治复习方案最新高考政治大题答题模板高考冲刺政治考点梳理 extension agent extension cord extension-cord extension lead extension-lead extension of credit extension of credit extension of stay extension of unemployment extension service 痛入心脾痛入骨髓痛剿穷追痛哭流涕痛定思痛痛心伤臆痛心入骨痛心切骨痛心疾首痛心病首甘肃省2013年下半年全国计算机等级考试报考简章 2013年烟台市招远市初级职称计算机考试合格人员名单通知 2013年山西省全国计算机应用能力考试省直考点7月份考试计划的通知 2013年太原市全国专业技术人员计算机应用能力考试科目设置 2013年宁夏关于暂停计算机应用能力考试网上报名服务的通知 2013年日照市第二批计算机应用能力考试将于7月13日开始 2013年烟台市初级职称计算机应用能力考试报名工作通知 2013年六盘水市第三次职称计算机考试报名通知 2013年六盘水市第二次职称计算机考试成绩公告 2013年钦州市专业计算机技术人员应用能力考试实行网上报名公告

在线学习网范文大全提供好词好句、学习总结、工作总结、演讲稿等写作素材及范文模板，是学习及工作的有利工具。