Skip to main content

AccessTr.neT


e-bildirge yazdırma

e-bildirge yazdırma

#7
Teşekkür ederim ozan hocam,
olmuyorsa böyle idare ederiz, naapalım...
Cevapla
#8
Merhabalar arkadaşlar,
Yukarıdaki ozan hocamın kodlarını kullanıyordum,
son aylarda harici internetexplorer girişi yaparken ,
Set Tarayici = CreateObject("internetexplorer.application")
bu sayfa hata veriyor, başka tarayıcılara girmek istiyorum bir türlü yapamadım,
neden acaba?
Cevapla
#9
Referanslara "Microsoft Internet Controls" referansını ekleyip buton kodlarını aşağıdaki ile değiştirerek dene.

   
ie.Visible = True

ie.navigate "https://ebildirge.sgk.gov.tr/WPEB/amp/loginldap"
   
   
Do Until ie.ReadyState = READYSTATE_COMPLETE
   DoEvents
Loop

ie.Document.all("j_username").Value = mtn_kullaniciadi.Value
ie.Document.all("isyeri_kod").Value = Me.mtn_isyeri_kod.Value
ie.Document.all("j_password").Value = Me.mtn_sistemsifresi.Value
ie.Document.all("isyeri_sifre").Value = Me.mtn_isyerisifresi.Value

Do Until ie.ReadyState = READYSTATE_COMPLETE
   DoEvents
Loop


Ayrıca örnek uygulamana eklediğiniz webbrowser kodlarında herhangi bir sorun yok.
Cevapla
#10
Çevabınız için çok teşekkür ederim hocam,
Yalnız, run-time error "424" hatası veriyor
aşağıdaki kod satırı sarı oluyor
ie.Visible = True
Cevapla
#11
Pardon bir açıklamada bulunayım,
yapmak istediğim form üzerindeki tarayıcıya bağlanma değil,
formdaki bilgilerle expolorer veya crome açarak e-belgeye bağlanmak istiyorum.
Cevapla
#12
Merhaba, kod eksik eklenmiş. Doğrusu aşağıdadır.

Dim ie As InternetExplorer
Set ie = New InternetExplorer
   
ie.Visible = True

ie.navigate "https://ebildirge.sgk.gov.tr/WPEB/amp/loginldap"
   
   
Do Until ie.ReadyState = READYSTATE_COMPLETE
   DoEvents
Loop

ie.Document.all("j_username").Value = mtn_kullaniciadi.Value
ie.Document.all("isyeri_kod").Value = Me.mtn_isyeri_kod.Value
ie.Document.all("j_password").Value = Me.mtn_sistemsifresi.Value
ie.Document.all("isyeri_sifre").Value = Me.mtn_isyerisifresi.Value

Do Until ie.ReadyState = READYSTATE_COMPLETE
   DoEvents
Loop
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da