Thanks for the replies that I recieved. While they helped inresizing the image it wasn't really what I was looking for. I wanted the image resized then saved as the new size. The two snippets suggested simply resized the view of the image. I did, however, find this bit of code which worked nicely after I tailored it a bit. Dim syspath As String syspath = Environ("systemroot") Dim bm As New Bitmap(picLogo.Image) Dim myX As Integer Dim myY As Integer myX = Val(148) myY = Val(119) Dim thumb As New Bitmap(myX, myY) Dim g As Graphics = Graphics.FromImage(thumb) g.InterpolationMode = Drawing2D.InterpolationMode.HighQualityBicubic g.DrawImage(bm, New Rectangle(0, 0, myX, myY), New Rectangle(0, 0, bm.Width, _ bm.Height), GraphicsUnit.Pixel) g.Dispose() thumb.Save(syspath & "\system32\oemlogo.bmp", _ System.Drawing.Imaging.ImageFormat.Bmp) bm.Dispose() thumb.Dispose() Me.Close() 'exit app
If someone knows of a cleaner/smaller way of doing this feel free to suggest it ._._._._._.-.-.-.-.-._._._._._.-.-.-.-.-._._._._._.-.-.-.-.- Spimoles.NET
clean and elegant. a beautiful craft