Develop Your Own Browser - Part 2
Dim eQuery As OLECMDF return value type for QueryStatusWBOn Error Resume NexteQuery = brwwebbrowser.QueryStatusWB(OLECMDID_COPY)If Err.Number = 0 ThenIf eQuery And OLECMDF_ENABLED Thenbrwwebbrowser.ExecWB OLECMDID_COPY, _ OLECMDEXECOPT_PROMPTUSER, _ , Ok to Print?End IfEnd If
Page 2 of 6
This article was originally published on November 20, 2002