AccessTr.neT

Tam Versiyon: Alt Tablolarda İşlemler
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2 3 4 5 6 7 8
Vba sayfasını aç,

[Resim: do.php?img=10530]

Resimde, üst menüdeki "Tools"u tıklayıp açılan menüde "References"i tıkla. Referans penceresi açılacaktır. Daha sonra alttaki resimdeki referansı ekle.

[Resim: do.php?img=10529]
Visual Basic For Application
Microsfot Access 15.0 Object Library
OLE Automation
Microsoft Office 15.0 Access database engine Object  Lİbrary
Microsfot ActiveX Data Objects 2,8 Library
Microsfot ActiveX Data Objects Recordset 2,8 Library

VBA yı açtım tool menüsünden referenceyi seçtim. Pencere başlığı "Reference-dlookup". İçinde tikli olanları yukarıya yazdım.
Ama 1. Sayfada 41. Satırda yazdığınız kodda  Me.Ödeme,Me.Yuvarlama gibi “Me.”li yerleri hata veriyor.  “Metod yada data member not found uyarısı veriyor.

DoCmd.RunSQL "INSERT INTO tblHarçlıklar (SıraID,YılID, Ay, Ekgösterge, Katsayı, Yuvarlama, Ödenen, 1Ödeme, 2Ödeme, 3Ödeme, 4Ödeme, 1Borç, 2Borç, 3Borç, 4Borç) VALUES (" & rsSQL1.Fields("SıraID") & ", '" & YilDegeri & "','"Me.akAy & "','" & Me.akEk & "', '" & Me.akKat & "', '" & Me.Yuvarlama & "', '" & Me.Ödenen [/font]& "', '" & Me.Ödeme1 & "', '" & Me.Ödeme2 & "', '" & Me.Ödeme3 & "', '" & Me.Ödeme4 & "','" & Me.Borc1 & "','" & Me.Borc2 & "','" & Me.Borc3 & "','" & Me.Borc4 & "')"
Kod içerisinde [/font] var mı?

Formda Me.Ödeme1, Me.Ödeme2 isminde denetim var mı?
Hayır onu cevap yazarken hata yerindeki yazıyı renkendirmek için yapmıştım. O da yazıyı renklendireceğine [/font] şekinde ekleme yapmış. Bu ekleme sadece mesajımdaki yazıda.
(17/10/2020, 13:09)berduş yazdı: [ -> ]yeni bir VT oluşturup import ile eskisinden yenisine aktarmayı deneyebilirsiniz, tabi referasları da yeniden eklemeniz gerekiyor ama bu durumda da kod sayfanızda formda olmayan alanlara atıf olduğu için hata verecektir: mesela insert sorgunuzda Me.Ödeme1, Ödeme2, Ödeme3.... alanlarına atıf var ama formunuzda o adda metin kutuları yok
belirttiğim gibi o nesneler yok o nedenle ya sorgunuz değişmeli yada ilgili nesneler eklenmeli.
(17/10/2020, 17:59)fenerli6774 yazdı: [ -> ]Ama 1. Sayfada 41. Satırda yazdığınız kodda  Me.Ödeme,Me.Yuvarlama gibi “Me.”li yerleri hata veriyor.  “Metod yada data member not found uyarısı veriyor.


Örneğinizin son halini ekleyin, inceleyip gerekli düzeltmeleri yapalım.
Sayfalar: 1 2 3 4 5 6 7 8