Skip to main content

AccessTr.neT


formdan tabloya veri girme

formdan tabloya veri girme

Çözüldü #1
Arkadaşlar EK teki dosyada hazırladığım formdan tabloya veri girmek istiyorum, ancak birtürlü başaramadım, hep hata veriyor. Nasıl düzeltebilirim, nerede yanlış yaptığımı bulamadım. Yardımlarınızı bekliyorum.
.rar kmaras.rar (Dosya Boyutu: 18,96 KB | İndirme Sayısı: 26)
Cevapla
Çözüldü #2
Kodunuzu aşağıdaki gibi düzeltiniz.


Function ekle()
Dim rst As DAO.Recordset

Set rst = db.OpenRecordset("SELECT * FROM dos;")
rst.AddNew
rst.Fields("ID") = IIf(Nz(DMax("ID", "dos") + 1, 0) = 0, 1, Nz(DMax("ID", "dos") + 1, 0))
rst.Fields("tcno") = Left(Me.tcno, 11)
rst.Fields("adı") = Me.adı
rst.Fields("soyadı") = Me.soyadı
rst.Fields("adısoyadı") = Me.adı & " " & Me.soyadı
rst.Fields("babaadı") = Me.babaadı
rst.Fields("dogumyılı") = Me.dogumyılı
rst.Fields("yıl") = Me.yıl
rst.Fields("dosyano") = Me.dosyano
rst.Update
rst.Close
db.Close
End Function
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)

+rep Yollar biter Access bitmez. +rep
Cevapla
Çözüldü #3
Sayın Yandemir; teşekkür ederim
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da