0
텍스트 파일을 쉼표로 구분했습니다.이 파일에서 첫 번째 값은 재생할 여러 비디오의 길이 (밀리 초)입니다 (두 번째 토큰은 파일의 이름과 확장명이됩니다) , 내가하고 싶은 일은 VBScript가 열리고 그 밀리 세컨드 (비디오가 끝날 수 있도록)를 대기 한 다음 프로세스 (VLC.exe)를 닫아서 텍스트 시퀀스까지 루프에서 다시 열 수 있다는 것입니다 파일이 완료되었습니다.텍스트 파일의 WScript Sleep 변수
지금까지 이것을 보관했습니다. 비디오의 첫 번째 토큰 (기간)을 반환하지만, 나는 "WScript.Sleep"로 설정 캔트, 당신은 전화 숫자 값을 필요
Const ForReading = 1
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile _
("C:\VIDEOSTATS.txt", ForReading)
Do Until objTextFile.AtEndOfStream
strNextLine = objTextFile.Readline
arrServiceList = Split(strNextLine , ",")
Wscript.Echo "Duracion: " & arrServiceList(0)
Loop