internet explorer navigate türkçe karakter sorunu

[agent1980]

Merhaba;

Aşağıdaki kod ile istediğim sayfada gezinebiliyorum.

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim ie As Object

dosya = ListBox1.List(ListBox1.ListIndex, 1)
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True

ie.Navigate dosya


End Sub

Fakat sayfa türkçe karakterleri göstermediği için, sayfada sağ tuş encoding Turkish(windows) seçeneğini manuel seçmem gerekiyor.

Bu işlemi makro ile nasıl otomatik hale getirebilirim.

Teşekkürler

 

[agent1980]

Ek bilgi: URL bir www sayfası değil. Intranet döküman kütüphanesi içinde htm uzantılı dosyalar. O dosyanın yolunu göstererek internet explorer ile htm dosyasının açılmasını sağlıyorum. Sayfa geliyor ama ş,ü gibi türkçe karakterler bozuk çıkıyor.

 

[agent1980]

Merhaba acaba yapılamıyor mu?
Bu sorunu çözmek için farklı bir yol onerisi olan vamı?
Teşekkürler

 

[agent1980]

Başka bir konu açarken bu konuyada göz attım.
Yukarıdaki soruna çözüm olarak tüm dosyaları PDF e çevirdik
IE içinde tümleşik olarak görüntüleyebiliyoruz artık.
Sorunsuz kullanıyoruz ama HTML olarak bir şekilde olmalıydı gibi geldi bana.

 

[omerceri]

Versiyon diliniz İngilizce, .htm dosyanızı nasıl oluşturuyorsunuz, htm kodlarında

<meta http-equiv=Content-Type content="text/html; charset=Windows-1254">

satırı varmı?