şartlı bilgi çağırma

1 2
12/09/2011, 10:03

neslinet

(06/09/2011, 23:18)BlackEagle yazdı: Yapmanız gereken formunuzda yer alan VAKİT liste kutusunun satır kaynağını;
SELECT DISTINCT ANA.VAKİT, ANA.ÇEŞİT, ANA.TARİH FROM ANA WHERE (((ANA.ÇEŞİT)=[formlar]![KAYIT]![ÇEŞİT]) AND ((ANA.TARİH)=[Formlar]![KAYIT]![TARİH]));
olarak değiştirmek.

Pardon Mehmet hocam, sizin burada olduğunuzu fark etmedim. Bu ne hız yav.
Teşekkürler BlackEagle
tam aradığım kod , where den sonrasını bir türlü yazamamıştım
bu kodu veri güncellemek için kullandım

Private Sub Komut13_Click()

Dim GUNCELLE As String

GUNCELLE = "UPDATE OGRENCI_SABIT SET ADISOYADI=' " & ADISOYAD & " ',SINIF=' " & SINIFI & " ',OKULADI=' " & OKUL & " ' WHERE ((OGRENCI_SABIT.OKULNO)=[Formlar]![OGRENCI_GIRISI]![OKULNO]) "

DoCmd.RunSQL GUNCELLE

End Sub
12/09/2011, 16:30

mehmetdemiral

Evet haklısınız. Ben de zaten farklı bir kod yazmışım oraya. Bakın:
Kod:
SELECT DISTINCT ANA.VAKİT, ANA.ÇEŞİT, ANA.TARİH
FROM ANA
WHERE (((ANA.ÇEŞİT)=[formlar]![KAYIT]![ÇEŞİT]) AND ((ANA.TARİH)=[Formlar]![KAYIT]![TARİH]));
1 2