ImageMagickとVBSで画像縮小

Set objImg = CreateObject("ImageMagickObject.MagickImage.1")

msgs = objImg.Convert("-geometry", "130x130", file_in, file_out)

Set objImg = Nothing

'オプション "-thumbnail" Exif情報削除