Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
07/04/2014 11:53
Konu Sahibi
derbederali1971
Yorumlar
2
Okunma
1617
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

derbederali1971

Üye
Kullanici Avatari
Üye
17
5
20/02/2014
0
04/06/2014,09:59
Çözüldü 
Merhaba,

Ben 2 tablo yaptım Tablo1 ve tablo2. Ve Tablo1 veri girdiğim bir form yaptım aynı forma koyduğum bir metin kutusundaki değeride dahil Tablo2 ye yazmak için bir buton var ve tıklayınca yazıyor.Yapamadığım yazarken aynı Kkodu ile yaptığımda tablo2 ye yeni kayıt atıyor ben aynı kKodu olduğunda eski kaydı güncellesin istiyorum bir türlü yapamadım.
İlginiz için teşekkürler.


Ek Dosyalar
.zip   test.zip (Dosya Boyutu: 23,02 KB / İndirme Sayısı: 6)
Cevapla

ozanakkaya

sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.789
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,13:38
Çözüldü 
ADO ile kayıt ekleme, güncelleme, silme ve yürüyen bakiye örneği linkindeki kodu örneğinize uyguladım. Veritabanına 2 ado referansı ekledim.

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
strSQL = "SELECT * FROM Tablo2 "
    Set rstkayit = New ADODB.Recordset
    rstkayit.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
        With rstkayit
        .Find "[KayitNo]=" & "'" & Me![KNo] & "'"
            If Not rstkayit.EOF Then
                .Fields("KayitNo") = Me.KNo
                .Fields("ad") = Me.ad
                .Fields("soyad") = Me.soyad
                .Fields("KSoyad") = Me.KSoyad
                MsgBox ("Tablodaki " & Me.ad & " " & Me.soyad & " isimli kişiye ait veri güncellendi")
                
                .Update
             Else
                .AddNew
                .Fields("KayitNo") = Me.KNo
                .Fields("ad") = Me.ad
                .Fields("soyad") = Me.soyad
                .Fields("KSoyad") = Me.KSoyad
                MsgBox ("Tabloya " & Me.ad & " " & Me.soyad & " isimli kişi eklendi")
                .Update
             End If
        End With


resim


Ayrıca Sorgu yardımı linkindeki sorunuza geri bildirimde bulununuz.


Ek Dosyalar
.rar   test_sld.rar (Dosya Boyutu: 21,13 KB / İndirme Sayısı: 17)
Cevapla

derbederali1971

Üye
Kullanici Avatari
Üye
17
5
20/02/2014
0
04/06/2014,09:59
Çözüldü 
Çok teşekkür ederim. Bu örnek çok işime görecek. Bilginize sağlık.


Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Kayıt Silme Hatası burhanb 6 172 08/09/2017, 14:01 burhanb
Çözüldü Tablo İlişkilendirme tolgooo17 3 175 07/09/2017, 00:05 ozanakkaya
Çözüldü Formdaki Kaydı Farklı Formda Yeniden Kayıt U.ALTUN 7 331 21/08/2017, 12:04 direnist
Çözüldü Döneme Göre Kayıt Etme haziran4 5 200 17/08/2017, 08:22 haziran4
Çözüldü Kayıt Sayısı metin02 7 254 13/08/2017, 11:05 metin02

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.