(08/09/2020, 15:36)tarkanaykın yazdı: arkadaşlar kusura bakmayın böyle basit örneği çok olan bi çözüm için sizi meşgul edeceğim, çözümü çok uyarlıyorum ama çalışmıyor bi bakar mısınız bu kodda bir sorun mu var acaba, acilen saat 4 olmadan lazım
Private Sub Komut25_Click()
If Dlookup ("[son_test]", "SUREC", " [Forms]![KISILER Sorgu]![kisi_id] ") < 1 Then
MsgBox "ilk test tamam"
Else
End If
End Sub
tekrar değiştirdim bu haliyle yine olmaduı
(08/09/2020, 15:45)tarkanaykın yazdı: (08/09/2020, 15:36)tarkanaykın yazdı: arkadaşlar kusura bakmayın böyle basit örneği çok olan bi çözüm için sizi meşgul edeceğim, çözümü çok uyarlıyorum ama çalışmıyor bi bakar mısınız bu kodda bir sorun mu var acaba, acilen saat 4 olmadan lazım
Private Sub Komut25_Click()
If Dlookup ("[son_test]", "SUREC", " [Forms]![KISILER Sorgu]![kisi_id] ") < 1 Then
MsgBox "ilk test tamam"
Else
End If
End Sub
SUREC tablosunda son_test adlı alana puan eklemem gerekiyor ama kişi_id si 3 olan (formdan alıyorum zaten bu 3 referansını) kaydın alanına...