Classic ASP 영상파일 이미지추출

Set Executor = Server.CreateObject("ASPExec.Execute")

fileUrl = "d:\file\abc.avi"

if fs.FileExists(fileUrl) then
 VideoimgName = fs.getfilename(fileUrl)
 VideoimgNameArr = split(VideoimgName,".")
 if isArray(VideoimgNameArr) then
  vFileName = "v" & mid(VideoimgNameArr(0),2)
  Executor.Application = "ffmpeg -y -i " & fileUrl & " -vframes 1 -ss 00:00:02 -an -vcodec png -f rawvideo -s 400*300 d:\file\videoimg\" & vFileName & ".png"
  Executor.Parameters = ""
  strResult = Executor.ExecuteDosApp
  vImg = "'/file/videoimg/"& vFileName & ".png'"
 end if
end if