Skip to main content

AccessTr.neT


Sql Update Ve Delete Komutları Nasıl Kullanılır

Sql Update Ve Delete Komutları Nasıl Kullanılır

Çözüldü #1
Selamlar.

Çok incelememe rağmen anlayamadığım ve yapamadığım için yeni konu açtım.

Tabloya Sql insert komutuyla şartlı olarak kayıt yapabildim.

Yaptığım kayıtları alt formdan form üzerinde ki ilgili yerlere çekebildim, ama düzeltme silme işlemlerini Sql kodları kullanarak yapamadım.

Teşekkürler.
.rar sql_update_delete.rar (Dosya Boyutu: 30,06 KB | İndirme Sayısı: 3)
Cevapla
#2
kullandığınız yöntem hatalı bence
sizin yaptığınız şey altformdan çektiğiniz değerleri anaformdaki ilk kayda atamak bu nedenle kaçıncı kaydı seçerseniz seçin o kaydın değeri doğrudan ilk kaydı değiştiriyor
ayrıca anaform her açıldığında boş bir yeni kayıt oluşturuyor. bu nedenle ya anaformun tablo ile bağlantısı kesilmeli sonra altfomdan üst forma öyle aktarılmalı yada açılışta yeni kayıt olarak değil ilk kayda gitmeli.
çift tıklama olayı aşağıdaki gibi düzenlenebilir ama bu durumda da kayıt güncellendikten sonra olayı ile kontrol sağlanmazsa doğrudan her değişiklik kaydedilir
If MsgBox("DÜZENLEMEK VEYA SİLMEK İÇİN KAYIT ÇAĞIRDINIZ EMİN MİSİNİZ ??", vbQuestion + vbYesNo) = vbYes Then
Me.Parent.Recordset.FindFirst "Kimlik=" & Me.Kimlik
End If
silme kodu
    DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdDeleteRecord
Cevapla
#3
(28/10/2019, 21:37)berduş yazdı: kullandığınız yöntem hatalı bence
sizin yaptığınız şey altformdan çektiğiniz değerleri anaformdaki ilk kayda atamak bu nedenle kaçıncı kaydı seçerseniz seçin o kaydın değeri doğrudan ilk kaydı değiştiriyor
ayrıca anaform her açıldığında boş bir yeni kayıt oluşturuyor. bu nedenle ya anaformun tablo ile bağlantısı kesilmeli sonra altfomdan üst forma öyle aktarılmalı yada açılışta yeni kayıt olarak değil ilk kayda gitmeli.
çift tıklama olayı aşağıdaki gibi düzenlenebilir ama bu durumda da kayıt güncellendikten sonra olayı ile kontrol sağlanmazsa doğrudan her değişiklik kaydedilir
    If MsgBox("DÜZENLEMEK VEYA SİLMEK İÇİN KAYIT ÇAĞIRDINIZ EMİN MİSİNİZ ??", vbQuestion + vbYesNo) = vbYes Then
Me.Parent.Recordset.FindFirst "Kimlik=" & Me.Kimlik
    End If

Haklısınız olmadı, biraz daha çalışayım değişik bir çözüm bulmaya çalışayım.

Tekrar yazarım.

Teşekkürler.
Cevapla
#4
yukardaki kodlar işe yaramadı mı?
hem silme hem de kayda gitme kodları?
Cevapla
#5
(28/10/2019, 21:53)berduş yazdı: yukardaki kodlar işe yaramadı mı?
hem silme hem de kayda gitme kodları?


Kod:
Private Sub Kimlik_DblClick(Cancel As Integer) 'ALT FORMDA KİMLİK ALANINI ÇİFT TIKLAYINCA
    If MsgBox("DÜZENLEMEK VEYA SİLMEK İÇİN KAYIT ÇAĞIRDINIZ EMİN MİSİNİZ ??", vbQuestion + vbYesNo) = vbYes Then
    Me.Parent.Recordset.FindFirst "Kimlik=" & Me.Kimlik
End If
   
End Sub

Altformun kimlik alanın çift tıklanma olay yordamı yukardaki gibi,
çalışmadı
Cevapla
#6
ben denediğimde 2si de çalışmıştı! eki inceler misiniz?
.rar sql_update_delete_hy.rar (Dosya Boyutu: 35,33 KB | İndirme Sayısı: 4)
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task