
07-18-2003, 07:22 PM
|
|
Regular
|
|
Join Date: Jul 2003
Posts: 74
|
|
ExecWB and/or QueryStatusWB
|
Sorry I'm bugging you guys with all of my webbrowser questions, but this should be the last one of mine for the next week or two. I'm trying to get Open, Save, Print, Page Setup, and some other webbrowser features working, but I don't know how. I tried Browser.ExecWB OLECMDID_OPEN, but it came up with the "Argument not optional" error. When I use QueryStatusWB, nothing happens. If it helps any, I managed to dig up the following code from an old project [I got it from a tutorial, but I can't remember which one]:
Code:
Dim eQuery As OLECMDF
On Error Resume Next
eQuery = Browser.QueryStatusWB(OLECMDID_PAGESETUP)
If Err.Number = 0 Then
If eQuery And OLECMDF_ENABLED Then
Browser.ExecWB OLECMDID_PAGESETUP, OLECMDEXECOPT_PROMPTUSER, "", ""
Else
MsgBox "No contents of browser"
End If
End If
It works for Page Setup, but when I try other ones [like Open, Save, etc.], it doesn't. Any ideas? Thanks in advance.
Until next time, take care and God Bless!
-Tony
|
|