This sample source code shows how to convert SWF flash movie file into a AVI video using Bytescout SWF To Video SDK in VBScript (.VBS). You can save this sample source code as Test.VBS file and run in Explorer by double-clicking on it.

You can use the SDK in both x86 and x64 versions of Windows.

' Create an instance of SWFToVideo ActiveX object
Set converter = CreateObject("BytescoutSWFToVideo.SWFToVideo")

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

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

' Add SWF file and set its output filename
converter.SetMovie "SlideShowWithEffects.swf", "result.avi"

' Set output movie dimensions
converter.OutputWidth = 640

converter.OutputHeight = 480

' Run conversion
converter.RunAndWait

' Open result in default media player
Set shell = CreateObject("WScript.Shell")

shell.Run "result.avi", 1, false
Set shell = Nothing

Set converter = Nothing