'
' PrintHTML - Print a URL directly
'
' Author: Joe Strazzere
'
'
' Shell "rundll32.exe c:windowssystemMSHTML.dll,PrintHTML " & _
' URL, vbNormalFocus
URL$=InputBox$("Enter the URL to be printed:","PrintHTML", "http://www.wintask.com")
Shell("rundll32.exe MSHTML.dll,PrintHTML "+Chr$(34)+URL$+Chr$(34),1)
