Advertisement
Guest User

Untitled

a guest
Dec 31st, 2015
80
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.54 KB | None | 0 0
  1. Dim p As New Diagnostics.Process, strInput As String, strOuput As String
  2. p.StartInfo.RedirectStandardError = True
  3. strInput = fichero0
  4. strOuput = Server.MapPath("../Anuncios_publico/") & "ejemplo.mp4"
  5. p.StartInfo.FileName = Server.MapPath("../Comun/Ffmpeg/ffmpeg.exe")
  6. p.StartInfo.UseShellExecute = False
  7. p.StartInfo.Arguments = String.Format("-i ""{0}"" -b 1500k -vcodec libx264 -s 640x360 ""{1}""", strInput, strOuput)
  8. p.Start()
  9. PS: fichero0 is 'c:\inetpub\wwwroot\fich1.avi
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement