Skip to main content

AccessTr.neT


Etiketler
Yazar: farkli88 - Cevaplar: 6 - İzleme: 3008
Raporda Fazladan Sayfa Veriyor
Merhabalar. AnaFrm adlı form dosyasında girdiğim her satır için istemediğim halde IstekRpr2 raporunda fazladan sayfa basıyor. Sorguda yada başka bir yerde hata yaptım galiba ama çıkamadım işin içinden. Rapor mantığında yaptığım bir yanlışlık varmı, özellikle raporun içine eklediğim altrapor konusunda mantık hatası yapmış olabilirmiyim bilmiyorum? Amacım AnaFrm formunda girdiğim satırların raporunu almaktı sadece.

Ek Dosyalar
 taşınır .rar(71.21 KB)

Yazar: siyahca - Cevaplar: 6 - İzleme: 3013
Fazladan Kayıt Oluşturma
Herkese merhabalar,

tablomdaki kayıtlı olan bir veriyi çağırdığımda ve değişiklik yaptığımda kaydet butonunu tıkladığımda değişikliği kaydediyor.Ancak birde yeni bir kayıt daha ekliyor neden olabilir?

Detaylı olarak anlatmak gerekir ise ;

örnek veritabanını açtığımızda ,

1.New record butonunu tıklıyorum
2. material code kutusuna 014360286 kodunu yazıp yanındaki aramaya tıklıyorum, (sonrakini bul butonunuda tıklıyorum)

3.şimdi aradığım kayıt geldi.ben burda yani gelen kayıt bilgil
Yazar: Berkt - Cevaplar: 4 - İzleme: 3460
VBA da Ekle komutu fazladan satır atıyor.
Şu kodlar ile düzenle, yeni kayıt temizle kapat komutlarını kullandım ancak ekle dedikten sonra veriyi giriyor ve sonrasına boş bir tane daha veri giriyor. Sıkıntı nerede bakabilir misiniz ? Ve Temizle komutunda ise çalışıyor ancak komple veridende temizliyor. Genel olarak şu kodlara bakabilir misiniz ?

İyi çalışmalar.

[vb]Option Compare Database

Private Sub KatDuzenle_Click()

If Not (Me.SubKategori.Form.Recordset.EOF And Me.SubKategori.Form.Recordset.BOF) Then
With Me.S
Yazar: tarkanaykın - Cevaplar: 9 - İzleme: 318
Sorguda 'fazladan )'hatası
arkadaşlar, kolaylıklar diliyorum herkese, lütfen, rica etsem bu konuda yardımcı olur musunuz?

For i = 1 To Me.listbox1.ListCount
Dim a, b As Integer


Dim cm, cn As String
cm = Me.listbox1.Column(1, i)

a = Dlookup ("Kimlik", "mkys", "mkysTkl='" & cm & "'")



DoCmd.RunSQL "delete mkys.* from nucleus where ((mkys.Kimlik)=" & a & ")" burada hata veriyor
Task