<!--
	Sub PrintFaPage
	  On Error Resume Next
	  OLECMDID_PRINT = 6
	  OLECMDEXECOPT_DONTPROMPTUSER = 2
	  OLECMDEXECOPT_PROMPTUSER = 1
	  WebBrowser1.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_PROMPTUSER
	End Sub
-->