AccessTr.neT
e-bildirge yazdırma - 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ığı: e-bildirge yazdırma (/konu-e-bildirge-yazdirma.html)

Sayfalar: 1 2 3 4


e-bildirge yazdırma - ates2014 - 26/07/2015

e-bildirge yazdırma tuşuna tıklanınca, hata veriyor, gerekli resimleri ekte ekledim,


Cvp: e-bildirge yazdırma - ozanakkaya - 26/07/2015

Önceki sorunuzda da belirttiğim gibi, açılan sayfalardaki butonun onclick olayında kod yazılı, bu kod ile sayfa denetimi yapılıyor,
webbrowseri sadece giriş işlemi için kullanıyorsanız, form ile veri alışverişi yapmıyorsanız giriş için popup sayfa açtırıp webbrowseri iptal edin.
Popup sayfa açtırırsanız sorun çıkmadan butonları kullanabilirsiniz.


Cvp: e-bildirge yazdırma - ates2014 - 27/07/2015

Sayın ozan, bu dedikleriniz hakkında malesef, yeterli bilgim yok,
hangi kodları nereye yazacağımı yazarsanız, uygulamaya çalışırım,
iyi geceler...


Cvp: e-bildirge yazdırma - ozanakkaya - 28/07/2015

Bununla ilgili daha önce kullandığım kod malesef çalışmadı. Yeni kod bulup sonuç hakkında bilgi vereceğim


Cvp: e-bildirge yazdırma - ates2014 - 28/07/2015

Çok teşekkür ederim sayın ozan hocam...


Cvp: e-bildirge yazdırma - ozanakkaya - 01/08/2015

Formdaki webbrowseri kaldır, 

Giriş yap butonunun tıklandığında olayına yazılı kodları aşağıdaki ile değiştir.

Dim Tarayici As Object
Set Tarayici = CreateObject("internetexplorer.application")
Tarayici.navigate "https://ebildirge.sgk.gov.tr/WPEB/amp/loginldap"
Tarayici.Visible = True
While Tarayici.busy
DoEvents
Wend
Tarayici.Document.all("j_username").Value = mtn_kullaniciadi.Value
Tarayici.Document.all("isyeri_kod").Value = Me.mtn_isyeri_kod.Value
Tarayici.Document.all("j_password").Value = Me.mtn_sistemsifresi.Value
Tarayici.Document.all("isyeri_sifre").Value = Me.mtn_isyerisifresi.Value
While Tarayici.busy
DoEvents
Wend
Set Tarayici = Nothing

Butonu tıkladığında tarayıcı popup olarak açılır, doğrulama kodu hariç tüm alanlara veri aktarılır. Siz doğrulama kodunu yazıp tarayıcıdaki giriş butonuna tıklayıp sisteme giriş yapabilirsiniz,