Hejsan!

Jag skulle vilja veta om det går att komma åt källkoden för ett nedladdat html-dokument automatiskt i vbkoden. Jag använder mig av komponenten Microsoft Internet Controls i VB 6.

Jag tänkte att man kunde köra ett javascript OnLoad som kollar storleken på en bild och sätter värdena i 2 hiddenfält. Om man sedan kunde komma åt dessa värden i vbkoden skulle det vara kanon. Om det går att ta reda på höjd och bredd för en bild utan att använda javascript i en browser vore det ännu bättre.

Så här hämtar du dimensionerna:
<code>
Option Explicit

Private Sub Form_Load()
WebBrowser1.Navigate "http://www.pellesoft.nu"
End Sub

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Dim ImageElement As Object
Set ImageElement = pDisp.Document.Images("logotype")
Debug.Print "Width: " & ImageElement.Width
Debug.Print "Height: " & ImageElement.Height
End Sub
</code>

En liten nyfiken fråga bara (e inte hemma, så jag kan inte testa...):

Vad är det som returneras? Är det bildens faktiska storlek, storleken som syns i browsern eller det som står i <img width=... ?

(Storleken i borwsern är naturligtvis en av dem, men vilken är det?)

/Niklas Jansson

Tackar för dom trevliga raderna!

Jag hittade en annan grej som jag använder. Plockar ut källkoden med: WebBrowser1.Document.Body.innerHtml där jag med javascriptet lagt värden i hiddenfält.

/Marcus

Hej Niklas!

Jag ville veta bildens riktiga mått så att jag senare kan utgå från dom när jag skapar ett nytt html-dok. där bilden får ny storlek. Den nya storleken kommer då att stå i <img taggen.

/Marcus

Hej Andreas!

Jag missade först vad din kod gjorde, men den var ju exakt vad jag var ute efter. Stort Tack!!

/Marcus