AccessTr.neT

Sayfalar: 1 2 3

Arkadaşlar.
Sevgili admin Sledgeab, bildiğiniz gibi bir çok web üzerinden sorgulama çalışmasına imza atmıştır. Özellikle Tc kimlik sorgulaması konusunda çalışmalarını ben de programlarımda kullanmaktayım. Fakat gördüğüm kadarıyla Tc kimlik doğrulama sayfası artık kapanmış. Yani tckimlik.nvi.gov.tr adresinde eskiden 2 sorgu vardı, biri tc sorgulama, diğeri de doğrulama. Artık doğrulama yok. Yani birinin tc kimliğini yazarak adı-soyadı ve doğum tarihi öğrenme olayı kaldırıldı.

Oysa ben bu doğrulamayı programlarımın bazılarında kontrol amaçlı kullanmaktayım. Ben de nasıl bir çare bulabilirim diye araştırdım ve çareyi buldum. Burda çok dillendirmek istemiyorum (çünkü onu da kapatmasınlar) ama bir adres üzerinden (lütfen siz de söylemeyiniz) tc kimlik doğrulaması yapıyorum. Hem de resim doğrulama yok. Doğum tarihi yok, ama çok da önemli değil. Ad soyad geliyor, bu da yeter...

Ben de oturdum tamamen yeni birç alışma yaptım. Bu çalışmada elbette sledgeab'ın çalışmasından da yararlandım ama bunun dışında örnek bir çalışma yapayım ve kalite çıtası biraz yükselsin dedim.

Bu çalışmada bazı ders çıkarılacak (tabii amatör arkadaşlar için söylüyorum, ustalar için değil) bir çok örnek yer alıyor. Bu kadarcık çalışmada bakın neler neler var:

1- Web üzerindeki alanlardan bilgi alma- web'e Access üzerinden bilgi gönderme. (Sledgeab'ın çalışmasından yararlanıldı)

2- Bilgi alınmasını zorlaştırmak amacıyla (yani biz kullanmayalım diye) kullanılan yöntemleri aşmak için neler yapılabileceği. Bu örneğimde tek hücre olarak verilen sorgulama sonucunu bir metin kutusuna aktararak instr ve mid$ kullanarak alınacak veriye nokta atışı yaptım...

3- Rounded (yuvarlama) kullanarak formun kenarlarının oval yapılması (Bilgisayarcı'nın çalışmalarından yararlanıldı)

4- Access gizleme kodları kullanılarak Access penceresinin gizlenmesi..

5- Tc Kimlik sorgulaması yapılacak noların önce tckimlik algoritmasına uygun olup olmadığını kontrol eden kodun kullanılması (sledgeab'ın çalışmasından yararlanıldı)

Güle güle kullanın arkadaşlar....

Bu arada: Access gizleme kodları kullanıldığı için incelemek isteyen arkadaşlar Shift ile birlikte açabilir.

Ellerin dert görmesin hocam paylaşım ve detaylı bilgiler için çok teşekkür eder saygılar sunarım

Hocam eline sağlık, tşk
Kodların içindeki bu function ne işe yarıyor ?
ve nerelerde kullanabilriz. Sanırım benim bazı
problemleri çözecek bir bekleme komutu mudur ?
Bilgi verirseniz sevinirim
Tşk.

Kod:
Function Bekle(Delay As Integer, DispHrglass As Integer)

Dim DelayEnd As Double

DoCmd.Hourglass DispHrglass

  DelayEnd = DateAdd("s", Delay, Now)

  While DateDiff("s", Now, DelayEnd) > 0

    DoEvents

  Wend

  DoCmd.Hourglass False

End Function

Kolay gelsin

_________________________

Demiral Hocam, cevap verdiğiniz
için çok tşk ederim.

Teşekkürler sayın Mehmet Demiral hocam...

Mehmet hocam Teşekkürler ,

Paylaşımınıza çok teşekkür ederim.

Sayfalar: 1 2 3

mehmetdemiral

simendifer

okileturc

assenucler

Celoyce

İsmail Küçükşengün