08/04/2010, 10:38
arkadaşlar ; FORM içerisinde kullanılan QUERY'nin parametrelerini Vba kodları vasıtası ile belirlemeye çalışıyorum. Çünkü FORM içerisindeki QUERYnin hangi parametrelere göre çalışacağı değişken ve ben bu değerleri Vba içerisinde hesaplayabiliyorum..
Modül içerisinde parametre değerlerini belirledikten sonra QUERY'ye parametre değerlerini atamak istiyorum.
Aşağıdakine benzer bir kod ile sorguyu çalıştırabiliyoruz ancak SORGUyu form içerisinde çalıştırdığımızda bu kodları kullanmam mümkün olmuyor.
Private Sub Form_Load()
Dim db As DAO.Database
Set db = CurrentDb
Dim param As QueryDef
Set param = db.QueryDefs!EFF_Query1
param.Parameters![Period1] = Period1 'VBA kodları içerisinde hesaplanan bir değişken
param.Parameters![Period2] = Period2 ' Vba kodları içerisinde hesaplanan bir değişken
param.Parameters![HatNedir] = HatNedir 'VBA kodları içerisinde hesaplanan bir değişken
..
...
Modül içerisinde parametre değerlerini belirledikten sonra QUERY'ye parametre değerlerini atamak istiyorum.
Aşağıdakine benzer bir kod ile sorguyu çalıştırabiliyoruz ancak SORGUyu form içerisinde çalıştırdığımızda bu kodları kullanmam mümkün olmuyor.
Private Sub Form_Load()
Dim db As DAO.Database
Set db = CurrentDb
Dim param As QueryDef
Set param = db.QueryDefs!EFF_Query1
param.Parameters![Period1] = Period1 'VBA kodları içerisinde hesaplanan bir değişken
param.Parameters![Period2] = Period2 ' Vba kodları içerisinde hesaplanan bir değişken
param.Parameters![HatNedir] = HatNedir 'VBA kodları içerisinde hesaplanan bir değişken
..
...