'Rename this file test.vbs
'Run from the Win32 command line by using cscript.exe
'ie cscript.exe test.vbs
'Make sure template.bmp is nearby for demo.
'
dim objConv
set objConv = WScript.CreateObject("Lukas.DIBToGif.1")
'Read template.bmp and save as template.gif with no interlacing or
'transparent color.
objConv.OptimiseAndSaveAsGif "template.bmp","template.gif",false,0,-1