[ slavko13 @ 18.02.2005. 19:15 ] @
Prilagodio sam Northwind.mdb bazu sebi, nekim malim izmenama.Imam dva problema oko kojih se vec duze mucim i nikako nemogu da ih resim.Pretrazio sam celu knjigu Access 2000 i opet nista nisam uradio, pa bih molio ako neko moze da mi pomogne. 1.Imam dve tabele(Ulaz i Izlaz) u kojima su podaci sortirani po datumu unosa.Kako da napravim neki upit koji bi podatke iz ove dve tabeli slozio po datumu unosa(u jednu tabelu koja ima polje ulaz i izlaz) i sumirao ih na kraju svake strane, a te sume prenio na iducu stranu. 2. Private Sub ProductID_AfterUpdate() On Error GoTo Err_ProductID_AfterUpdate Dim strFilter As String ' Evaluate filter before it's passed to DLookup function. strFilter = "ProductID = " & Me!ProductID ' Look up product's unit price and assign it to UnitPrice control. Me!UnitPrice = DLookup("UnitPrice", "Products", strFilter) Me!Quantity = DLookup("UnitsInStock", "Products", strFilter) Me!Discount = DLookup("Rabat", "Customers", strFilter) Exit_ProductID_AfterUpdate: Exit Sub Err_ProductID_AfterUpdate: MsgBox Err.Description Resume Exit_ProductID_AfterUpdate End Sub Zasto mi u polju Discount tabele “Orders Details” za izabranog Customersa u tabeli “Orders” ne unosi njegovu vec zadatu vrednost u tabeli “Customers” nego prvu unetu vrednost u polju Rabat tabele Customers. Dakle ja u formi Orders imam Subformu Orders Details i kada izaberem kupca u Ordersu prelazim u Subformu Orders Details gdje mi cim izaberem proizvod treba da nudi cenu i rabat za izabranog kupca(a kupci cu svi uneseni u tabelu Customers i tu ima polje Rabat za svakog kupca). |