Click here to Skip to main content
Click here to Skip to main content
Go to top

Image Batch Resizer

, 26 Sep 2004
Rate this:
Please Sign up or sign in to vote.
A simple utility to quickly resize images

Introduction

I came back from my holidays, with tons of photos taken with my new digital camera. Normally, I prefer to take pictures using the best quality and resolution, and this - of course - implies having bigger files to manage.

Often, at a good resolution, a single photo in JPG format takes more than 1 Mb, and this is not so comfortable if you want to send your pictures to your friends via email, or to put them on a web site. You have to reduce the quality of your pictures, resampling them at a lower resolution.

I had this need of resizing pictures and - even if the world is full of image processing software capable of doing that - I decided to write my little piece of code to do it in VB.NET.

How the utility works

The utility I wrote is very simple: given an "input" folder, it looks for JPG pictures in that folder and - one by one - it takes them, reduces their sizes by a specified factor, and save them in a given "output" folder.

Image Batch Resizer user interface

In the "normal mode", when you press the "GO" button, the input folder is scanned, each single picture found is shown in the preview box and you are asked about the conversion of that specific picture. Under the preview box you can find the filename and the size of the image (size on disk, dimensions X and Y, aspect ratio).

The conversion can be done also in "batch mode" (that is: without human intervention, converting all the pictures found in the input folder) if you check the "Batch processing" checkbox before pressing the "GO" button. To stop the batch processing while running, just uncheck the option to revert to "normal mode".

Something about the code

The core reducing functionality is inside the Reduce() subroutine, specifically in this line of code:

img = New Bitmap(img, New Size(img.Size.Width * factor, 
  img.Size.Height * factor))

Notice that the reducing factor is applied to both picture dimensions (to preserve the aspect ratio); so, if the original picture's size is [x,y] and the reducing factor is F, the resulting image is sized [x*F,y*F] (hence its area is reduced by F*F).

It's easy to modify this formula to obtain different resizing behaviors. For example, if the set of the original pictures is not homogeneous in the sizes, you could want to reduce them not by a fixed factor, but to a specified size (regardless the original size).

The Reduce() subroutine also contains some lines of code used to compute the file size of the resulting JPG picture. This computation is simply done looking at the size of a MemoryStream on which the image is saved in JPG format:

Dim SizeKb As String
Dim ms As New MemoryStream()
img.Save(ms, Imaging.ImageFormat.Jpeg)
SizeKb = (ms.Length \ 1024).ToString() & "Kb "

A last thing to notice in the Image Batch Resizer utility is the persistence of the configuration settings between working sessions, accomplished by the use of the ConfigOpt class (described in a previous article of mine).

License

This article has no explicit license attached to it but may contain usage terms in the article text or the download files themselves. If in doubt please contact the author via the discussion board below.

A list of licenses authors might use can be found here

Share

About the Author

Alberto Venditti
Technical Lead
Italy Italy
I was born in 1970.
 
My first computer experience dates back to early 80s, with a Sinclair ZX81.
From that time on, as many "friends" say, my IT-illness has increased year by year.
 
I graduated in Electronic Engineering and earned the following Microsoft certifications:
MCP, MCT, MCDBA, MCSD, MCAD, MCSD for .NET (early achiever).
 
I worked in IT as a developer, a teacher, a consultant, a technical writer, a technical leader.
IT knowledge applied to real life is my primary interest and focus.

Comments and Discussions

 
GeneralMy vote of 5 PinmemberMember 1022520316-Sep-13 2:31 
Questionsuperb Pinmembergeorge nepolian4-Mar-12 23:35 
GeneralMy vote of 5 Pinmembermanoj kumar choubey21-Feb-12 22:06 
GeneralReally useful! PinmemberAl-Benj7-Dec-11 5:56 
GeneralExcellent..! Pinmemberjdpatel02323-Nov-11 20:51 
GeneralMy vote of 5 Pinmemberankitj3120-Jul-11 5:08 
GeneralThank you! PinmemberAKB6-Mar-11 11:45 
QuestionRecurse sub-directories? Pinmemberrobbie19731-Aug-10 0:54 
AnswerRe: Recurse sub-directories? PinmemberAlberto Venditti3-Aug-10 5:34 
GeneralRe: Recurse sub-directories? Pinmemberrobbie19733-Aug-14 2:50 
GeneralThanks Pinmemberhardikdarji19-Feb-10 3:24 
GeneralNeed Documentation PinmemberAbdul Zamrood11-Jan-10 9:20 
GeneralRe: Need Documentation PinmemberAlberto Venditti11-Jan-10 20:48 
GeneralRe: Need Documentation PinmemberAbdul Zamrood11-Jan-10 22:17 
Generalproportions Pinmembermardav11130-Jun-09 5:59 
GeneralRe: proportions PinmemberAlberto Venditti30-Jun-09 22:26 
GeneralRe: proportions Pinmembermardav1111-Jul-09 9:04 
GeneralRe: proportions PinmemberAlberto Venditti1-Jul-09 22:04 
Generalout of memory Pinmembersisprog28-Apr-09 11:05 
GeneralRe: out of memory PinmemberAlberto Venditti28-Apr-09 23:32 
GeneralRe: out of memory Pinmembersisprog29-Apr-09 2:46 
GeneralRe: out of memory PinmemberAlberto Venditti29-Apr-09 21:07 
QuestionFfull?? [modified] Pinmemberjuunas22112-Jul-08 4:59 
AnswerRe: Ffull?? PinmemberAlberto Venditti2-Jul-08 5:35 
GeneralSimilar half-picture as luckydyno was having... Pinmemberbuffbuh12-Jun-08 19:53 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.

| Advertise | Privacy | Mobile
Web04 | 2.8.140922.1 | Last Updated 27 Sep 2004
Article Copyright 2004 by Alberto Venditti
Everything else Copyright © CodeProject, 1999-2014
Terms of Service
Layout: fixed | fluid