(06/03/2021, 16:41)berduş yazdı: Çalışmanızı ekleyebilirsinizek te inceleyebilirsiniz.
Ado İle Formlar Arası Veri Aktarımı.
görebildiğim kadarıyla 3 sorun vardı
1 - ADODB.Recordset kullanabilmek için referanslardan Microsoft ActiveX Data Object x.x Library eklenmeli
2 - form modülünde Option Explicit kullanıldığı için her değişken önceden tanımlanmalıdır siz tanımlamamışsınız
mesela FrmRprİzinler formundaki Izin_Listesi listesinin çift tıklanma olayında FrmAdi değişkeni kullanılmış ama kullanmadan önce tanımlanmamış
çift tıklanma olayına Dim FrmAdi As String satırı da eklenmeliydi
3 - siz .TxHaftaSonu = rs("HaftaSonu") yazmışsınız ama Tbl_İzinler tablosunda HaftaSonu alanı yok İzinHaftaSonu alanı var orayı değiştirmelisiniz
.TxHaftaSonu = rs("İzinHaftaSonu") olmalı
siz bu değişiklikleri yapın sorun devam ederse dosyanızı değişiklikler yapılmış halde yüklerim.
Not: ölümcül hatalar konusu da incelemenizi öneririm mesela İ-büyük i harfi gibi Türkçe karakterler, alan ve tablo adında boşluk vs vs bir çok hatalı kullanım bazen çok ciddi sorunlara sebep olabiliyor
1 - ADODB.Recordset kullanabilmek için referanslardan Microsoft ActiveX Data Object x.x Library eklenmeli
2 - form modülünde Option Explicit kullanıldığı için her değişken önceden tanımlanmalıdır siz tanımlamamışsınız
mesela FrmRprİzinler formundaki Izin_Listesi listesinin çift tıklanma olayında FrmAdi değişkeni kullanılmış ama kullanmadan önce tanımlanmamış
çift tıklanma olayına Dim FrmAdi As String satırı da eklenmeliydi
3 - siz .TxHaftaSonu = rs("HaftaSonu") yazmışsınız ama Tbl_İzinler tablosunda HaftaSonu alanı yok İzinHaftaSonu alanı var orayı değiştirmelisiniz
.TxHaftaSonu = rs("İzinHaftaSonu") olmalı
siz bu değişiklikleri yapın sorun devam ederse dosyanızı değişiklikler yapılmış halde yüklerim.
Not: ölümcül hatalar konusu da incelemenizi öneririm mesela İ-büyük i harfi gibi Türkçe karakterler, alan ve tablo adında boşluk vs vs bir çok hatalı kullanım bazen çok ciddi sorunlara sebep olabiliyor
malesef düzenlemeleri yaptım olmadı. Microsoft ActiveX Data Object x.x Library eklemeye çalışıyorum.
Vba editörünü açıp orada referanslar menüsüne girerseniz ilgili referansa ulaşabilirsiniz.
https://resim.accesstr.net/do.php?img=10784
https://resim.accesstr.net/do.php?img=10784
oraya giriyorum fakat öle bişi yok indirmek için araştırma yaptım hiç bir link istediğimi vermedi. var mı öyle bir link
ben Access içinde veritabanı araçları + eklentiler + eklenti yöneticisi içinde arama yapıyrum.
ben Access içinde veritabanı araçları + eklentiler + eklenti yöneticisi içinde arama yapıyrum.
Son Düzenleme: 07/03/2021, 17:42, Düzenleyen: yahzee_61.
Konuyu Okuyanlar: 1 Ziyaretçi