Centar za edukaciju-BiH



#1 27.07.2017 12:04
kenan Van mreze
Clan
Registrovan od:10.02.2011
Postovi:191


Predmet:RecordSource u subformi
Evo patim se kako da izmjenim query u RecordSource u subformi

evo moj kod, mislim da je greška negdje tu "Form_MPArtikalTrazi!Izbor.Form.RecordSource" al ne mogu da je skontam

If Frame65 = 1 Then
Form_MPArtikalTrazi!Izbor.Form.RecordSource = "SELECT ZFArikal.SifArt, ZFArikal.SifArtOrg, ZFArikal.NazivArtikla, RMCjenovnik.PC FROM (ZFArikal INNER JOIN RMCjenovnik ON ZFArikal.IDArtikal = RMCjenovnik.IDArtikal) INNER JOIN ZFGrupa ON ZFArikal.IDGrupa = ZFGrupa.IDGrupa WHERE (((RMCjenovnik.IDPeriod)=godina()) And ((RMCjenovnik.IDOrgJed)=IDOrg()) And ((ZFGrupa.UG)=False) And ((ZFArikal.SifArt) Like Forms!MPArtikalTrazi!ArtTrazi.Text & " * ")) GROUP BY ZFArikal.SifArt, ZFArikal.SifArtOrg, ZFArikal.NazivArtikla, RMCjenovnik.PC; "
ElseIf Frame65 = 2 Then
Form_MPArtikalTrazi!Izbor.Form.RecordSource = "SELECT ZFArikal.SifArt, ZFArikal.SifArtOrg, ZFArikal.NazivArtikla, RMCjenovnik.PC FROM (ZFArikal INNER JOIN RMCjenovnik ON ZFArikal.IDArtikal = RMCjenovnik.IDArtikal) INNER JOIN ZFGrupa ON ZFArikal.IDGrupa = ZFGrupa.IDGrupa WHERE (((RMCjenovnik.IDPeriod)=godina()) And ((RMCjenovnik.IDOrgJed)=IDOrg()) And ((ZFGrupa.UG)=False) And ((ZFArikal.SifArtOrg) Like Forms!MPArtikalTrazi!ArtTrazi.Text & " * ")) GROUP BY ZFArikal.SifArt, ZFArikal.SifArtOrg, ZFArikal.NazivArtikla, RMCjenovnik.PC; "
ElseIf Frame65 = 3 Then
Form_MPArtikalTrazi!Izbor.Form.RecordSource = "SELECT ZFArikal.SifArt, ZFArikal.SifArtOrg, ZFArikal.NazivArtikla, RMCjenovnik.PC FROM (ZFArikal INNER JOIN RMCjenovnik ON ZFArikal.IDArtikal = RMCjenovnik.IDArtikal) INNER JOIN ZFGrupa ON ZFArikal.IDGrupa = ZFGrupa.IDGrupa WHERE (((RMCjenovnik.IDPeriod)=godina()) And ((RMCjenovnik.IDOrgJed)=IDOrg()) And ((ZFGrupa.UG)=False) And ((ZFArikal.NazivArtikla) Like Forms!MPArtikalTrazi!ArtTrazi.Text & " * ")) GROUP BY ZFArikal.SifArt, ZFArikal.SifArtOrg, ZFArikal.NazivArtikla, RMCjenovnik.PC; "
ElseIf Frame65 = 4 Then
Form_MPArtikalTrazi!Izbor.Form.RecordSource = "SELECT ZFArikal.SifArt, ZFArikal.SifArtOrg, ZFArikal.NazivArtikla, RMCjenovnik.PC FROM (ZFArikal INNER JOIN RMCjenovnik ON ZFArikal.IDArtikal = RMCjenovnik.IDArtikal) INNER JOIN ZFGrupa ON ZFArikal.IDGrupa = ZFGrupa.IDGrupa WHERE (((RMCjenovnik.IDPeriod)=godina()) And ((RMCjenovnik.IDOrgJed)=IDOrg()) And ((ZFGrupa.UG)=False) And ((RMCjenovnik.PC) Like Forms!MPArtikalTrazi!ArtTrazi.Text & " * ")) GROUP BY ZFArikal.SifArt, ZFArikal.SifArtOrg, ZFArikal.NazivArtikla, RMCjenovnik.PC; "
End If
Me.ArtTrazi = Null
↑  ↓

#2 27.07.2017 19:58
dex Van mreze
Super Moderator
Registrovan od:23.02.2012
Postovi:625


Predmet:Re: RecordSource u subformi
Odakle pozivas, iz modula forme ili nekog drugog modula

Pravila za referenciranje imas na
http://www.elitesecurity.org/t221799-0#1601367

Meni je sumnjiva WHERE klauzula.
Moguce da tu nije dobro izreferencirano.
Sta su godina() i IDOrg()?
Neke tvoje funkcije?

Pogledaj i
http://access.mvps.org/access/forms/frm0031.htm
↑  ↓

#3 27.07.2017 21:27
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,642


Predmet:Re: RecordSource u subformi
Najbolje bi bilo da zakacis taj primjer.
Brze bi islo.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

Stranice (1):1


Sva vremena su GMT +01:00. Trenutno vrijeme: 12: 11 am.