Hocam bütün metin kutularını ilişkisiz yapmışsınız.  Metin kutuları ilişkisiz olduğu için tablolara aktarma yapamıyorum.


Bu kodlarla iki ayrı tabloya aktarma yapıyordum.  Aşağıdaki kodlar ilişkisiz metin kutularına göre düzenlenebilir mi.

Dim rT As New ADODB.Recordset



rT.Open "GeciciSatis", CurrentProject.Connection, adOpenKeyset, adLockOptimistic







rT.AddNew

rT!StokNo = Me.StokNo

rT!SatisTarihi = Me.SatisTarihi

rT!SatisUrunAdi = Me.SatisUrunAdi

rT!SatisAdedi = Me.SatisAdedi

rT!StokAdedi = Me.StokAdedi

rT!SatisFiyati = Me.SatisFiyati

rT!ToplamFiyati = Me.ToplamFiyati

'rT!İade = Me.İade





rT.Update

rT.Close