Kaydet butonu ile kaydetmek

[Orion1]

Merhaba.
Bir tane kaydet butonu ekledim.
Aşağıdaki alana yanındaki nesneden veriyi kaydetmek istiyorum.

NOT:SIRA adlı alan Otomatik sayı biçimindedir.

Teşekkür ederim.
Alan nesne
--------- -----------
Bolum <==== Açılan Kutu12
Besin <==== Besin
Miktar <===== Miktar
Kalori <======= Kalori

 

[modalı]

Sayın Evren Gizlen,

Formunuzu ilişkilendirmeden mi kayıt etmek istiyorsunuz?

Kaydet düğümesini neden kullanmak istiyorsunuz?


İyi çalışmalar

 

[Orion1]

Sayın Evren Gizlen,

Formunuzu ilişkilendirmeden mi kayıt etmek istiyorsunuz?

Kaydet düğümesini neden kullanmak istiyorsunuz?


İyi çalışmalar

Sayın modalı üstadım.Nesneleri ilişkilendirmeden sadece kaydet butonu ile kaydetmek istiyorum.
İleri aşamada en altta ki numaratörü mümkünse gizleyecem.

 

[beab05]

Merhabalar;

Evren Bey, tüm bunlardan önce tablo tasarımları ve ilişkiler üzerinde dursanız? Emin olun birçok problemin kendiliğinden halledildiğini göreceksiniz ilerleyen aşamalarda.. Daha sonra da SQL üzerinde durulmalı diye düşünüyorum.. Doğru tablo tasarımları ve SQL, tüm VT sistemlerinde öncelikle bilinmesi gereken en önemli kısım bence..

 

[Orion1]

Merhabalar;

Evren Bey, tüm bunlardan önce tablo tasarımları ve ilişkiler üzerinde dursanız? Emin olun birçok problemin kendiliğinden halledildiğini göreceksiniz ilerleyen aşamalarda.. Daha sonra da SQL üzerinde durulmalı diye düşünüyorum.. Doğru tablo tasarımları ve SQL, tüm VT sistemlerinde öncelikle bilinmesi gereken en önemli kısım bence..

Üstadım şu butonla kaydet işini halldelim dediklerinizede bakacam.

 

[modalı]

Sayın Evren Gizlen,

En basit kaydetme kodu şöyle:

Dim rs As New ADODB.Recordset
rs.Open "Table1", CurrentProject.Connection,adOpenKeyset, adLockOptimistic

rs.AddNew
     rs("Bolum") = Me.Açılan_Kutu12
     rs("Besin") = Me.Besin
     rs("Miktar") = Me.Miktar
     rs("Kalori") = Me.Kalori
rs.Update

rs.Close

Table1 yerine tablonuzun adını yazmanız kâfi. Ancak bu kodlara hata yakalama, boş alan varsa kaydetmeme, ileti kutusuyla bilgi verme gibi eklentiler yapılabilir.

İyi çalışmalar

 

[Orion1]

Sayın modalı teşekkür ederim.
Kaydet işlemi oldu.

 

[beab05]

Bu kaydetme değil ama, kayıt ekleme..

 

[Orion1]

Bu kaydetme değil ama, kayıt ekleme..

Merhaba.
Bende zaten kayıt eklemeyi sormuştum.Ama kaydetme demişim yanlışlıkla.

 

[Orion1]

Merhaba.
Kayıt ekle durumunu yeni tabloyu sihirbazla oluşturduktan sonra,Ayrı bir formdamı yapmalıyım?
Çünkü Buradan liste kutusundan kullanıcı bir satır seçebliri ve kayıtı değiştirebilir.Ben butonla yeni kayıt ekle diyene kadar.Veya sizin öneriniz nedir.
Nasıl kayıt eklemeliyim.Kayıt eklemek için aşağıdaki kodları kullanıyorum.
Teşekkür ederim.

Private Sub Kaydet_Click()
On Error GoTo Err_Kaydet_Click
Dim rs As New ADODB.Recordset
If Nz(Açılan_Kutu12) = "" Then
    MsgBox "Bölüm boş olamaz." & vbLf & "Bölüm alanına Yeni kayıt girmek için Bir bölüm yazınız..!!", vbCritical, "UYARI"
    Açılan_Kutu12.SetFocus
    Exit Sub
End If
rs.Open "Kalori", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rs.AddNew
     rs("Bolum") = Me.Açılan_Kutu12
     rs("Besin") = Me.Besin
     rs("Miktar") = Me.Miktar
     rs("Kalori") = Me.Kalori
rs.Update

rs.Close
    
Exit_Kaydet_Click:
    Exit Sub

Err_Kaydet_Click:
    MsgBox Err.Description
    Resume Exit_Kaydet_Click
    
End Sub

 

[modalı]

Sayın Evren Gizlen

Bu düğme ile kaydetmekteki ısrarınızı anlamış değilim.

Neden ille kaydet ile kayıt eklemek istiyorsunuz. Access de buna gerek yok.

 

[Orion1]

Sayın Evren Gizlen

Bu düğme ile kaydetmekteki ısrarınızı anlamış değilim.

Neden ille kaydet ile kayıt eklemek istiyorsunuz. Access de buna gerek yok.

Formdan nasıl yeni kayıt eklenceğini konusunda bir biligm yok.Excelde öyle yapıyorduk diye yapıyorum.Açıklarsanız memnun olurum.
Teşekkür ederim.

 

[modalı]

Yaklaşık bir haftadır bunu açıklamaya çalışıyorum her mesajımda bu var.

Kayıt eklemek için veya değştirmek için veya silmek için accessde ayrıca bir düğme eklenmiyor. ilişkili form açıldığında:

Bulunduğunuz kaydın herhangi bir alanını değiştirirseniz otomatik olarak tablodada değişiyor.

Kayıt sil düğümesi eklerseniz ve ilgili kaydın üsdünde iken o düğmeye basarsanız kayıt siliniyor.,

Yeni kayıt eklemek için ya aşağıda kayıt numaralarını gösteren düğmelerden * basıp temiz bir kayıt oluşturacaksınız yada yenikayıt düğmesi ekleyip temiz boş ve kayıtların en sonunda yeni bir kayıt oluşacaktır.

İyi çalışmalar

 

[Orion1]

Yaklaşık bir haftadır bunu açıklamaya çalışıyorum her mesajımda bu var.

Kayıt eklemek için veya değştirmek için veya silmek için accessde ayrıca bir düğme eklenmiyor. ilişkili form açıldığında:

Bulunduğunuz kaydın herhangi bir alanını değiştirirseniz otomatik olarak tablodada değişiyor.

Kayıt sil düğümesi eklerseniz ve ilgili kaydın üsdünde iken o düğmeye basarsanız kayıt siliniyor.,

Yeni kayıt eklemek için ya aşağıda kayıt numaralarını gösteren düğmelerden * basıp temiz bir kayıt oluşturacaksınız yada yenikayıt düğmesi ekleyip temiz boş ve kayıtların en sonunda yeni bir kayıt oluşacaktır.

İyi çalışmalar

Tamam üstadım konu anlaşıldı.
Ben excel mantığı ile gidiyorum.Alışkanlık işte.
Accsess mantığı daha başka oluyormuş.
Teşekkür ederim.