Private Sub InsertImageFooter()
If (WebBrowser1.Document IsNot Nothing) Then
With WebBrowser1.Document
Dim Elem As HtmlElement = .CreateElement("IMG")
Elem.SetAttribute("SRC", "http://www.adatum.com/images/footer-banner.jpg")
.Body.AppendChild(Elem)
End With
End If
End Sub