Hi all,
I use Microsoft Internet Control to show a generated html im my VB app.
Basically am receiving an xml string from the server, and with a local xsl (stylesheet) I am outputting as HTML using the msxml3 parser.
However everything works perfectly fine but the images from my html page are mising. When I right-click and check the properties of an missing image, I get "about:sample.gif"... It looks like there is a path problem. However, the xml/xsl (html) works good as stand alone files so it is not an html error. That means if I save my xml string into an xml file, and openit with the browser, I can see everything fine.
This is the code I am using in my app:
Set xml = New DOMDocument
Set xsl = New DOMDocument
xml.async = False
xml.loadXML retMsg 'retMsg is the XML string I am getting from the server
xsl.async = False
xsl.Load (App.Path & "\tt.xsl"
'load stylesheet (xsl)
Final = xml.transformNode(xsl) 'mix them together and output as html - Final is a string variable
WebBrowser1.Navigate "about:blank"
WebBrowser1.Document.Open
WebBrowser1.Document.Write Final
WebBrowser1.Document.Close
WebBrowser1.Refresh
Thanks a lot,
Gabi.
I use Microsoft Internet Control to show a generated html im my VB app.
Basically am receiving an xml string from the server, and with a local xsl (stylesheet) I am outputting as HTML using the msxml3 parser.
However everything works perfectly fine but the images from my html page are mising. When I right-click and check the properties of an missing image, I get "about:sample.gif"... It looks like there is a path problem. However, the xml/xsl (html) works good as stand alone files so it is not an html error. That means if I save my xml string into an xml file, and openit with the browser, I can see everything fine.
This is the code I am using in my app:
Set xml = New DOMDocument
Set xsl = New DOMDocument
xml.async = False
xml.loadXML retMsg 'retMsg is the XML string I am getting from the server
xsl.async = False
xsl.Load (App.Path & "\tt.xsl"
Final = xml.transformNode(xsl) 'mix them together and output as html - Final is a string variable
WebBrowser1.Navigate "about:blank"
WebBrowser1.Document.Open
WebBrowser1.Document.Write Final
WebBrowser1.Document.Close
WebBrowser1.Refresh
Thanks a lot,
Gabi.