Skip to main content

AccessTr.neT


Form Ve Rapor Kayıt Kaynağının Kullanımı

Form Ve Rapor Kayıt Kaynağının Kullanımı

#5
Merhaba, siz konuyu taşımışsınız gerçi ama, aynı çalışma üzerinden yürüdüğüm için son sözettiğiniz fonksiyon tanımlayıp denediğimde en son 

"Run - time error '2102' Özellik sayfasında ya da bir makroda girdiğiniz form adı, 'SablonForm' yanlış yazılmış veya varolmayan bir forma başvuruyor. " vba 

hatası alıyorum.

Modül:
Public Sub KytKaynAyari(ByVal MvctForm As Access.Form, ByVal SablonForm As String)
Dim SqlStr, SqlStrRpr As String
' formun kayıt kaynağının ayarlanması
SqlStr = " SELECT TACALISANKAYDI.*, TRADYASYON" & MvctForm.AclRMynSec & ".* FROM TACALISANKAYDI LEFT JOIN TRADYASYON" & MvctForm.AclRMynSec & _
        " ON TACALISANKAYDI.KIMNO = TRADYASYON" & MvctForm.AclRMynSec & ".KIMNO"
SqlStrRpr = SqlStr & " WHERE (((TACALISANKAYDI.KIMNO)=[Formlar]![SablonForm]![mtn_KimNo]))"

DoCmd.OpenForm "SablonForm"
Forms!SablonForm.RecordSource = SqlStr
DoCmd.OpenForm "SablonForm", , , "TACALISANKAYDI.KIMNO=" & MvctForm.LstKayitSorg
DoCmd.Close acForm, MvctForm.Name

'' rapor kayıt kaynağı ayarlama kod bloğu
CurrentDb.QueryDefs("SqlRAPRADMYNSYF").SQL = SqlStrRpr 'burada raporların kullandığı ortak sorgunun yapısı değiştirilmiştir
End Sub

FVERIGIRIS formundaki radyasyon seçimi tıklanıldığında olayı:
Kod:
Call KytKaynAyari(Me, "FRADYASYONMYN")
Dilerseniz yeni konu açayım.  Teşekkürler.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
RE: Form Ve Rapor Kayıt Kaynağının Kullanımı - Yazar: mgunes - 09/06/2020, 22:05