AccessTr.neT
Haber ekranını almak - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Haber ekranını almak (/konu-haber-ekranini-almak.html)

Sayfalar: 1 2 3 4 5


Cvp: Haber ekranını almak - ates2014 - 24/08/2016

Sayın atoz112, önceki sürümden kastınız, access2003 mü,
eğer isterseniz access2003 olarak yeniden eklerim


Cvp: Haber ekranını almak - ozanakkaya - 24/08/2016

Atoz hocanın ekledigi koddaki

   
Webbrowser3.Document.Body.Scroll = "no"


 

Kodunu benim eklediğim örnekteki


Private Sub Webbrowser3_DocumentComplete(ByVal pDisp As Object, URL As Variant)



Kodunun içerisine yazmalısınız.

Benim örnekte webbrowserin adı webbrowser3. Atoz hocanın kodundaki denetim ismi webbrowser1.

Örneğe göre düzenleme yapmalısınız.


Cvp: Haber ekranını almak - atoz112 - 24/08/2016

Sayın ates2014,

Her ne kadar sayın ozan bey,14.mesajda açıklamada bulunsa da,yazdığınızdan dolayı dahil olmak ve cevap vermiş olmak adına;

Alıntı:önceki sürümden kastınız, access2003 mü

ifadenize yönelik olarak;
“önceki sürüm” ifadelerine denk gelecek olursanız,biliniz ki kast edilen .MDB uzantılı dosyaya (2003’e) dönüştürülmüş hali olarak bahsi yapılmaktadır.


Son olarak;
konunuzun 10.mesajda yer alan örnek kod kalıbı,sadece uygulamanız incelenemediği için bu kod kalıbından hareket ile kendi kullandığınız WebBrowser ile değiştirmek sureti ile,ilgili WebBrowser’ın DocumentComplete olay yordamı içerisine

Webbrowser1.Document.Body.Scroll = "no"

Bu kodun dahil edilmesi yeterlidir.Bilginize…iyi çalışmalar,saygılar.


Cvp: Haber ekranını almak - ates2014 - 25/08/2016

Sayın ozan, sizin örneginizde form üzerinde herhangi bir değişiklik yapılamıyor, sürekli çalışan birşeyler var gibi, kapatmak istesem bile yaklaşık 1 dakka sonra kapanıyor,
rica etsem benim örnek üzerinde düzenlemeler yapabilirmiyiz,

Sayın atoz112 örnek belgemi 2003 formatına çevirip ekledim, bilgilerinize...


Cvp: Haber ekranını almak - atoz112 - 26/08/2016

Sayın ates2014,

Öncelikle;
yeterli zaman ve imkan olmaması nedeni ile,bir örnek çalışma üzerinde iletemiyorum kendi adıma,fakat,aşağıdaki açıklamaların yapılması uygun görülmüştür.

Konunuzun 10.,12.,14. ve 15.mesajlarında yazılı olan işlemleri yapmanız yeterlidir.Bunun için;


- uygulamanızı çalıştırıp açınız ve ALT + F11 tuşları ile kod sayfasına geçiniz.

- Kod sayfasının sağında yer alan ve kodların yazılı olduğu pencere üzerinde iki adet Açılan Kutu mevcut.önce,bunlardan soldakinin içerisinden Web Browser olarak tanımladığınız WebB’yi seçiniz.

- Ardından,sağdaki Açılan Kutu’dan da, DocumentComplete ifadesini seçiniz.Akabinde,

Private Sub WebB_DocumentComplete(ByVal pDisp As Object, URL As Variant)

End Sub

olarak ilgili olay yordamı boş halde belirecektir.Bunun içerisine,

WebB.Document.Body.Scroll = "no"

kod satırını yazınız.ya da,direkt olarak;

Private Sub WebB_DocumentComplete(ByVal pDisp As Object, URL As Variant)
WebB.Document.Body.Scroll = "no"
End Sub

yukarıdaki kodları olduğu gibi kod sayfasına ekleyiniz.Bilginize…iyi çalışmalar,saygılar.


Cvp: Haber ekranını almak - ates2014 - 26/08/2016

Sayın atoz112, dediklerinizi yaptım, malesef birşey degişmedi,
uygulamalı örneği ekliyorum.
nerde hata yapıyorum acaba?