HTML Dosyasına Resim Ekleme Ve Görüntüleme

[programer]

Merhaba Arkadaşlar,

Birtane HTML dosyam var. Bunu Userform üzerine eklediğim WebBrowser ile görüntülüyorum ve resim ekleyebiliyorum. Fakat eklediğim resim görünmüyor. HTML Dosyasını kaydedip normal Browser ile açtığım zaman resim görünüyor. Bunun sebebi nedir bulamadım. Yardımcı olurmusunuz.

Not: Dosyayı C:\ Sürücüsü içine koyduğunuzda çalışır çünkü path dosyaları C:\ Sürücüsüne göre tanımlı.

 

[programer]

Arkadaşlar tekrar merhaba,

Yardımcı olabilecek birisi varmıdır.

 

[programer]

Arkadaşlar merhaba,

şimdilik çözümü şöyle buldum html dosyasını kaydediyorum ve default browserde tekrar açıyorum eklediğim resim görünüyor. Ama istediğim bu değil userformun üzerine eklediğim WebBrowser de göstermek.

Dim s1
Dim Adress As String
Dim objShell As Object

s1 = WebBrowser1.Document.documentElement.outerHTML

 Open Application.Path & "\index1.htm" For Output As #2
 
 Print #2, s1
 Close #2

Adress = Application.Path & "\index1.htm"

Set objShell = CreateObject("WScript.Shell")
Call objShell.Run("explorer """ & Adress & """", vbNormalFocus)