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

Derecelendirme: 0/5 - 0 oy
zaferlacin

zaferlacin

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



ozanakkaya

ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 483
 12.101
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
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
 483
 12.101
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
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
 17
 58
 11/08/2013
0
 Balıkesir
 Emekli
 Ofis 2016 64 Bit
 Dün,00:24
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 181 31/05/2019, 09:12
Son Yorum: most
Çözüldü Access İle Basit Kayıt Programı musti35 4 166 27/05/2019, 17:07
Son Yorum: musti35
Çözüldü Kayıt Silindiğinde Silinenler Tablosuna Aktarma haziran4 4 192 20/05/2019, 11:58
Son Yorum: haziran4
Çözüldü Mükerrer Kayıt Sorunu Fatih34 5 337 13/05/2019, 16:08
Son Yorum: halily
Çözüldü Açılır kutudan kayıt girişi yapmak yuppi23 4 1.757 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.