ASP.NET

System.Diagnostics.Process.Start("cscript","myvbs.vbs")

Private Function Shell_Exceute_FLV( _
        ByVal Parameters_FFMpeg As String) As String

        Dim Context As HttpContext = HttpContext.Current
        Dim SB_FFMpeg As StringBuilder = New StringBuilder

        Dim ffmpeg As New Process()
        Dim ffmpeg_StreamReader As IO.StreamReader = Nothing

        Try
            Dim Results As String = Nothing
            Dim ffmpeg_StartInfo As New ProcessStartInfo(Path_FFMPEG, Parameters_FFMpeg)
            ffmpeg_StartInfo.UseShellExecute = False
            ffmpeg_StartInfo.RedirectStandardError = True
            ffmpeg_StartInfo.RedirectStandardOutput = True
            ffmpeg.StartInfo = ffmpeg_StartInfo
            ffmpeg.Start()

            ffmpeg_StreamReader = ffmpeg.StandardError
            SB_FFMpeg = New StringBuilder()

            SB_FFMpeg.Append(ffmpeg_StreamReader.ReadToEnd().ToString())

            Do While Not ffmpeg.WaitForExit(1000)
                SB_FFMpeg.Append(ffmpeg_StreamReader.ReadToEnd().ToString())
            Loop

        Catch ex As Exception


        Finally

            If Not (ffmpeg Is Nothing) Then
                ffmpeg.Close()
                ffmpeg.Dispose()
                ffmpeg = Nothing
            End If

            If Not (ffmpeg_StreamReader Is Nothing) Then
                ffmpeg_StreamReader.Close()
                ffmpeg_StreamReader.Dispose()
                ffmpeg_StreamReader = Nothing
            End If

        End Try

        Return SB_FFMpeg.ToString

    End Function

function displayResult()
{
document.getElementById("p1").style.fontFamily="Impact,Charcoal,sans-serif";
}