Originally posted by: Terry Johnson
Private Sub PrintCheckListCopy()
'Print a copy with a water mark!
Dim url As String
url = "page path here"
AxWebBrowser2.Navigate2(url.ToString)
End Sub
Private Sub AxWebBrowser2_DocumentComplete(ByVal sender As Object, ByVal e As AxSHDocVw.DWebBrowserEvents2_DocumentCompleteEvent) Handles AxWebBrowser2.DocumentComplete
AxWebBrowser2.ExecWB(SHDocVw.OLECMDID.OLECMDID_PRINT, SHDocVw.OLECMDEXECOPT.OLECMDEXECOPT_DONTPROMPTUSER, Nothing, Nothing)
End Sub
This code runs the page then the complete sub prints the page. I need the page to print with no footers and headers.
Originally posted by: xyto
Is it possible to print xml-documents that refer to a xslt-sheet (which produces html in IE)?
Reply
Originally posted by: Very nice
Thank you ... that was exactly what i needed ....
Reply
Originally posted by: The FreelancE
Good Work, this little class will save a lot of time when printing HTML pages without these annoying default headers and footers.
Reply