Skip to main content

AccessTr.neT


Tabloda Güncelleme

Tabloda Güncelleme

Çözüldü #1
Sayın Hocalarım; EK'teki dosyada tablodaki verileri güncellemek istiyorum. Ancak birtürlü başaramadım . Yardımlarınızı bekliyorum.
.rar guncelle.rar (Dosya Boyutu: 35,59 KB | İndirme Sayısı: 8)
Cevapla
Çözüldü #2
Bu soruya çözüm bulunabilmesi için deneme2s.html sayfasının olması gerekiyor. Lütfen bu dosyayı ekleyiniz.
Cevapla
Çözüldü #3
Hocam; unutmuşum. deneme2s.html sayfası Ekli halini ekledim. Yapmak istediğimin iternetten aldığım verileri tabloya aktarmak. Aktarırken eğer o kişinin verileri varsa o verileride güncellemek istiyorum. Verileri alabiliyorum ancak güncellemeyi yapamadım. Yardımlarınızı bekliyorum
.rar guncelle.rar (Dosya Boyutu: 56,96 KB | İndirme Sayısı: 21)
Son Düzenleme: 12/09/2012, 18:09, Düzenleyen: idrisy.
Cevapla
Çözüldü #4
guncelle fonksiyonunu aşağıdaki ile değiştir.

Function guncelle()
Dim strSQl As String
Dim rstkayit As ADODB.Recordset

strSQl = "SELECT * FROM tblygs "
Set rstkayit = New ADODB.Recordset
rstkayit.Open strSQl, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
With rstkayit
.Find "[tck]=" & Me![TcKimlik]
If Not rstkayit.EOF Then
.Fields("BabaAdi") = BabaAdi.Value
.Fields("AnaAdi") = AnaAdi.Value
.Fields("DogumYeri") = DogumYeri.Value
If Cinsiyet = 0 Then
.Fields("Cinsiyet") = "Kız"
ElseIf Cinsiyet = 1 Then
.Fields("Cinsiyet") = "Erkek"
End If
.Fields("DogumTarihi") = DogumTarihi.Value
.Fields("NufusIli") = NufusIli.Value
.Fields("NufusIlcesi") = NufusIlcesi.Value
.Fields("CiltNo") = CiltNo.Value
.Update
Else
.AddNew
.Fields("Adi") = Adi.Value
.Fields("Soyadi") = Soyadi.Value
.Fields("BabaAdi") = BabaAdi.Value
.Fields("AnaAdi") = AnaAdi.Value
.Fields("DogumYeri") = DogumYeri.Value
If Cinsiyet = 0 Then
.Fields("Cinsiyet") = "Kız"
ElseIf Cinsiyet = 1 Then
.Fields("Cinsiyet") = "Erkek"
End If
.Fields("DogumTarihi") = DogumTarihi.Value
.Fields("NufusIli") = NufusIli.Value
.Fields("NufusIlcesi") = NufusIlcesi.Value
.Fields("CiltNo") = CiltNo.Value
.Update
End If
End With
End Function
Cevapla
Çözüldü #5
ozanakkaya hocam çok teşekkür ederim. Eline sağlık.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task