tarih metin kutusu: mtn_tarih
kullanılacak kod
DoCmd.RunSQL "INSERT INTO stok ( malzeme_adi_satok, malzeme_miktari_stok, usta, tarih ) SELECT tarif_malzeme_adi, miktari, [Formlar]![tarif]![mtn_usta] AS usta, [Forms]![tarif]![mtn_tarih] AS tarih FROM malzeme WHERE ((([malzeme_adi])='" & GMalzemeAdi & "'));"