Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Sil Komutu

m_demir
m_demir
Access Cevaplanmış Soruları
8
542

Sil Komutu

Çözüldü #1
m_demir
Aktif Üye
m_demir
Bul
Aktif Üye
Adı Soyadı: De.... Yı....
Yaşı: 62
Konum: -
Ofis Versiyonu: Ofis 2010 64 Bit
Son Oturumu: 21/03/2021,02:32
Yorumları: 591
Konuları: 118
Kayıt Tarihi: 03/06/2016
Rep Puanı: 0
Mesleğiniz: Grafiker
Merhaba Arkadaşlar.

1- Eklediğim uygulamada Personel bilgileri Formunda sileceğim müşteriyi seçip sildikten sonra metin kutularının temizlenmesi için kod olmasına rağmen metin kutuları temizlenmiyor. Bir sonraki müşterinin bilgileri metin kutularına geliyor.

2- PersonelBilgileri Formundaki sil butonuna eklediğim kodlar sil işlemini yapmıyor.

Bu konularda yardımlarınıza ihtiyacım var yardımlarınız için şimdiden teşekkürler.
.rar Per.Takip-5.rar (Dosya Boyutu: 113,77 KB | İndirme Sayısı: 2)
Cevapla
#2
C*e*l*o*y*c*e
Uzman
C*e*l*o*y*c*e
Bul
Uzman
Adı Soyadı: Ce.... Ya....
Konum: Ankara
Ofis Versiyonu: Ofis 2010 32 Bit
Son Oturumu: Bugün,03:05
Yorumları: 3.391
Konuları: 75
Kayıt Tarihi: 29/10/2008
Rep Puanı: 1.014
Mesleğiniz: Yazılım
Visual Basic Code 
Dim sifre As String
sifre = "99"
If InputBox("Lütfen Silme Şifresini Giriniz") = sifre Then
    Exit Sub
    End If
          
    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
Form_PersonelBilgileri.Refresh



bu kodu şöyle değiştirip dene 

Visual Basic Code 
Dim sifre As String
sifre = "99"
If InputBox("Lütfen Silme Şifresini Giriniz") = sifre Then
  
    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
  Exit Sub
    End If
Form_PersonelBilgileri.Refresh
Son Düzenleme: 01/04/2020, 18:03, Düzenleyen: C*e*l*o*y*c*e.
Cevapla
#3
m_demir
Aktif Üye
m_demir
Bul
Aktif Üye
Adı Soyadı: De.... Yı....
Yaşı: 62
Konum: -
Ofis Versiyonu: Ofis 2010 64 Bit
Son Oturumu: 21/03/2021,02:32
Yorumları: 591
Konuları: 118
Kayıt Tarihi: 03/06/2016
Rep Puanı: 0
Mesleğiniz: Grafiker
Çok teşekkürler Hocam.

Hocam Kodu değiştirdim. PersonelBilgileri Formunda silme yapmıyor.
.rar Per.Takip-6.rar (Dosya Boyutu: 116,36 KB | İndirme Sayısı: 2)
Son Düzenleme: 01/04/2020, 19:26, Düzenleyen: m_demir.
Cevapla
#4
C*e*l*o*y*c*e
Uzman
C*e*l*o*y*c*e
Bul
Uzman
Adı Soyadı: Ce.... Ya....
Konum: Ankara
Ofis Versiyonu: Ofis 2010 32 Bit
Son Oturumu: Bugün,03:05
Yorumları: 3.391
Konuları: 75
Kayıt Tarihi: 29/10/2008
Rep Puanı: 1.014
Mesleğiniz: Yazılım
Dim sifre As String
sifre = "99"
If InputBox("Lütfen Silme Şifresini Giriniz") = sifre Then
 
         
    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
   

Me.Liste.Requery
Me.Tarihi.SetFocus
'DoCmd.GoToRecord , , acNewRec
'Form_PersonelBilgileri.Refresh

   
    Else
    Exit Sub
    End If



bununla değiştirin,yeni kayıt yaptıgı için sayfayı boşaltıyor
Cevapla
#5
accessman
accessman
Bul
Kıdemli Üye
Adı Soyadı:
Konum: Denizli
Ofis Versiyonu: Ofis 2003
Son Oturumu: 12/01/2021,20:07
Yorumları: 4.395
Konuları: 900
Kayıt Tarihi: 31/10/2008
Rep Puanı: 434
Visual Basic Code 
Dim sifre As String
    sifre = "99"
    If InputBox("Lütfen Silme Şifresini Giriniz") = sifre Then
     
        DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
        DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
        
        Me.Liste.Requery
        Me.tarihi.SetFocus
        'DoCmd.GoToRecord , , acNewRec
        'Form_PersonelBilgileri.Refresh
    Else
        Exit Sub
    End If
buradaki 
Visual Basic Code 
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
kodlar ne işe yarıyor
Cevapla
#6
C*e*l*o*y*c*e
Uzman
C*e*l*o*y*c*e
Bul
Uzman
Adı Soyadı: Ce.... Ya....
Konum: Ankara
Ofis Versiyonu: Ofis 2010 32 Bit
Son Oturumu: Bugün,03:05
Yorumları: 3.391
Konuları: 75
Kayıt Tarihi: 29/10/2008
Rep Puanı: 1.014
Mesleğiniz: Yazılım
sil kodu
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da