Bir klikle SSK e-bildirge girişi.

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

ismailerkan15

Altın Üye
Katılım
23 Nisan 2005
Mesajlar
43
Excel Vers. ve Dili
2003 tr
Altın Üyelik Bitiş Tarihi
5-11-2026
elinize sağlık
çok güzel olmuş
 
Katılım
4 Ağustos 2008
Mesajlar
117
Excel Vers. ve Dili
Türkçe
Sayın modalı göndermiş olduğunuz dosya saldırı nedeniyle olması lazım silinmiş tekrar gödnerirseniz sevinirim.
 
Katılım
19 Ekim 2007
Mesajlar
83
Excel Vers. ve Dili
excell 2003,access 2003,visual basic 6.0
Private Sub Form_Current()
Me.İşyeriŞifre.SetFocus
DoCmd.RunCommand acCmdCopy
Me.txtBaglanti = "http://ebildirge.ssk.gov.tr/WPEB/amp/loginldap?j_username=" & Me.TCNO & "&isyeri_kod=" & Me.IşyeriKod & "&j_password=" & Me.Şifre & "&isyeri_sifre=" & Me.İşyeriŞifre
Me.cmdBaglanti.Hyperlink.Address = Me.txtBaglanti

End Sub

'https://ebildirge.ssk.gov.tr/WPEB/amp/loginldap?j_username=###########&isyeri_kod=##&j_p assword=#####&isyeri_sifre=#####

Private Sub Form_Load()
Me.txtBaglanti = "https://ebildirge.ssk.gov.tr/WPEB/amp/loginldap?j_username=" & Me.TCNO & "&isyeri_kod=" & Me.IşyeriKod & "&j_password=" & Me.Şifre & "&isyeri_sifre=" & Me.İşyeriŞifre
Me.cmdBaglanti.Hyperlink.Address = Me.txtBaglanti
End Sub


BU KODLARLA ACCESS TE SSK GİRİŞİNİ YAPABİLİRSİNİZ..
 
Katılım
7 Kasım 2008
Mesajlar
3
Excel Vers. ve Dili
2003 versiyonu visual basic
sgk'dan şifre girmek gerçekten çok zamanımızı alıyor.Acaba buranın da kısayolunu yapabilirmisiniz.

Şimdiden teşekürler
 
Son düzenleme:
Katılım
19 Ekim 2007
Mesajlar
83
Excel Vers. ve Dili
excell 2003,access 2003,visual basic 6.0
//app.ssk.gov.tr/SigortaliTescil/amp/loginldap?j_username=xxxxxxx&isyeri_kod=xxxxxx&j_password=xxxxxxxxx&isyeri_sifre=xxxxxxxxxxx

xxxxxx yazılan yerlere şifrenizi yazmanız yeterli
 
Katılım
19 Ekim 2007
Mesajlar
83
Excel Vers. ve Dili
excell 2003,access 2003,visual basic 6.0
//saglik.ssk.gov.tr/vizite/welcome.do?kullaniciAdi=&isyeriKodu=&sistemSifresi=&isyeriSifresi=

ben bu yoldan gittim hatam nerde
 
Katılım
19 Ekim 2007
Mesajlar
83
Excel Vers. ve Dili
excell 2003,access 2003,visual basic 6.0
<form name="KullaniciLoginForm" method="post" action="/vizite/kullanici_login.do" style="margin: 0px;">
<table width="250" cellspacing="2" cellpadding="2" align="center" class="borderTable">
<tr class="headerRow">
<TD colspan="5" align="left" class="label"><b>Kullanıcı Girişi</b></TD>
</tr>
<tr class="row1">
<td width="110px"><b>Kullanıcı Kodu </b></td>
<td width="5px"><b>:</b></td>
<td><input type="text" name="kullaniciAdi" maxlength="11" value="" style="width:100px;" class="label"></td>
<TD><b>-</b></TD>
<TD><b><input type="text" name="isyeriKodu" maxlength="3" value="" style="width:30px;" class="label"></b></TD>
</tr>

<tr class="row2">
<td width="110px"><b>Sistem Şifresi </b></td>
<td width="5px"><b>:</b></td>
<td colspan="3"><input type="password" name="sistemSifresi" maxlength="10" value="" style="width:100px;" class="label"></td>
</tr>
<tr class="row1">
<td width="110px"><b>İşyeri Şifresi </b></td>
<td width="5px"><b>:</b></td>
<td colspan="3"><input type="password" name="isyeriSifresi" maxlength="10" value="" style="width:100px;" class="label"></td>
</tr>

