Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
18/01/2019 17:11
Konu Sahibi
zaferlacin
Yorumlar
9
Okunma
381
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
zaferlacin

zaferlacin

Aktif Üye
56243
Za.... La....
 50
 18
 70
 11/08/2013
0
 Balıkesir
 Emekli
 Ofis 2016 64 Bit
 Dün,21:14
özür diliyorum çalıştı hocam hatanın ne olduğunu siz anladınız  Ozur




ozanakkaya

ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 482
 12.116
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Dün,20:59
Kodun tamamını aşağıdaki ile değiştirerek dene,

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Dim GVeriVarmi As Integer

GVeriVarmi = Nz(DCount("[kimlik]", "Tablo2", "[adı]&"" ""&[soyadı]='" & Me.Liste53.Column(1) & " " & Me.Liste53.Column(2) & "'"), 0)

If GVeriVarmi > 0 Then

    If MsgBox(Me.Liste53.Column(1) & " " & Me.Liste53.Column(2) & " isimli şahsın bilgileri silinsin mi?", vbYesNo) = vbYes Then
    
        DoCmd.SetWarnings False
        DoCmd.RunSQL "DELETE [adı] & '-' & [soyadı] AS silinecekveri FROM Tablo2 WHERE ((([adı] & ' ' & [soyadı])='" & Me.Liste53.Column(1) & " " & Me.Liste53.Column(2) & "'));"
        DoCmd.SetWarnings True
        
    Else
    
        MsgBox ("Silme İşlemi İptal Edildi")
        
    End If

Else

    MsgBox (Me.Liste53.Column(1) & " " & Me.Liste53.Column(2) & " isimli şahıs bulunamadı")

End If


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

...........
ozanakkaya

ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 482
 12.116
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Dün,20:59
Ayrıca lütfen Profil Bilgilerinizi güncelleyiniz.


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

zaferlacin

zaferlacin

Aktif Üye
56243
Za.... La....
 50
 18
 70
 11/08/2013
0
 Balıkesir
 Emekli
 Ofis 2016 64 Bit
 Dün,21:14
tek kelime süper teşekkür ederim hocam




...........

Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Alt Form Kayıt most 6 259 31/05/2019, 09:12
Son Yorum: most
Çözüldü Access İle Basit Kayıt Programı musti35 4 233 27/05/2019, 17:07
Son Yorum: musti35
Çözüldü Kayıt Silindiğinde Silinenler Tablosuna Aktarma haziran4 4 225 20/05/2019, 11:58
Son Yorum: haziran4
Çözüldü Mükerrer Kayıt Sorunu Fatih34 5 388 13/05/2019, 16:08
Son Yorum: halily
Çözüldü Açılır kutudan kayıt girişi yapmak yuppi23 4 1.803 24/04/2019, 15:57
Son Yorum: Aşkın Güngör

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.