电子文档交易市场
安卓APP | ios版本
电子文档交易市场
安卓APP | ios版本

实训外部数据读写操作

10页
  • 卖家[上传人]:s9****2
  • 文档编号:457467951
  • 上传时间:2023-12-18
  • 文档格式:DOCX
  • 文档大小:60KB
  • / 10 举报 版权申诉 马上下载
  • 文本预览
  • 下载提示
  • 常见问题
    • 1、软件测试技术实训外部数据读写操作一、实训目标掌握外部文本文件读写操作方法能够使用外部文件中的数据作为数据驱动测试的数据源二、任务描述使用外部文本文件中的数据作为用户登录Flight飞机订票系统的用户名和密码三、覆盖的知识点VBS对文本文件的追加、修改、删除、读取操作四、实训参考步骤I*函数功能:检查文件是否存在输入参数:pathway-文件全路径返回值:如果文件存在,返回True,否则返回False示例调用:MsgBoxCheckFileExists(D:test.txt),*FunctionCheckFileExists(FilePath)dimoFSOSetoFSO=CreateObject(Scripting.FileSystemObject)CheckFileExists=oFSO.FileExists(FilePath)SetoFSO=NothingEndFunctionI*函数功能:如果文件夹不存在则创建文件夹输入参数:fldr-文件夹全路径返回值:无示例调用:CallCreatFolderIfNotExist(D:test),*FunctionCreatFolderlfN

      2、otExist(fldr)Dimfso,msgSetfso=CreateObject(Scripting.FileSystemObject)IfNot(fso.FolderExists(fldr)ThenSetf=fso.CreateFolder(fldr)EndIfEndFunction*函数功能:读取指定行内容输入参数:pathway-文件全路径rowcount-行数返回值:该行内容示例调用:MsgBoxReadLine(c:c.txt,2)*FunctionReadLine(pathway,rowcount)Dimfso,myfile,i,flagflag=1Setfso=CreateObject(scripting.FileSystemObject)Iffso.FileExists(pathway)ThenSetmyfile=fso.openTextFile(pathway,1,False)Elseflag=0EndIfFori=1torowcount-1IfNotmyfile.AtEndOfLineThenmyfile.SkipLineEndIfNextIfflag=1The

      3、nWkp 4FW4MUI Tkul4U软件测试技术IfNotmyfile.AtEndOfLineThenReadLine=myfile.ReadLineElseReadLine=越界EndIfmyfile.closeElseReadLine=文件不存在EndIfEndFunction,*函数功能:计算文本文件总行数输入参数:FileName-文件全路径返回值:该文本文件总行数示例调用:MsgBoxNumberOfLines(c:c.txt)*FunctionNumberOfLines(FileName)DimlineCountlineCount=0SetobjFSO=CreateObject(Scripting.FileSystemObject)SetobjTextFile=objFSO.OpenTextFile(FileName,1)DoUntilobjTextFile.AtEndOfStreamRedimPreservearrFileLines(lineCount)arrFileLines(lineCount)=objTextFile.ReadLinelineCount=lineC

      4、ount+1LoopNumberOfLines=UBound(arrFileLines)objTextFile.CloseEnd Function软件测试技术I*函数功能:向文本文件追加行输入参数:pathway-文件全路径words-新行内容返回值:无示例调用:callWriteFile_Append(D:test.txt,HelloWorld),*PublicFunctionWriteFile_Append(pathway,words)DimfileSystemObj,fileSpec,logFile,waySetfileSystemObj=CreateObject(Scripting.FileSystemObject)fileSpec=pathwaySetlogFile=fileSystemObj.OpenTextFile(fileSpec,8,true)logFile.WriteLine(CStr(words)logFile.CloseSetlogFile=NothingEndFunction*函数功能:改写文本文件所有内容输入参数:pathway-文件全路径words-文本内

      5、容返回值:无示例调用:callWriteFile_Change(D:test.txt,HelloWorld)*PublicFunctionWriteFile_Change(pathway,words)DimfileSystemObj,fileSpec,logFile,waySetfileSystemObj=CreateObject(Scripting.FileSystemObject)fileSpec=pathway软件测试技术SetlogFile=fileSystemObj.OpenTextFile(fileSpec,2,True)logFile.WriteLine(CStr(words)logFile.CloseSetlogFile=NothingEndFunction,*函数功能:全部替换文本文件中指定字符串输入参数:filepath-文件全路径from-被改写字符串too-目标字符串返回值:无示例调用:callfileReplace(c:source.txt,2008114,test)*FunctionfileReplace(filepath,from,too)Dimfso,m

      6、yfileSetfso=CreateObject(scripting.FileSystemObject)Setmyfile=fso.openTextFile(filePath,1,false)cc=myfile.ReadAllmyfile.Closetemper=Replace(cc,from,too)DimfileSystemObj,fileSpec,logFile,waySetfileSystemObj=CreateObject(Scripting.FileSystemObject)fileSpec=pathwaySetlogFile=fileSystemObj.OpenTextFile(filePath,2,true)logFile.WriteLine(CStr(temper)logFile.CloseSetlogFile=NothingEndFunction函数功能:在指定行之间插入一行输入参数:fileFullPath-文件全路径lineFrom/lineTo指定行content-插入文本内容返回值:无示例调用:callinsertLineBetween(c:bsmain_r

      7、untime.txt”,3,4,TestLine),*FunctioninsertLineBetween(fileFullPath,lineFrom,lineTo,content)DimtempBefore(),tempAfter(),lineCount,ilineCount=NumberOfLines(fileFullPath)ReDimtempBefore(CInt(lineFrom)-1)ReDimtempAfter(CInt(lineCount)-CInt(lineTo)+1)Fori=1ToCInt(lineFrom)tempBefore(i-1)=ReadLine(fileFullPath,i)NextFori=1ToCInt(lineCount)-CInt(lineTo)+1tempAfter(i-1)=ReadLine(fileFullPath,(i+CInt(lineTo)-1)NextCallWriteFile_Change(fileFullPath,tempBefore(0)Fori=2ToCInt(lineFrom)CallWriteFile_Append(fileFullPath,tempBefore(i-1)NextCallWriteFile_Append(fileFullPath,content)Fori=0ToCInt(lineCount)-CInt(lineTo)+1IftempAfter(i)越界thenCallWriteFile_Append(fileFullPath,tempAfter(i)EndifNextEndFunctionI*软件测试技术函数功能:替换文本文件指定行输入参数:fileFullPath-文件全路径line-行数content-替换为返回值:无示例调用:callReplaceLineWith(c:bsmain_runtime.txt,5,TestLine),*FunctionReplac

      《实训外部数据读写操作》由会员s9****2分享,可在线阅读,更多相关《实训外部数据读写操作》请在金锄头文库上搜索。

      点击阅读更多内容
    最新标签
    监控施工 信息化课堂中的合作学习结业作业七年级语文 发车时刻表 长途客运 入党志愿书填写模板精品 庆祝建党101周年多体裁诗歌朗诵素材汇编10篇唯一微庆祝 智能家居系统本科论文 心得感悟 雁楠中学 20230513224122 2022 公安主题党日 部编版四年级第三单元综合性学习课件 机关事务中心2022年全面依法治区工作总结及来年工作安排 入党积极分子自我推荐 世界水日ppt 关于构建更高水平的全民健身公共服务体系的意见 空气单元分析 哈里德课件 2022年乡村振兴驻村工作计划 空气教材分析 五年级下册科学教材分析 退役军人事务局季度工作总结 集装箱房合同 2021年财务报表 2022年继续教育公需课 2022年公需课 2022年日历每月一张 名词性从句在写作中的应用 局域网技术与局域网组建 施工网格 薪资体系 运维实施方案 硫酸安全技术 柔韧训练 既有居住建筑节能改造技术规程 建筑工地疫情防控 大型工程技术风险 磷酸二氢钾 2022年小学三年级语文下册教学总结例文 少儿美术-小花 2022年环保倡议书模板六篇 2022年监理辞职报告精选 2022年畅想未来记叙文精品 企业信息化建设与管理课程实验指导书范本 草房子读后感-第1篇 小数乘整数教学PPT课件人教版五年级数学上册 2022年教师个人工作计划范本-工作计划 国学小名士经典诵读电视大赛观后感诵读经典传承美德 医疗质量管理制度 2
    关于金锄头网 - 版权申诉 - 免责声明 - 诚邀英才 - 联系我们
    手机版 | 川公网安备 51140202000112号 | 经营许可证(蜀ICP备13022795号)
    ©2008-2016 by Sichuan Goldhoe Inc. All Rights Reserved.