This snippet converts a JPG or PNG image into a pure html file. The resulting html image looks exac

Dario B. (2 Submissions) Graphics VB.NET Unknown Difficulty Mon 29^th May 2006 Mon 8^th February 2021

This snippet converts a JPG or PNG image into a pure html file. The resulting html image looks exactly as the original one. It's possible to

API Declarations
Imports System.IO Imports System.Drawing Imports System.Drawing.Drawing2D

Rate This snippet converts a JPG or PNG image into a pure html file. The resulting html image looks exac

(1(1 Vote))


  'Parameters:
  ' imageFile: jpg or png image to convert
  ' htmlFile: output html file containing the converted image
  ' [optional] zoomFactor: ex. 2 doubles then original dimentions
  ' Usage example: imageToHtml("c:\logo.png", "C:\out.htm", 0.4)

Sub imageToHtml(ByVal imageFile As String, ByVal htmlFile As String, Optional ByVal zoomFactor As Double = 1)
    Dim img As Bitmap = Image.FromFile(imageFile)
    Dim SW As StreamWriter = New StreamWriter(htmlFile, False)
    SW.WriteLine("<!DOCTYPE HTML PUBLIC '-//W3C//DTD HTML 4.01 Transitional//EN'><html><head><meta http-equiv='Content-Type' content='text/html; charset=iso-8859-1'></head><body>")
    SW.WriteLine("<table width='" & (CInt((img.Width * zoomFactor))).ToString & "' height='" & (CInt((img.Height * zoomFactor))).ToString & "' border='0' cellpadding='0' cellspacing='0'>")
    For y As Double = 0 To img.Height - 1 Step 1 / zoomFactor
      SW.WriteLine("<tr>")
      For x As Double = 0 To img.Width - 1 Step 1 / zoomFactor
        SW.WriteLine("<td bgcolor='#" & img.GetPixel(x, y).Name.Substring(2) & "'></td>")
      Next
      SW.WriteLine("</tr>")
    Next
    SW.WriteLine("</table></body></html>")
    SW.Close()
    SW = Nothing
  End Sub

Download snippet Save to my list

This snippet converts a JPG or PNG image into a pure html file. The resulting html image looks exac Comments

No comments yet — be the first to post one!

This snippet converts a JPG or PNG image into a pure html file. The resulting html image looks exac

This snippet converts a JPG or PNG image into a pure html file. The resulting html image looks exac Comments

Post a Comment