ByteScout Image To Video SDK – VBScript – Convert WAV to WMV

Home
/
Articles
/
ByteScout Image To Video SDK – VBScript – Convert WAV to WMV

printable version:
ByteScout-Image-To-Video-SDK-VBScript-Convert-WAV-to-WMV.pdf

How to convert WAV to WMV in VBScript using ByteScout Image To Video SDK

How to convert WAV to WMV in VBScript

The coding tutorials are designed to help you test the features without need to write your own code. ByteScout Image To Video SDK can convert WAV to WMV. It can be used from VBScript. ByteScout Image To Video SDK is the SDK that is designed to generate video slideshow with 100+ 2d and 3D transition effects. Can generate WMV, AVI, WEBM video file with adjustable quality, framerate, output video size.

You will save a lot of time on writing and testing code as you may just take the VBScript code from ByteScout Image To Video SDK for convert WAV to WMV below and use it in your application. Just copy and paste the code into your VBScript application’s code and follow the instruction. Detailed tutorials and documentation are available along with installed ByteScout Image To Video SDK if you’d like to dive deeper into the topic and the details of the API.

ByteScout Image To Video SDK free trial version is available on our website. VBScript and other programming languages are supported.

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

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

Convert.vbs

      ' Create an instance of BytescoutImageToVideo.ImageToVideo ActiveX object
Set converter = CreateObject("BytescoutImageToVideo.ImageToVideo")

' Activate the component
converter.RegistrationName = "demo"
converter.RegistrationKey = "demo"

' converter.SetLogFile "log.txt"

' set default in effect for slides (you can also set effects for each single slide)
converter.Slides.DefaultSlideInEffect = 1 ' teFadeIn (1) - fades in effect for slides transition
converter.Slides.DefaultSlideInEffectDuration = 500 ' 500 msec for in effect

' Add images and set the duration for every slide
Set slide = converter.AddImageFromFileName("..\..\slide1.jpg")
slide.Duration = 10000 ' 10 seconds

' Set output video size
converter.OutputWidth = 640
converter.OutputHeight = 480

' Set background wav file
converter.ExternalAudioTrackFromFileName = "sample.wav"

' Set output video file name
converter.OutputVideoFileName = "result.wmv"

' Run the conversion
converter.RunAndWait()

MsgBox "Result.wmv is ready. Script will try to open the video in default media player"

' Open result in default media player
Set shell = CreateObject("WScript.Shell")
shell.Run "result.wmv", 1, false
Set shell = Nothing

Set converter = Nothing