Help with option Strict

[Cor]

Hi Option Strict gurus,
Because of the so much given advises here to use Option Strict I did try to
use that.
But it gives an error and I don't know how to resolve that.
The message is that Option Strict disallowes late binding. So how to do it
then?
The statement is from an example somewhere on MSDN
(And don't ask why I use the Ax version from SHDOC, that is just because it
has more methods)
\\\\\\\\\\\\\
Private Sub AxWebBrowser1_DocumentComplete(ByVal sender As System.Object,
ByVal e As AxSHDocVw.DWebBrowserEvents2_DocumentCompleteEvent) Handles
AxWebBrowser1.DocumentComplete
eDocuments.Add(e.pDisp.Document)
End Sub
/////////////
Cor

 

[Herfried K. Wagner [MVP]]

Hello,

Because of the so much given advises here to use Option
Strict I did try to use that.
But it gives an error and I don't know how to resolve that.
The message is that Option Strict disallowes late binding.
So how to do it then?
The statement is from an example somewhere on MSDN
(And don't ask why I use the Ax version from SHDOC,
that is just because it has more methods)
\\\\\\\\\\\\\
Private Sub AxWebBrowser1_DocumentComplete(ByVal sender As System.Object,
ByVal e As AxSHDocVw.DWebBrowserEvents2_DocumentCompleteEvent) Handles
AxWebBrowser1.DocumentComplete
eDocuments.Add(e.pDisp.Document)
End Sub

How is eDocuments defined? Where exactly do you get the error?

Regards,
Herfried K. Wagner

 

[Cor]

Hi,
Thanks all, it did bring me on the route for this nice sunday puzzle.
It is not the eDocuments that gives the error, sorry that I did not say
that(That is a collection, but after all the post I have seen I will change
it in an arraylist).
It is the e.pdisp.Document (that is as far as I can see from the type
mshtml.htmldocument)
If you know the answer please let me know, otherwise I give my results in
the evening OK?
Cor

 

[Cor]

Charles,
Thanks no gives the same problem.
I think I will look if I can avoid the axwebbrowser which was I thougt in
2002 and removed in 2003,
the pdisp has the object system._ComObject.
I maybe start to understand why.
Don't spend any time anymore on it, it was just my curiosity.
Cor

 

[Herfried K. Wagner [MVP]]

Hello,

Thanks no gives the same problem.
I think I will look if I can avoid the axwebbrowser which was I thougt in
2002 and removed in 2003,
the pdisp has the object system._ComObject.
I maybe start to understand why.
Don't spend any time anymore on it, it was just my curiosity.

That's one of the rare cases where I would turn 'Option Strict' off. I hope
they will introduce Option-blocks in a future release:

\\\
Option Strict On
..
..
..
Option Strict Off

 

[Cor]

Herfried,
I am glad you wrote that, thanks
(Do you think Armin will read this)

Cor

 

[Armin Zingler]

Herfried,
I am glad you wrote that, thanks
(Do you think Armin will read this)

Cor

He does - and he doesn't linke it. ;-))))))

 

[Tom Spink]

In theory, you can have a pseudo-option block, by putting the code into a
module, in a different file, putting Option Strict Off at the top of the
file, and just calling the method that the code is within. Then you don't
need to turn off Option Strict globally, or even for the code-file you are
working with.

--
HTH,
-- Tom Spink, Über Geek

Please respond to the newsgroup,
so all can benefit

"Maybe it's a game called 'Punish the User'"

 

[Herfried K. Wagner [MVP]]

Hello,

I am glad you wrote that, thanks
(Do you think Armin will read this)

I didn't see him in the ngs today. Maybe he is on holidays now.

;-)

Regards,
Herfried K. Wagner

 

[Cor]

Charles,
I try it,
It is weekend, I have to make dinner now, now said my wife.
I message you later.
Thanks even if it does not work.
Cor

 

[Cor]

Charles,
I had dinner and I told often to Herfried what that means, but
My new gallary of Honnor is "Bill Gates, Herfried, Jay B, Charles"
Tomorrow I go examine what you did
Thanks

 

[Cor]

Charles,
I think I start to understand now what happens, and am not only copying that
part.
This is to what I did bring it back.
Dim wb As SHDocVw.WebBrowser = DirectCast(e.pDisp, SHDocVw.WebBrowser)
eDocuments.Add(wb.Document)
Thanks again of course.
Cor

 

[Tom Spink]

Got a few chins there, Armin.

--
HTH,
-- Tom Spink, Über Geek

Please respond to the newsgroup,
so all can benefit

"Maybe it's a game called 'Punish the User'"

 

[Cor]

And it is almost done with the help of Charles