Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Tc no sorgulama

ensar236
ensar236
Access Cevaplanmış Soruları
4
2237

Tc no sorgulama

Çözüldü #1
ensar236
Aktif Üye
ensar236
Bul
Aktif Üye
Adı Soyadı:
Yaşı: 52
Konum: Çorum
Ofis Versiyonu: Ofis 2007
Son Oturumu: 16/03/2024,09:40
Yorumları: 68
Konuları: 17
Kayıt Tarihi: 22/10/2009
Teşekkür Puanı: 15
Merhaba arkadaşlar.
Ekte ki daha önce form üzerinden indirmiş olduğum kimlik doğrulama formuna tc numarasını girince çalıştığım kurumun ağından girince bilgiler gelmekte. Gelen bilgileri ARSİV formuna aktarmak istiyorum. Form üzerinde bir çok uygulama var ancak bir türlü yapamadım. Yardımcı olursanız sevinirim.Teşekkürler.
ensar236, 22-10-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #2
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: 20/12/2024,22:58
Yorumları: 13.542
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
butonun tıklandığında olayına aşağıdaki kodu yaz.

Kod:
strSQL = "SELECT * FROM ARSİV "
Set rstkayit = New ADODB.Recordset
rstkayit.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
With rstkayit
.Find "[TC]=" & Me.Metin1
If Not rstkayit.EOF Then
.Fields("ADI") = Me.Metin3
.Fields("SOYADI") = Me.Metin9
.Fields("BABA") = Me.Metin10
.Fields("ANNE") = Me.Metin11
.Fields("DOĞUM") = Me.Metin14
.Fields("DOĞT") = Me.Metin12
.Fields("İL") = Me.Metin2
.Fields("İLÇE") = Me.Metin8
.Fields("NÜF") = Me.Metin4
.Fields("CİNSİYETİ") = Me.Metin13
.Update
Else
.AddNew
.Find "[TC]=" & Me.Metin1
.Fields("ADI") = Me.Metin3
.Fields("SOYADI") = Me.Metin9
.Fields("BABA") = Me.Metin10
.Fields("ANNE") = Me.Metin11
.Fields("DOĞUM") = Me.Metin14
.Fields("DOĞT") = Me.Metin12
.Fields("İL") = Me.Metin2
.Fields("İLÇE") = Me.Metin8
.Fields("NÜF") = Me.Metin4
.Fields("CİNSİYETİ") = Me.Metin13
.Update
End If
End With

Ayrıca, 1. mesajdaki örnek uygulamayı kaldırdım. Bilgilerinize.
Cevapla
Çözüldü #3
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: 20/12/2024,22:58
Yorumları: 13.542
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
konu açma zamanı = Bugün, 11:47
oturum kapatma zamanı = Bugün, 11:47
Cevapla
Çözüldü #4
Puletin
Onursal Üye
Puletin
Bul
Onursal Üye
Adı Soyadı:
Konum: -
Ofis Versiyonu: Ofis 2003
Son Oturumu: 24/12/2016,00:18
Yorumları: 1.717
Konuları: 40
Kayıt Tarihi: 01/11/2008
Teşekkür Puanı: 416
Sparişi vermiş nasıl olsa, Hazır olunca bir ara uğrar, alır Img-grin
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla
Çözüldü #5
ensar236
Aktif Üye
ensar236
Bul
Aktif Üye
Adı Soyadı:
Yaşı: 52
Konum: Çorum
Ofis Versiyonu: Ofis 2007
Son Oturumu: 16/03/2024,09:40
Yorumları: 68
Konuları: 17
Kayıt Tarihi: 22/10/2009
Teşekkür Puanı: 15
Sayın sledgeab ilginiz için teşekkür ederim.
ensar236, 22-10-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da