ASP.NET

<br />
<br />
string myfolder = ("d:\\abc" );<br />
<br />
System.IO.Directory.CreateDirectory(myfolder);<br />
                <br />

<br />
<script type="text/javascript"><br />
function KeyCheck(myField, e)<br />
{<br />
var key;<br />
if (window.event)<br />
key = window.event.keyCode;<br />
else if(e)<br />
key = e.which;<br />
else <br />
return true;<br />
}<br />
</script><br />

<br />
public void ResizeAndSave(int MaxWidth, int MaxHeight, string UrlAndFileName, string UrlAndnewFileName)<br />
    {<br />
        // load up the image, figure out a "best fit"<br />
        // resize, and then save that new image<br />
        Bitmap OriginalBmp = (System.Drawing.Bitmap)Image.FromFile(UrlAndFileName).Clone();<br />
        Size ResizedDimensions = GetDimentions(MaxWidth, MaxHeight, ref OriginalBmp);<br />
        Bitmap NewBmp = new Bitmap(OriginalBmp, ResizedDimensions);<br />
        NewBmp.Save(UrlAndnewFileName, System.Drawing.Imaging.ImageFormat.Jpeg);<br />
    }<br />
<br />
<br />
private static Size GetDimentions(int MaxWidth, int MaxHeight, ref Bitmap Bmp)<br />
    {<br />
        int Width;<br />
        int Height;<br />
        float Multiplier;<br />
<br />
        Height = Bmp.Height;<br />
        Width = Bmp.Width;<br />
<br />
        // this means you want to shrink<br />
        // an image that is already shrunken!<br />
        if (Height <= MaxHeight && Width <= MaxWidth)<br />
            return new Size(Width, Height);<br />
<br />
        // check to see if we can shrink it width first<br />
        Multiplier = (float)((float)MaxWidth / (float)Width);<br />
        if ((Height * Multiplier) <= MaxHeight)<br />
        {<br />
            Height = (int)(Height * Multiplier);<br />
            return new Size(MaxWidth, Height);<br />
        }<br />
<br />
        // if we can't get our max width, then use the max height<br />
        Multiplier = (float)MaxHeight / (float)Height;<br />
        Width = (int)(Width * Multiplier);<br />
        return new Size(Width, MaxHeight);<br />
    }<br />

<br />
        Dim dt As DateTime = DateTime.Now<br />
        Response.Write(dt.AddMonths(3))<br />