ByteScout SWF To Video SDK – VB.NET – Video Length Setting

Home
/
Articles
/
ByteScout SWF To Video SDK – VB.NET – Video Length Setting

printable version:
ByteScout-SWF-To-Video-SDK-VB-NET-Video-Length-Setting.pdf

video length setting in VB.NET and ByteScout SWF To Video SDK

video length setting in VB.NET

Here you may find thousands pre-made source code pieces for easy implementation in your own programming VB.NET projects. ByteScout SWF To Video SDK helps with video length setting in VB.NET. ByteScout SWF To Video SDK is the SDK that is capable of converting SWF macromedia files into WMV and AVI video. Supports dynamic flash movies, can transmit variable values. Options to change output video size, framerate, quality are available.

This rich sample source code in VB.NET for ByteScout SWF To Video SDK includes the number of functions and options you should do calling the API to implement video length setting. In order to implement this functionality, you should copy and paste code below into your app using code editor. Then compile and run your application. Enjoy writing a code with ready-to-use sample VB.NET codes to implement video length setting using ByteScout SWF To Video SDK.

Trial version can be obtained from our website for free. It includes this and other source code samples for VB.NET.

On-demand (REST Web API) version:
Web API (on-demand version)

On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)

Module1.vb

      ' x64 IMPORTANT NOTE: set CPU to x86 to build in x86 mode

Imports BytescoutSWFToVideo

Module Module1

    Sub Main()

        ' Create an instance of SWFToVideo ActiveX object
        Dim converter As New SWFToVideo()

        ' Set debug log
        'converter.SetLogFile("log.txt")

        ' Register SWFToVideo
        converter.RegistrationName = "demo"
        converter.RegistrationKey = "demo"

        ' Set input SWF file
        converter.InputSWFFileName = "HelloWorld.swf"
    
        ' Set output video file
        converter.OutputVideoFileName = "result.avi"


        ' This property is for one-frame or endless SWF movies.
        ' Will stop conversion after specified time (milliseconds).
        converter.ConversionTimeOut = 5000 ' 5000ms = 5s

        ' you may calculate output video duration using information about the the source swf movie
        ' WARNING #1: this method to calculate the output video duration is not working for movies with dynamic scenes 
        ' and interactive scripts as in these movies it is not possible to calculate the precise duration of the movie 
        ' WARNING #2: you should set the input swf or flv filename (or url) before this calculation

        ' So the movie duration is calculated as the following:
        ' as swf frame count (number of frames in the swf) / movieFPS (frames per second defined in swf)
        ' and then multiplied by 1000 (as we are setting the .ConverstionTimeout in milliseconds)
        ' as the following (uncomment if you want to set the length of the output video to the same as the original swf)
        ' or as the following source code (uncomment to enable):

        ' converter.ConversionTimeout = 1000 * (converter.FrameCount / converter.MovieFPS)


        ' Set output movie dimensions
        converter.OutputWidth = 640
        converter.OutputHeight = 480

        ' Run conversion
        converter.RunAndWait()

        ' release resources
        System.Runtime.InteropServices.Marshal.ReleaseComObject(converter)
        converter = Nothing


        ' Open the result movie in default media player
        Process.Start("result.avi")

    End Sub

End Module