Controls - [SOLVED]PROBLEM Web Browser control

Print Page | Close Window

[SOLVED]PROBLEM Web Browser control

Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Controls
Forum Description: Topics Related to Codejock Controls
URL: http://forum.codejock.com/forum_posts.asp?TID=13467
Printed Date: 22 November 2024 at 2:50pm
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com

Topic: [SOLVED]PROBLEM Web Browser control

Posted By: shipwreck
Subject: [SOLVED]PROBLEM Web Browser control
Date Posted: 22 February 2009 at 2:54am

I need to display page properties with your web browser control.

This code works with the MS Version:

WebBrowser1.ExecWB OLECMDID_PROPERTIES, OLECMDEXECOPT_DODEFAULT

But with yours, nothing appears. How can I fix this? or at least go around this. Please help!

-------------
Product: Xtreme Suite Pro (Active-X), Version 15.3.1

Platform: Windows 7 Ultimate SP1 (64Bit) & Windows XP Mode SP3 (32Bit)

Language: Visual Basic 6.0 SP6

Replies:

Posted By: dentor
Date Posted: 22 February 2009 at 5:32am

Hello Shipwreck,

Const OLECMDID_PROPERTIES = 10

Const OLECMDEXECOPT_DODEFAULT = 0

WebBrowser1.ExecWB OLECMDID_PROPERTIES, OLECMDEXECOPT_DODEFAULT ' *** Properties

It works for me.

Posted By: shipwreck
Date Posted: 22 February 2009 at 6:00am

Hey there dentor.

All I can say is THANK YOU! I really didn't want to have to revert to the ol' MS control.
But another quick question my friend. Would this method work as torwards other 'execWB' events such as save as and what not?
Thanks!

-------------
Product: Xtreme Suite Pro (Active-X), Version 15.3.1

Platform: Windows 7 Ultimate SP1 (64Bit) & Windows XP Mode SP3 (32Bit)

Language: Visual Basic 6.0 SP6

Posted By: dentor
Date Posted: 22 February 2009 at 11:57am

Of course, here are some commands I used with Codejock Web Browser Control:

Const OLECMDID_PRINT = 6
Const OLECMDID_PRINTPREVIEW = 7
Const OLECMDID_PAGESETUP = 8
Const OLECMDID_PROPERTIES = 10
Const OLECMDID_ZOOM = 19
Const OLECMDID_SAVEAS = 4
Const OLECMDEXECOPT_DONTPROMPTUSER = 2
Const OLECMDEXECOPT_DODEFAULT = 0

WB.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DODEFAULT ' *** Print
WB.ExecWB OLECMDID_PRINTPREVIEW, OLECMDEXECOPT_DODEFAULT ' *** Print Preview
WB.ExecWB OLECMDID_SAVEAS, OLECMDEXECOPT_DODEFAULT ' *** SaveAs

WB.ExecWB OLECMDID_PAGESETUP, OLECMDEXECOPT_DODEFAULT ' *** Page Setup
WB.ExecWB OLECMDID_PROPERTIES, OLECMDEXECOPT_DODEFAULT ' *** Properties

You can test others as Zoom, ...