AccessTr.neT

Tam Versiyon: bir kod ile birden fazla kayıt ekleme
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
arkadaşlar ben şuanda aile bütçesi üzerinde çalışıyorum. göndermiş olduğum örnekte bir kayıt girişi yapıyorum ve yandan açılan 4,8,12,24,60,120 ay vade düzenle dediğimde vade sayısı kadar kayıdı tabloya ekliyor. buraya kadar hiçbir sıkıntı yok ancak ben forma vade sayısı isminde bir metin kutusu eklemek istiyorum ve oraya yazdığım sayı kadar kayıt eklemesini istiyorum. örnek ektedir. cevaplarınız için şimdiden teşekkürler
forma mtn_vadesayisi adında metin kutusu ekle, butonun tıklandığında olayına aşağıdaki kodu ekle

On Error Resume Next
For X = 1 To Me.mtn_vadesayisi

DoCmd.GoToRecord , , acNewRec
Me.kısım = "GİDER"
If X = 1 Then
Me.tarihi = Me.Metin124
Else
Me.tarihi = Controls("M" & X)
End If
Me.onayı = "Bekliyor"
Me.adı = Forms![YENİ DAİMİ GİDER GİRİŞİ]![adi]
Me.tutarı = [tutari]
Next

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70

MsgBox (" Vade Oluşturuldu")

mtn_vadesayisi metin kutusuna yazdığın sayı kadar kayıt ekler.
sorun çözülmüştür. cevabınız için teşekkür ederim.
Güzel bir örnek elinize sağlık.
Sormak istediğim
bu oluşan kayıtlara sıralama yapabilirmiyiz.

tabloya vade_no eklesem

kayıt oluştuğunda vade_no 1,2,3,4 diye sıralayabilirmiyiz.

Şimdiden cevabınız için teşekkür ederim.
sayın zetyu,

Site Kuralları sayfasını tekrar incelemenizi temenni etmekle birlikte;
Cevaplanmış Sorular kategorisi içerisine taşınıp kapatılmış ve örnek eklemesinin dahi yapılamayacağı bir konuda,mesaj eklemesinde bulunmayınız.

bu konuyu bağlantı göstermek sureti ile sorunuzu ya da talebinizi içerecek yeni bir konu açarak sorununuza çözüm arayabilirsiniz.

böylece,hem bu konunun mesaj yoğunluğunu artırmamış olursunuz hem de benzer soruna maruz kalabilecek olan diğer üyelerin site içi aramalarda alternatif bir konuya da bakılmasını ve incelemesini de sağlamış olursunuz.

konunuza,örnek uygulamanızı;içeriğinde farazi gerçek dışı bilgiler ve 5-10 kayıt barındıracak şekilde eklemeniz de yerinde olacaktır.

uygulamanızda herhangi bir soruna veya hataya maruz kalacak olursanız,bu hata veya sorunların gerek isimlerini ayrıntılı belirterek ya da sorunları net ifade ederek ve gerekse de ekran görüntüleri dahi eklemek sureti ile,çözümler arayabilirsiniz.

katılımcılar tarafından,açacağınız konuda uygun görülecek olan gerekli bilgi ya da örnek paylaşımlarının yapılması da mümkün olacaktır.

bilginize...iyi çalışmalar,saygılar.