ByteScout Image To Video SDK - VBScript - Set WMV Audio Format - ByteScout

ByteScout Image To Video SDK – VBScript – Set WMV Audio Format

  • Home
  • /
  • Articles
  • /
  • ByteScout Image To Video SDK – VBScript – Set WMV Audio Format

How to set WMV audio format in VBScript with ByteScout Image To Video SDK

This tutorial will show how to set WMV audio format in VBScript

Source code documentation samples provide quick and easy way to add a required functionality into your application. ByteScout Image To Video SDK can set WMV audio format. It can be used from VBScript. ByteScout Image To Video SDK is the library for conversion of images into video slideshow. Provides built-in support for more than hundred of 2D and 3D transition effects. Output formats supported are AVI,WMV and WEBM video files. You may adjust output video size, quality, framerate and add audio.

This code snippet below for ByteScout Image To Video SDK works best when you need to quickly set WMV audio format in your VBScript application. In order to implement the functionality, you should copy and paste this code for VBScript below into your code editor with your app, compile and run your application. Use of ByteScout Image To Video SDK in VBScript is also explained in the documentation included along with the product.

You can download free trial version of ByteScout Image To Video SDK from our website to see and try many others source code samples for VBScript.

Try ByteScout Image To Video SDK today: Get 60 Day Free Trial or sign up for Web API

SetWMVAudioFormatForSelectedAudioWMVCodec.vbs
      
' Create an instance of BytescoutImageToVideo.ImageToVideo ActiveX object Set converter = CreateObject("BytescoutImageToVideo.ImageToVideo") ' Activate the component converter.RegistrationName = "demo" converter.RegistrationKey = "demo" ' Add images and set the duration for every slide Set slide = converter.AddImageFromFileName("..\..\slide1.jpg") slide.Duration = 1000 ' 3000ms = 3s ' Set output video size converter.OutputWidth = 320 converter.OutputHeight = 240 ' converter.SetLogFile "log.txt" ' Set background music converter.ExternalAudioTrackFromFileName = "..\..\bgmusic.mp3" ' set current WMV audio codec - we set it to "Windows Media Audio 9" ' to view all available wmv audio codecs use .WMVAudioCodecsCount and GetWMVAudioCodecName(index) ' or you can see all available codecs in the log file (use .SetLogFile("log.txt") converter.CurrentWMVAudioCodecName = "Windows Media Audio 9" ' now list available audio formats for current WMV audio codec sWMVAudioFormatsInfo = "" For i = 0 to converter.WMVAudioFormatCount -1 sWMVAudioFormatsInfo = sWMVAudioFormatsInfo & vbCRLF & CStr(i) & " : " & converter.GetWMVAudioFormatDescription (i) Next MsgBox "WMV audio codec formats for Windows Media Audio 9 audio codec available are:" & sWMVAudioFormatsInfo ' now set wmv audio format to the first available converter.CurrentWMVAudioFormat = 0 ' 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

Try ByteScout Image To Video SDK today: 60 Day Free Trial (on-premise version) or sign up for Web API (on demand version)

VIDEO

ON-PREMISE VERSION

Get 60 Day Free Trial or Visit ByteScout Image To Video SDK page

Explore ByteScout Image To Video SDK documentation

WEB API

Sign Up for free Web API key

Explore Web API Documentation

Tutorials:

prev
next