AspDepo.org

asp script deponuz

Son Yorumlananlar

Son 10 Kod

Gösterim

  • Bugün : 39
  • Toplam : 1905623

TC Kimlik No Kontrol (Function) (tr)

Bu kod 2135 kere okunmuştur.

Kod

TC Kimlik Numaraları oluşturulurken dikkat edilen bir işlemin kontrolüyle TC Kimlik Numarasının yanlış yazımını engelliyor., TC Kimlik Numaraları Mernis Sisteminde ufak bir kontrolle yaratıldı. İlk 10 hanenin toplamının birler basamağı TC Kimlik Numarasının son hanesine eşittir. Mesela 11111111111 geçerli bir TC Kimlik Numarası değildir. Çünkü ilk 10 hanenin toplamı 10dur. 10un birler basamağıyla TC Kimlik Numaramızın birler basamağı uyuşmamaktadır. 

Kullanım :

<%
if  
tc_kontrol(tckimlikdegiskeniniz)  then

    işlemler sonucu doğruysa yapılacaklar

else

    işlemler sonucu doğru değilse yapılacaklar

end  
if
%>

 

Kod :

 

<%
if  
tc_kontrol(tckimlikdegiskeniniz)  then

    işlemler sonucu doğruysa yapılacaklar

else

    işlemler sonucu doğru değilse yapılacaklar

end  
if
%>

<%
Function  
tc_kontrol(tckimlik)

    tckimlik=left(tckimlik,11)
    sontckimlik=right(tckimlik,1)
    toplam=0

     for  i=1  to  10

        temp=mid(tckimlik,i,1)
        toplam=toplam+temp

     next

    toplam=right(toplam,1)

     if  sontckimlik=toplam  then

        tc_kontrol=true

     else

        tc_kontrol=false

     end  if

End  
Function
%>