Kayıt ekleme.
Tarih
12/01/2013 01:51
Konu Sahibi
serdar_20
Yorumlar
8
Okunma
1204
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



serdar_20
Uzman
Kullanici Avatari
Uzman
S....
188
03/12/2011
52
Erzurum
Memur
Ofis 2007
30/11/2016,17:43
Çözüldü 
Merhabalar;
Ekteki örnekte form1 de "adı" metin kutusunun güncelleştirme sonrasında olayından sonra belli bir koşula göre tablo1 de bulunan kayıtlardan form1 in kayıt kaynağı olan tablo2 ye otomatik kayıt eklemek istiyorum. Kayıt eklenirken de iki tane kriter kullanmak istiyorum.
1. Tablo1 de sıra no aynı olan kayıtların eklenmesi.
2. Seçilen kaydın kendisinin tekrar eklenmemesi.

Biraz karışık oldu galiba ama bir örnek vermek gerekirse;
form1 de adı açılan kutusunda örneğin "AA" seçilirse tablo1 de "AA" nın sıra_no' su 1 olduğu için, tablo1 de sırano su 1 olan "BB" ve "CC" kayıtlarının otomatik olarak eklenmek istiyorum. Fakat ekleme yapılırken "AA" nın ikinci bir kez eklenmesini istemiyorum.
Yardımcı olursanız sevinirim.
İyi çalışmalar.


Ek Dosyalar
.rar   Yeni Microsoft Access Veritabanı.rar (Dosya Boyutu: 20,89 KB / İndirme Sayısı: 25)
Cevapla


C*e*l*o*y*c*e
Celosoft Yazılım
Kullanici Avatari
Uzman
M.... B....
2.813
29/10/2008
899
Ankara
Ofis 2010 32 Bit
Çözüldü 
açıklamanız çok karışık ve anlaşılmaz durumda ne yapmak istediğinizi daha net yazın gerisini nasıl yol izlenir tekrar beraber düşünelim
Cevapla


serdar_20
Uzman
Kullanici Avatari
Uzman
S....
188
03/12/2011
52
Erzurum
Memur
Ofis 2007
30/11/2016,17:43
Çözüldü 
Merhabalar;
Sayın C*e*l*o*y*c*e yapmak istediğim form1 de açılan kutudan bir değer seçtiğimde o kayıtla alakalı kayıtları eklemek. Örnek vermek gerekirse açılan kutuda sıra_no'su 1 olan "BB" yi seçtiğimde tablo1 de sıra nosu 1 olan diğer kayıtların (yani "aa ve "cc"yi) forma eklemek istiyorum.
Cevapla


fatih karagöl
Aktif Üye
Kullanici Avatari
Aktif Üye
167
05/10/2010
88
Edirne
-
15/12/2015,17:38
Çözüldü 
aşağıdaki kod işinizi görecektir. güncellendi olayını bu şekilde ayarlayın

Option Compare Database
Dim Sql As String
Private Sub ADI_AfterUpdate()
Guncelle
End Sub
Private Sub Guncelle()
Dim siraNo As String, oAdi As String
siraNo = Nz(ADI.Column(1)): If siraNo = "" Then Exit Sub
oAdi = ADI
Sql = "INSERT INTO Tablo2 ( ADI ) SELECT Tablo1.ADI FROM Tablo1 LEFT JOIN Tablo2 ON Tablo1.ADI = Tablo2.ADI WHERE (((Tablo1.SIRA_NO)= '" & siraNo & "') AND ((Tablo2.ADI) Is Null));"
DoCmd.RunSQL SQL
End Sub
Cevapla


serdar_20
Uzman
Kullanici Avatari
Uzman
S....
188
03/12/2011
52
Erzurum
Memur
Ofis 2007
30/11/2016,17:43
Çözüldü 
Sayın fatih karagöl ilginiz ve verdiğiniz kodlar için teşekkür ederim.
(12/01/2013, 01:51)serdar_20 Adlı Kullanıcıdan Alıntı: 1. Tablo1 de sıra no aynı olan kayıtların eklenmesi.
2. Seçilen kaydın kendisinin tekrar eklenmemesi.
Verdiğiniz kodlar 1. maddedeki gibi kayıtları ekliyor. Fakat 2. maddede belirtiğim gibi seçilen kaydın tekrar eklenmemesini nasıl sağlayabiliriz. Rica etsem tekrar bakabilir misiniz?
Cevapla


fatih karagöl
Aktif Üye
Kullanici Avatari
Aktif Üye
167
05/10/2010
88
Edirne
-
15/12/2015,17:38
Çözüldü 
zaten mükerret eklemiyo olması lazım. ancak tablo 1 de iki tane farklı FF var. o bir karışıklık yaratıyo olabilir mi. onun haricinde kontrol ettiğimde her kaydı bir kere atıyordu kod. ?
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Açılan kutuda seçilen ilk satır kayıt getiriyor sorunu nightashes 2 52 Dün, 18:23 nightashes
  Mükerrer Kayıt Hk. Serkan Çevik 2 76 01/12/2016, 22:37 Serkan Çevik
  Liste kutusu işlem yapma ekleme silme de sorun nightashes 7 108 29/11/2016, 20:24 nightashes
  Aynı Kişi adı ile Yeni Kayıt eklemek Mesut Kaytan 6 234 29/11/2016, 13:49 Mesut Kaytan
  Access Formda Tümünü Seç Buton Olay Yordamı Ekleme ? mehami 7 313 25/11/2016, 18:36 mehami


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya