[RESOLVED ]Setting webbrowser contents

**Kzin** · Nov 29th, 2001, 07:03 AM

Is there a command that is to opposite of

Code:

Text1 = brwBrowser.Document.documentElement.InnerHTML

which I can use to put an ascii string into a webbrowser without having to load it from the disc (i.e. without having to navigate)?

**mlewis** · Nov 29th, 2001, 08:42 AM

brwBrowser.Document.documentElement.InnerHTML = Text1 ???

**Kzin** · Nov 29th, 2001, 08:45 AM

Nope not that one

**mlewis** · Nov 29th, 2001, 09:00 AM

All I can suggest then is to write it to a temp file and then use Navigate

**Kzin** · Nov 29th, 2001, 09:02 AM

Originally posted by mlewis
All I can suggest then is to write it to a temp file and then use Navigate

That's what I've done before but I don't want to write to disk with this particular app

**mlewis** · Nov 29th, 2001, 09:05 AM

Guess you're stuck then...

**Bloodeye** · Nov 29th, 2001, 09:24 AM

How about something like this. (Don't forget to remove the space between "about" and ":")

VB Code:

Private Sub myPage()
    Dim strHTML as String
    
    strHTML = "about:<html>"
    strHTML = strHTML & "<head><title>My Page</title></head>"
    strHTML = strHTML & "<body bgcolor=#000000 text=#FFFFFF>"
    strHTML = strHTML & "<center>Hi There!</center>"</body>"
    strHTML = strHTML & "</html>"
 
    WebBrowser1.Navigate strHTML
End Sub

**Kzin** · Nov 29th, 2001, 09:29 AM

Originally posted by Bloodeye
How about something like this. (Don't forget to remove the space between "about" and ":")

VB Code:

Private Sub myPage()
Dim strHTML as String

strHTML = "about:<html>"
strHTML = strHTML & "<head><title>My Page</title></head>"
strHTML = strHTML & "<body bgcolor=#000000 text=#FFFFFF>"
strHTML = strHTML & "<center>Hi There!</center>"</body>"
strHTML = strHTML & "</html>"

WebBrowser1.Navigate strHTML
End Sub

Its looking very promising even if it did not work for me when I tried it. Have you tested it bloodeye?

**mlewis** · Nov 29th, 2001, 09:35 AM

Try webbrowser.navigate "about:test" and see what pops up.

**Static** · Nov 29th, 2001, 09:40 AM

there is also a way to write to the webbrowser...
but I cant remember!!!

something like

Webbrowser1.Document.Write (thats not it...but...)

well I forgot about that one Bloodeye..

That way works much better than the Write method.

Kzin..hes got an extra " in there....and be sure to remove the space between about and :

**Kzin** · Nov 29th, 2001, 09:41 AM

Yes that works - now I'll try some html

**Kzin** · Nov 29th, 2001, 09:46 AM

so

Code:

<html><body>???</body></html>

is a valid displayable .htm file but will not show if you use about:

We must be nearly there - are their any other commands like about?

**Kzin** · Nov 29th, 2001, 09:47 AM

Originally posted by geoff_xrx
Kzin..hes got an extra " in there....and be sure to remove the space between about and :

Thanks I got that one but it wasn't the problem

**Kzin** · Nov 29th, 2001, 09:49 AM

Originally posted by geoff_xrx
there is also a way to write to the webbrowser...
but I cant remember!!!

something like

Webbrowser1.Document.Write (thats not it...but...)

Keep thinking -

I've been looking on http://msdn.microsoft.com/library/de...er/wbentry.asp but can't see the answer but we must be nearly there!

**Bloodeye** · Nov 29th, 2001, 10:02 AM

Here's another way. Give this a try. Remove the space after "about"
You will need to make a reference to the (Microsoft HTML Object library).

VB Code:

Dim htmlDoc As HTMLDocument
 
Private Sub Command1_Click()
    htmlDoc.body.innerHTML = Text1.Text
    WebBrowser1.Document.body.bgColor = "#000000"
    WebBrowser1.Document.body.Text = "#FFFFFF"
End Sub
 
Private Sub Form_Load()
    Dim strHTML As String
    
    strHTML = "<html><head><title>My Page</title></head><center>Hi There!</center></body></html>"
 
    Text1.Text = strHTML
    WebBrowser1.Navigate "about:blank"
End Sub
 
Private Sub WebBrowser1_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean)
    Set htmlDoc = Nothing
End Sub
 
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    Set htmlDoc = WebBrowser1.Document
End Sub

**mlewis** · Nov 29th, 2001, 10:05 AM

That won't work, you have to set the Webbrowser's document property to the htmlDoc somewheres!

**Bloodeye** · Nov 29th, 2001, 10:11 AM

Originally posted by mlewis
That won't work, you have to set the Webbrowser's document property to the htmlDoc somewheres!

Hmmmm.....Maybe you should try the code before you post.

BTW: I have set htmlDoc = WebBrowser1.Document in the DocumentComplete event.

**Kzin** · Nov 29th, 2001, 10:28 AM

Yes - it works - impressive!!
Thanks

**mlewis** · Nov 29th, 2001, 11:06 AM

Originally posted by Bloodeye

Hmmmm.....Maybe you should try the code before you post.
BTW: I have set htmlDoc = WebBrowser1.Document in the DocumentComplete event.

How does the WebBrowser know to reference the htmlDoc object?

Set A = B does NOT set B to A!!!

**Bloodeye** · Nov 29th, 2001, 11:27 AM

I really have no idea what it is that your asking....?
The htmlDoc Object, I believe is the same as the "Document Object" within the WebBrowser Control.
Maybe someone else can help explain this better.

**mlewis** · Nov 29th, 2001, 12:17 PM

NRGH.

The htmlDoc object in your code is a VARIABLE!!!!!! FOR THE WEBBROWSER TO HAVE THE SAME HTML CODE AS THE VARIABLE YOU MUST WRITE

Set WebBrowser.document = htmlDoc

!!!!!!!

**mlewis** · Nov 29th, 2001, 12:24 PM

n/m I figgered it

**Kzin** · Nov 29th, 2001, 12:32 PM

Another presumably simplier one

Text1 = brwBrowser.Document.documentElement.InnerHTML

gets the html - is there an easy way to get the text that is displayed in the webbrowser as a string without the tags/formatting

**Bloodeye** · Nov 29th, 2001, 12:48 PM

For the Text without the formatting try either:

Text1 = brwBrowser.Document.documentElement.InnerText
OR
Text1 = brwBrowser.Document.documentElement.OuterText

**Kzin** · Nov 29th, 2001, 12:57 PM

Thanks - that worked well

Thread: [RESOLVED ]Setting webbrowser contents

Thread Tools

Display

[RESOLVED ]Setting webbrowser contents

try this

Posting Permissions