2014-03-12 2 views
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 

답변

2
WScript.Sleep CLng(arrServiceList(0)) 

이 퍼즐을 완성하기 위해 어떤 도움을 주셔서 감사 할 것 수면