arkadaşlar, dao ile kayıt seti alma örneğini kendi işime uyarlamak istedim, bu yönde mantık yürüterek alınan kaydı metin kutularına almak istedim ve hata verdi, acaba nasıl yapmalıyım, yardımcı olur musunuz?
Private Sub faturaNo_DblClick(Cancel As Integer)
Dim db As DAO.Database
Dim qd As DAO.QueryDef
Dim rs As DAO.Recordset
Set db = CurrentDb
Set qd = db.QueryDefs("SELECT surec.isinAdi, surec.faturaTarihi, surec.faturaNo, surec.tutar, surec.kdvOrani, surec.toplamFiyat, surec.Kimlik, s
|
Hayırlı akşamlar. Benim projede sütunlara bilgileri giriyorum ve ardından Ocak, Şubat, Mart, ......
ayların olduğu kutular var ve her ayın olduğu kutuya veri girdiğim zaman kutudaki sayı kadar satır eklemesini istiyorum.
Ocak ayının sütununa girdiğim sayı kadar satır ekliyor ama şubat ayı sütununa için sayı girdiğimde satır eklemiyor. ben tün aylara sayı girip o aylardaki sayı karar satır artmasını istiyorum. Yardımcı olursanız memnun olurum. Teşekkürler. Örnek proje ektedir.
|