[MAKRO] alan turu uyusmaligi
#1
SQL
  1. Dim a AS INTEGER
  2. a = Me.TcKimlikNo
  3. Dim sayac1 AS INTEGER
  4. sayac1 = DCount("TcKimlikNo", "tblPersonel", "TcKimlikNo=" & "a")
  5. Dim msg AS INTEGER
  6. msg = MsgBox(sayac1, vbOKOnly, "Hata")



meraba arkadaslar. TcKimlikNo tblPersonel icinde 11 hanelik bi text alandir. bu alanda bilgi guncellemesei sirasinda aynı kimlik numarası girilmemesi icin bi uyarı vermeye calisyorum ama sanirim bi degisken turu sikntsi var. yardmci olursaniz sevinrm.

iyi calismalar...



  Alıntı
Bu mesajı beğenenler:
#2
1. a integer tipindedir diye tanımlamışsınız ama tckimlikno alanının text alanı olduğunu yazmışsınız. tipler aynı olmalı tckimlikno text ise a string olmak zorundadır
Visual Basic
  1. Dim sayi As Integer
  2. sayi = DCount("TcKimlikNo", "tblPersonel", "TcKimlikNo='" & TcKimlikNo& "'")
  3. If sayi > 0 Then
  4. Me.Undo
  5. MsgBox "aynısından girilemez"
  6. End If


Teşekküre gerek yok, Taş atın yeter!!!



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Sorgu Içerisinde Boş Alan Varsa 0 (sıfır) Ile Doldurmak denizfatihi 3 515 15-08-2024, 14:38
Son Mesaj: beab05
  [SORGU] çarpraz Sorguda Sütun Değeri Olarak Birden çok Alan Seçebilir Miyiz? abkbek 2 409 13-08-2024, 21:18
Son Mesaj: abkbek
  [VBA] Bir Tabloda Alan Türü Uzun Metin Olan Iki Ayrı Alanı Karşılaştırmak abkbek 13 1.185 10-11-2023, 22:26
Son Mesaj: abkbek
  [SORGU] Farklı Tablolarda Yer Alan Satış Bilgilerini Toplama Sorgusu Lidervet 1 481 09-11-2023, 00:54
Son Mesaj: dsezgin
  Boş Alan Kontrolü (taruz) : Rapor Butonu prtkl 5 675 31-05-2023, 22:48
Son Mesaj: hnakis
  [VBA] Alan Kontrollü Kaydetme Işlemi Ahmet51 2 488 25-05-2023, 14:07
Son Mesaj: Ahmet51
  Ders Kodları Tablosundaki Alan Adlarına Göre öğrencinin Sınıfını Belirlemek .. programmer67 8 909 18-05-2023, 16:49
Son Mesaj: programmer67
  Kaldırılan Alan Ve Nesnelerin Vba De Hala Gözükmesi Hk. adnnfrm 1 449 09-05-2023, 20:56
Son Mesaj: halily

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi