255 Sütun Limiti Nasıl Aşabilirz ?

1 2 3 4 5
23/10/2022, 12:59

yakanic

(23/10/2022, 12:53)berduş yazdı: forma bir düğme ekleyip aşağıdaki kodu yazarsanız düğmeye her bastığınızda değerleri tabloya ekler
ama aynı kayıtta 5 defa basarsanız 5 defa ekler
Dim xSQL
xSQL = " INSERT INTO ilanNumaralari " _
            & "(kurs1ilanNo,kurs2ilanNo, kurs3ilanNo) VALUES " _
            & "(" & IIf(Len([KURS1 İLAN NO] & "") = 0, "Null", [KURS1 İLAN NO]) & "," & _
                    IIf(Len([Metin703] & "") = 0, "Null", [Metin703]) & "," & _
                    IIf(Len([Metin705] & "") = 0, "Null", [Metin705]) & ");"
           
CurrentDb.Execute xSQL
Not: @atoykan hocamın belirttiği gibi çalışmanızı yeniden yapılandırmanız yerinde olur


böyle olunca da diğer verilerle uyumsuz olmaz mi ? yani o ilan numarasinin o kişiye ait olduğunu nereden bilecek?

adres formundaki gibi sadece kutuya yazıp entere bastiğimda kayıt eden bir sistem yapmak mümkün değil mi ?
23/10/2022, 13:26

berduş

Tam olarak dediğimiz de bu bizim bu durumda ilan no tablosuna yeni bir alan ekleyin uzun sayı olsun bu alana da kişiyi tanımlayan değer eklenir
23/10/2022, 14:04

berduş

(23/10/2022, 12:59)yakanic yazdı: o ilan numarasinin o kişiye ait olduğunu nereden bilecek?
diğer tablodaki kişiyi belirleyen alan hangisi
23/10/2022, 14:18

yakanic

adres tablosundaki birincil anahtar "Kimlik" ile bağlayamiyormuyuz? ya da tckimlik numarasiyla ?
23/10/2022, 15:01

berduş

bağlanır bağlamakta sorun yok ama bu haliyle sizin her defasında butona basıp tabloya aktarmanız lazım - ayrıca butona 40 defa basarsanız 40 defa kayıt atar- oysa form yapısınız değiştirip alt form eklerseniz butona gerek kalmaz
ama çalışmanızın mantığını bilemediğimden bir öneri de bulunamam
yapılanlar:
1 - ilan tablonuza yeni bir alan ekledim
2 - formunuza bir buton eklendi
Dim xSQL
xSQL = " INSERT INTO ilanNumaralari " _
            & "(kurs1ilanNo,kurs2ilanNo, kurs3ilanNo,KisiID) VALUES " _
            & "(" & IIf(Len([KURS1 İLAN NO] & "") = 0, "Null", [KURS1 İLAN NO]) & "," & _
                    IIf(Len([Metin703] & "") = 0, "Null", [Metin703]) & "," & _
                    IIf(Len([Metin705] & "") = 0, "Null", [Metin705]) & "," & Me.Kimlik & ");"
           
CurrentDb.Execute xSQL

23/10/2022, 15:56

yakanic

(23/10/2022, 15:01)berduş yazdı: bağlanır bağlamakta sorun yok ama bu haliyle sizin her defasında butona basıp tabloya aktarmanız lazım - ayrıca butona 40 defa basarsanız 40 defa kayıt atar- oysa form yapısınız değiştirip alt form eklerseniz butona gerek kalmaz
ama çalışmanızın mantığını bilemediğimden bir öneri de bulunamam
yapılanlar:
1 - ilan tablonuza yeni bir alan ekledim
2 - formunuza bir buton eklendi
Dim xSQL
xSQL = " INSERT INTO ilanNumaralari " _
            & "(kurs1ilanNo,kurs2ilanNo, kurs3ilanNo,KisiID) VALUES " _
            & "(" & IIf(Len([KURS1 İLAN NO] & "") = 0, "Null", [KURS1 İLAN NO]) & "," & _
                    IIf(Len([Metin703] & "") = 0, "Null", [Metin703]) & "," & _
                    IIf(Len([Metin705] & "") = 0, "Null", [Metin705]) & "," & Me.Kimlik & ");"
           
CurrentDb.Execute xSQL

öncelikle ilgilendiğiniz için teşekkür ederim.
verileri giriyoruz ama bu sefer tekrar mehmet aliyi açtiğimda o girdiğim veri gelmiyor gene boş geliyor üstteki mesela kurs1 tarihini girdiğimde tekrar açtiğimda o tarihi görüyorum.
yapmak istediğim şu her kurs tarihinin altinda ilan no alani olacak kurs tarihini girdiğimde ilan no da gireceğim ve o kişinin bilgileri lazım olduğunda açıp bakacağim.
1 2 3 4 5