pmiroslav | 16.05.2013 11:24 |
---|---|
Predmet:Re: Promjena naziva labela Hvala na ovim sugestijama. proči ću sve ove točke i nastojati to ispraviti. |
pmiroslav | 16.05.2013 14:05 |
---|---|
Predmet:Re: Promjena naziva labela Citiraj zxz: Nije ovo program napravljen na brzimu. Radim ga već godinama, ali korisnici stalno neÅ¡to zahtjevaju pa ga dorađujem.Mozda je ovo samo primjer koji je nabrzinu napravljen ali na njemu ima mnostvo manjkavosti. Slažem se sa svim tvojim primjedbama i več sam večinu toga popravio. Zapeo sam na sugestiji broj 5 (promjena boje forme ovisno o vrsti dokumenta). Napravio sam jednu malu formu sa tri dugmeta sa kojima bi otvarao frmDokumenti i sada je problem kako mjenajti boju i kako zadati defaultnu vrijednost za combo IDdokumenta: napisao sam ovako ali dobivam greÅ¡ku: Dim stDocName As String Dim stLinkCriteria As String stDocName = "frmDokumenti" DoCmd.OpenForm FormName:=stDocName _ , dataMode:=acFormAdd Forms!frmDokumenti!IDdokumenta.value=1 'OVO RADI Forms!frmDokumenti.BackColor = 65535 'OVO JAVLJA GREÅ KU |
pmiroslav | 16.05.2013 14:28 |
---|---|
Predmet:Re: Promjena naziva labela Guglajući sam u međuvremenu rijeÅ¡io problem sa orms!frmDokumenti.Section(acDetail).BackColor = "15714765" sada mi joÅ¡ ostaje gdje da stavim ono za generiranja broja dokumenta, Me.BrojDok = BrojDokumenta(Prefix) poÅ¡to je to bilo na IDdokumenta After update, a toga događaja sada nema |
zxz | 16.05.2013 10:36 |
---|---|
Predmet:Re: Promjena naziva labela Mozda je ovo samo primjer koji je nabrzinu napravljen ali na njemu ima mnostvo manjkavosti. Ovdje dolazi i ona prica da se u accessu moze napraviti program za jedno popodne. I pita se moze napraviti od svacega samo je pitanje dali se moze jesti. Primjedbe: --1--- Zasto pri unosu novog skladisnog dokumenta moras listati po starim. Eto da kazemo da je to brze zgodnije itd. Mozda i jeste do nekih pedesetak dokumenata a poslije nicemu ne sluzi jer bi se ubio listajuci. Ako pak zelis da vidis dokumenta onda napravi data sheet podformu sa pretragom ispod ovog unosa a unos neka bude data entry. --2-- Zasto u broju dokumenta imamo znak *. Znamo da je * djoker pa bi u neko doba moglo doci i do problema. Evo kada pravimo pretragu napisat cemo like a tada ce ova zvjezdica znaciti bilo sta dalje od nje. Po meni bolje je bilo ovaj prefiks upisati u kodnoj tabeli transakcije vrsta. Znaci dodati u tabeli polje prefiks. --3-- U CmboSkladiste.rowsource upisati ovaj SQL: SELECT Skladista.IDSkladista, Skladista.NazivSkladišta FROM Skladista WHERE (((Skladista.IDSkladista)<>[Forms]![frmDokumenti]![Skladiste_2])) ORDER BY Skladista.IDSkladista; a na: Private Sub CmbSkladiste_AfterUpdate() Me.Skladiste_2.RowSource = Me.Skladiste_2.RowSource End Sub U Skladiste_2.rowsource ovaj SQL: SELECT Skladista.IDSkladista, Skladista.NazivSkladišta FROM Skladista WHERE (((Skladista.IDSkladista)<>[Forms]![frmDokumenti]![CmbSkladiste])) ORDER BY Skladista.IDSkladista; a na Private Sub Skladiste_2_AfterUpdate() Me.CmbSkladiste.RowSource = Me.CmbSkladiste.RowSource End Sub Niti nazivi nisu po nekomprincipu: Jedan naziv noci prefix kontrole a drugi je bez toga. Kada radite vecu app. to vam se obije o glavu jer se milion puta morate vratiti da vidite kako se zove odredjena kontrola. --4-- Po meni i u medjuskladisnoj transakciji mora postojati lice odgovorno za transakciju. --5-- Moj licni predlog je da se ova forma podize iz menija sa izborom sta je: Medjuskladisna otpremnica Povratnica prijemnica itd. i saki puta da bude pozadina druge boje. Ovo izgleda mnogo bolje a i teze se moze pogrijesiti. Znaci polje za izbor vrste dokumenta bi bilo nevidljivo jer bi ono bilo po defaultu upisano na osnovu opcije iz menija. --6-- Evo sad i tvoje rjesenje: Na ktraju procedure prije End Sub dodati sledeci kod: If Left(Me.BrojDok, 3) <> Prefix Then Me.BrojDok = BrojDokumenta(Prefix) End If U svim case izbrisati: Me.BrojDok = BrojDokumenta(Prefix) Zasto je ovo bilo u svim izborima case a ne van nije mi jasno. |
zxz | 16.05.2013 21:19 |
---|---|
Predmet:Re: Promjena naziva labela Hehe Morao sa ici na ispracaj mature. Citat: Nije ovo program napravljen na brzimu. Radim ga već godinama, ali korisnici stalno neÅ¡to zahtjevaju pa ga dorađujem. Ovaj tvoj dio je bio lijep primjer za primjedbe i ja sam to napisao. Vjerovatno da je bio neko drugi nebih ni napisao jer mislim da se nista nebi desilo ali posto si ti temeljit ti ces to pokusati implementirati i sve iznijeti na forumu. Evo ti primjer za ovo sto si trazio. Koliko znam to si skinuo unu templatu u njoj imas ovo i mnogo vise. Naravno da se tada bilo tesko snaci sa tudjim kodom ali malo po malo mislim da ces sve stici. |
|
Prilozi: Primjer_2.zip (Velicina datoteke: Bajt) |
pmiroslav | 17.05.2013 09:48 |
---|---|
Predmet:Re: Promjena naziva labela Puno su mi pomogle tvoje sugestije i ja sam neÅ¡to napravio po njima. Meni u ovom slučaju trebaju samo tri vrste dokumenata. MeđuskladiÅ¡na otpremnica, Povratnica i Revers, pa sam prema tome malo modificirao tvoj kod. Jedino bih joÅ¡ volio ako mi možeÅ¡ pomoći za combo StovaristeID koje je vezamo uslovom uz combo PartnerID. dali se može napraviti da taj Combo StovaristeID bude nevidljiv ili Enabled=false ako odabrani partner nema stovariÅ¡ta. |
|
Prilozi: Primjer_3.rar (Velicina datoteke:48.23 KB) |
zxz | 17.05.2013 10:54 |
---|---|
Predmet:Re: Promjena naziva labela PreuzmiIzvorni kôd (Visual Basic):
|
pmiroslav | 17.05.2013 11:07 |
---|---|
Predmet:Re: Promjena naziva labela Odlično! Hvala joÅ¡ jednom |