AccessTr.neT

Sn Puletin ;

ben 2 kriterli kontrol için denmiştim şu yolu denedim ,

Dim yakala As Integer

yakala = DCount("*", "MAMUL GİRİŞ TABLO", "[sıra no]= '" & Me.Sıra_no & "'" & "And [çıkan bobin]= '" & Me.çıkan_bobin & "'")
If yakala > 0 Then
MsgBox "Bu Bobin daha önce üretilmiştir."
Else
MsgBox "yok"
End If

data type mismatch in criteria expression Hatası aldım, Eksik soru sorduğum içinde ayrıca özür dilerim.

merhaba,

Dcount ifadesi içerisinde yazmış olduğunuz

Alıntı:"And [çıkan bobin]=

satırındaki and ifadesini çıkartıp sadece [çıkan bobin]= olmasını sağladığınızda tip uyuşmazlığını düzeltmiş olursunuz.tablonuzdaki alan ismi çıkan bobin olsa gerek.bu sebeple hata veriyordur.

iyi çalışmalar.
saygılar.

And kaldırıncada şu hatayı veriyor. evet "MAMUL GİRİŞ TABLO" Alan çıkan bobin

sayın fatihmx,

dcount fonksiyonunu iki kritere göre kullanmak istendiğinde aşağıdaki gibi bir kod kalıp ifadesi söz konusudur.buna göre deneyebilirisniz,isterseniz.


DCount("[Alanadi]", "Tabloadi", "[kriter1] = " & Forms![Formadi]![metinkutusu1] & " AND [kriter2] = '" & Forms![Formadi]![metinkutusu2] & "'")

iyi çalışmalar.
saygılar.