Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations IamaSherpa on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

CommandStateChange (ActiveX Web Control Event)

Status
Not open for further replies.

ghires

Technical User
Apr 10, 2004
1
US
Can someone please help me with the Lingo to capture the CommandStateChange event? I can find tons of examples in VB, Delphi, C+, but NONE in lingo. Your help is greatly appreciated!!!! (I know this must be a really dumb question, but I'm learning!)
 
I did a quick test:
--
on beginSprite me
sprite(me.spriteNum).Navigate("end

on CommandStateChange Command, Enable
put("CommandStateChange:" && "Command:" && Command & "," && "Enable:" && Enable)
end CommandStateChange

on NavigateComplete2 pDisp, URL
put("NavigateComplete2:" && "pDisp:" && pDisp & "," && "URL:" && URL)
end DocumetComplete

on DownloadBegin
put("DownloadBegin")
end DownloadBegin
--
This generated following messages:

-- "DownloadBegin"
-- "CommandStateChange: Command: 2, Enable: 0"
-- "CommandStateChange: Command: 1, Enable: 0"
-- "DownloadBegin"
-- "CommandStateChange: Command: 2, Enable: 0"
-- "CommandStateChange: Command: 1, Enable: 0"
-- "CommandStateChange: Command: 2, Enable: 0"
-- "CommandStateChange: Command: 1, Enable: 0"
-- "CommandStateChange: Command: -1, Enable: 0"
-- "NavigateComplete2: pDisp: Microsoft Web Browser Control, URL: -- "CommandStateChange: Command: -1, Enable: 0"

Hope you can utilise this info!
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top