Yeni bir soru yaptım; SQL=
SELECT GIDENEVRAK.SIRANO, GIDENEVRAK.ALİNTAR, GIDENEVRAK.SÜRE, GIDENEVRAK.YANIT, [ALİNTAR]+[SÜRE] AS SONTARİH
FROM GIDENEVRAK
WHERE (((GIDENEVRAK.YANIT)=False));
FGIDENEVRAK açıldığında=
If Dlookup ("[SONTARİH]", "Sorgu4", "[SONTARİH]=Date()") Then
MsgBox ("Bugün yanıt vermen gereken başvuru var, unutma."), vbExclamation, "UYARI"
Else
End If
Yazdım oldu, vaktim olmadığından 1-2 deneme yapabildim, akşam tekrar deneyip buradan bilgi veririm, ona göre konuyu kapatabiliriz.Tşk.
"Oyun bitince şah ve piyon aynı kutuya atılır "