<tr class="row1">
<TD colspan="6" align="center">
<input type="submit" name="kaydet" value=" Giriş " class="button">
</TD>


burdan başka ne sonuç çıkabilirki
 
Katılım
19 Ekim 2007
Mesajlar
83
Excel Vers. ve Dili
excell 2003,access 2003,visual basic 6.0
Private Sub Form_Current()
Me.İşyeriŞifre.SetFocus
DoCmd.RunCommand acCmdCopy
Me.txtBaglanti = "http://saglik.ssk.gov.tr/vizite/welcome.do?kullaniciAdi=" & Me.TCNO & "&isyeriKodu=" & Me.IşyeriKod & "&sistemSifresi=" & Me.Şifre & "&isyeriSifresi=" & Me.İşyeriŞifre
Me.cmdBaglanti.Hyperlink.Address = Me.txtBaglanti

End Sub

'https://saglik.ssk.gov.tr/vizite/welcome.do?kullaniciAdi=###########&isyeriKodu=###&sistemSifresi=##########&isyeriSifresi=##########

Private Sub Form_Load()
Me.txtBaglanti = "https://saglik.ssk.gov.tr/vizite/welcome.do?kullaniciAdi=" & Me.TCNO & "&isyeriKodu=" & Me.IşyeriKod & "&sistemSifresi=" & Me.Şifre & "&isyeriSifresi=" & Me.İşyeriŞifre
Me.cmdBaglanti.Hyperlink.Address = Me.txtBaglanti
End Sub


Sayın Modalı

Neden bu şekilde çalışmıyor.
 

ismailerkan15

Altın Üye
Katılım
23 Nisan 2005
Mesajlar
43
Excel Vers. ve Dili
2003 tr
Altın Üyelik Bitiş Tarihi
5-11-2026
slm
paylaşımlarınız için teşekürler
Biz muhasebecilerin başının belası olan şu pos kontrol sayfası içinde e bildirgedeki gibi bir kod
rica etsek cokmu başınızı ağrıtmış oluruz.
tşk
https://vedop.mb-ggm.gov.tr/internetvd/
 
Katılım
19 Ekim 2007
Mesajlar
83
Excel Vers. ve Dili
excell 2003,access 2003,visual basic 6.0
Katılım
19 Ekim 2007
Mesajlar
83
Excel Vers. ve Dili
excell 2003,access 2003,visual basic 6.0
Private Sub Form_Current()
Me.İşyeriŞifre.SetFocus
DoCmd.RunCommand acCmdCopy
Me.txtBaglanti = "http://saglik.ssk.gov.tr/vizite/welcome.do?kullaniciAdi=" & Me.TCNO & "&isyeriKodu=" & Me.IşyeriKod & "&sistemSifresi=" & Me.Şifre & "&isyeriSifresi=" & Me.İşyeriŞifre
Me.cmdBaglanti.Hyperlink.Address = Me.txtBaglanti

End Sub

'https://saglik.ssk.gov.tr/vizite/welcome.do?kullaniciAdi=###########&isyeriKodu=### &sistemSifresi=##########&isyeriSifresi=####### ###

Private Sub Form_Load()
Me.txtBaglanti = "https://saglik.ssk.gov.tr/vizite/welcome.do?kullaniciAdi=" & Me.TCNO & "&isyeriKodu=" & Me.IşyeriKod & "&sistemSifresi=" & Me.Şifre & "&isyeriSifresi=" & Me.İşyeriŞifre
Me.cmdBaglanti.Hyperlink.Address = Me.txtBaglanti
End Sub



bunun neden çalışmadığını bilen varmıdır..
 
Katılım
30 Mart 2008
Mesajlar
280
Excel Vers. ve Dili
Microsoft Office Excel 2003, Türkçe
Sn. Mesut GÜNDÜZ ssk e-bildirge girişi programını indiremiyorum

Program varsa elinizde eklerseniz sevinirim. İyi çalışmalar....
 
Katılım
8 Nisan 2005
Mesajlar
758
Excel Vers. ve Dili
Excel 2010 Türkçe
Merhaba,
VBA bilmiyorum.
Bu sitede yapılan bir çalışma üzerine bir iki ekleme yaptım. SSK ile ilgili e-bildirge, işçi giriş/çıkış, vizite kağıdına aynı menüden ulaşabilirsiniz.
 
Moderatör tarafında düzenlendi:
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Üst