Skip to main content

AccessTr.neT


Tablodan Satır Silme

Tablodan Satır Silme

Çözüldü #13
durum alanında Teslim edildi yazınca görünmeyecek. üç durum var "beklemede" "yolda" ve "teslim edildi" teslim edildikten sonra gösterilmesine gerek yok..tabloda gösterilsin..ancak alt formda gösterilmesin..
magmar, 02-10-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #14
Buyrun sanırım bu şekilde olacak.

Form üzerinde Durumu alanı gönderildi seçerseniz ilgili kaydı siliyor Teslimedildi seçerseniz okaydı altform da göstermiyor.
.rar Veritabanı2.rar (Dosya Boyutu: 46,73 KB | İndirme Sayısı: 25)
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla
Çözüldü #15
Sn Puletin hocam, sanırım arkadaşın istediği budur. Ellerinize sağlık..
Cevapla
Çözüldü #16
(24/02/2010, 23:07)ercansahin yazdı: Sn Puletin hocam, sanırım arkadaşın istediği budur. Ellerinize sağlık..

Bende öle umuyorum ama galiba işe yaramadı.Cevap gelmedi henüz
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla
Çözüldü #17
sevgili puletin ve ercan şahin

ilginiz için gerçekten çok minnettarım..

ancak ekteki dosyada herhangi bir kod veya baska bisey goremedim.. sadece bazı kısımlarda Teslimedildi yazıyor. herhangi bir değişiklik yok.. 2007-2003 farkından mıdır bu?
magmar, 02-10-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #18
etkin_siparisler formunu tasarım modunda açtıktan sonra kod bölümüne geçiniz.. Burada;
Kod:
Private Sub Durum_AfterUpdate()
If Me.Durum = "Gönderildi" Then
      
    cevap = MsgBox("Seçilen kayıt silinecek devam edilsin mi?", vbYesNo + vbQuestion, "DİKKAT")
    If cevap = vbYes Then
    
        DoCmd.SetWarnings False
        DoCmd.RunCommand acCmdDeleteRecord
        DoCmd.SetWarnings True
        ElseIf cevap = vbNo Then
        MsgBox ("Kayıt Silinmedi")
        End If
    End If

If Me.Durum = "Teslimedildi" Then
      
   MsgBox ("Seçilen kayıt gizlenecek "), vbInformation, "DİKKAT"
    
       DoCmd.Requery
        Else
    End If

End Sub

kodunu göreceksiniz..
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task