nul)pause更直观的:FOR /F "delims=" %i IN (file.txt) DO e" />

一起学习网 一起学习网


VBS和bat批处理逐行读取文件实例

网络编程 VBS和bat批处理逐行读取文件实例 06-21

首先是批处理的,很简单,每隔两秒钟读取一行。

@echo off

for /f "tokens=*" %%i in (lrbf.ini) do (echo %%i & ping -n 2 127.1>nul)

pause

更直观的:

FOR /F "delims=" %i IN (file.txt) DO echo %i

当然如果你想做更多其他的事 do 后面是你发挥的地方

VBS的两个版本

第一种方式,逐行读取,依次显示:

Const ForReading = 1

dim   objFSO,objFile,strline   

Set objFSO = CreateObject("Scripting.FileSystemObject")

Set objFile = objFSO.OpenTextFile("lrbf.ini", ForReading)

do   until   objFile.atendofstream   

        strline=objFile.readline   

        wscript.echo   strline   '这里是显示一行内容而已,可以换成别的内容 

loop   

objFile.close   

set   fso=nothing

第二种方式,全部读取,依次显示:
Const ForReading = 1

dim   objFSO,objFile,strline   

Set objFSO = CreateObject("Scripting.FileSystemObject")

Set objFile = objFSO.OpenTextFile("lrbf.ini", ForReading)

str=objFile.readall   

objFile.close   

if   str=""   then   

        wscript.echo   "Nothing"   

        wscript.quit   

end   if   

strarry=split(str,vbcrlf)   

for   each   linestr   in   strarry   

          wscript.echo   linestr   '这里是用echo显示每一行的内容,可以换成别的内容

next   

set   fso=nothing

VBS读取文本最后一行:
Const ForReading = 1
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("lrbf.ini", ForReading)
Do Until objFile.AtEndOfStream
strNextLine = objFile.ReadLine
If Len(strNextLine) > 0 Then
strLine = strNextLine
End If
Loop
objFile.Close
Wscript.Echo strLine

使用批处理bat更改hosts的多个方法
什么是Hosts:Hosts是一个没有扩展名的系统文件,可以用记事本等工具打开,其作用就是将一些常用的网址域名与其对应的IP地址建立一个关联数据库,

cacls命令设置文件及其文件夹权限的方法
网上有许多讲解cacls权限设置的文章,虽然已经讲的比较简单,但是新手依然看的一头雾水,操作性不强。下面以实例为大家一部一部讲解几个实用的

批处理向FTP上传具有指定属性的文件(增量备份)
怎样实现对一个目录里的几个文件自动上传FTP时只上传有归档属性的文件,然后FTP上传成功后自动清除(本机)刚上传文件的归档属性,批处理可以实现到


编辑:一起学习网

标签:批处理,文件,上传,几个,内容