Obračun registracije automobila.

Obračun registracije automobila. 31.07.2012. u 02:09 · pre 173 meseca #1

Pozdrav,

napravio sam neki pokušaj obračuna registracije u accessu, isti imam u excelu i u javascript ali htio bih to napraviti u accessu čisto da naučim kako. U oba urađena slučaja sam koristio if funkciju ali sada mi je malo nejasno.

Ovako je jedan dio koda za "Putarinu" izgledao u javascriptu, a slično je i u excelu samo manje pisanja.

Code:
    if ((v > 0) && (v < 1100)) document.getElementById('putarina').value = '25.00';
    if ((v >= 1101) && (v <= 1600)) document.getElementById('putarina').value = '50.00';
    if ((v >= 1601) && (v <= 2000)) document.getElementById('putarina').value = '60.00';
    if ((v >= 2001) && (v <= 2500)) document.getElementById('putarina').value = '100.00';
    if ((v >= 2501) && (v <= 3000)) document.getElementById('putarina').value = '150.00';
    if (v > 3000) document.getElementById('putarina').value = '350.00';
    porez();
    ukupno();

Eh sad bi mi trebala informacija kada ja napravim u formi četiri polja ( Kilovati, Kubici, Godina, Ukupno ) kako bih ja uspio povezati kojom funkcijom sve to da mi ispiše npr.
Ako ja unesem 58 u polje kilovati, 1830 u polje kubici i 1998 u polje godina.

Code:
if kilovati > 55; && kilovati < 66; && kubici < 2000; && godina < 10; = 20 EURA

I da mi u polju Ukupno piše 20.

Hvala svima koji su spremni pomoći i ako je potrebno mogu zakačiti ovo što sam do sada pravio u excelu, javascriptu i nešto u accessu forma, tabela itd...

Potpis

My life is you Halima.

Rent a car Tuzla
Osiguranje
Rent a car Servis
SEO Usluge
Smještaj u Tuzli
Kupoprodajna mreža

Re: Obračun registracije automobila. 31.07.2012. u 06:58 · pre 173 meseca #2

Mozes napraviti svoju funkciju VBA editoru i kasnije je pozvati za polje ukupno na formi.

Evo funkcije kako bi mogla izgledati:

Code:
Function Registracija(KW As Single, CCM As Single, GOD As Integer) As Currency

    If KW > 55 And KW < 66 And CCM < 2000 And GOD < 10 Then
        Registracija = 20
    ElseIf KW > 66 And KW < 77 And CCM < 3000 And GOD < 10 Then
        Registracija = 30
    ElseIf KW > 77 And KW < 88 And CCM < 4000 And GOD < 10 Then
        Registracija = 40
    'ostale uslove bi pisao slicno kao ove gore
    End If

End Function

ako ne budes uspeo okaci svoj primer u access-u pa da pokusamo da resimo problem.

Potpis

[email protected]=

Re: Obračun registracije automobila. 31.07.2012. u 15:01 · pre 173 meseca #3

Ima jedan mali problem kad se ova situacija resava funkcijama. Sta radis kad se promene cene i uslovi? Nije bas zgodno prepravljati funkciju svaki put kad se promeni cena ili uslovi za odredjivanje cene. Zasto ne pokusate da uslove i cene drzite u nekakvim tabelama, pa da ih odatle kveri izvlaci kad zatreba? Access ima mogucnosti da radi na drugacijem, visem nivou nego Excel i treba to iskoristiti.

Re: Obračun registracije automobila. 01.08.2012. u 03:14 · pre 173 meseca #4

Zidar je u pravu (kao i inače,zar ne?!).Zato sam ti odradio bazu da možeš da biraš koje cene i za koje uslove važe.Pozdrav.Au,pa malo je kasno zar ne?!.

Potpis

Jednog dana...

sloj-registracija.mdb188k

Re: Obračun registracije automobila. 02.08.2012. u 02:46 · pre 173 meseca #5

Pozdrav,

metod koji je napisao Zidar sam shvatio i ok mogu to uraditi, ali i ovaj sa funkcijom mi je ok samo nemogu nikako učitati funkciju da radi ili mi javlja neke errore ili kad ih ne javlja onda neće da radi. Evo mog pokušaja koji trenutno nedaje nikakve znakove života ako neko može da učita da proradi i da napiše kako je učitao da znam za ubuduće. HVALA PUNO

Potpis

My life is you Halima.

Rent a car Tuzla
Osiguranje
Rent a car Servis
SEO Usluge
Smještaj u Tuzli
Kupoprodajna mreža

Database71.accdb324k

Re: Obračun registracije automobila. 02.08.2012. u 08:54 · pre 173 meseca #6

Odradio sam ti nesto na brzinu, u prilozenom primeru imas obe varijante.

Potpis

[email protected]=

Database71.accdb396k

Re: Obračun registracije automobila. 02.08.2012. u 12:26 · pre 173 meseca #7

Hvala ti puno, kad završim cijeli obračun okačit ću ovdje da pogledate :D

Potpis

My life is you Halima.

Rent a car Tuzla
Osiguranje
Rent a car Servis
SEO Usluge
Smještaj u Tuzli
Kupoprodajna mreža

Re: Obračun registracije automobila. 03.08.2012. u 02:28 · pre 173 meseca #8

Pozdrav,

opet ja sa problemima! Napravio sam sve kako sam želio imam 2 problema.
Radio sam sve preko modula sa if funkcijom i sada kad snimim podatke uopšte mi neće da ostanu u tabeli kao da ih nisam ni snimio, a drugi problem mi je sa chekboxom nemogu da skontam kako kada je box cekiran da vrijednost neke kolone bude npr. 4 a kada nije čekiran da bude 5.Bazu sam postavio u attachment pa ko ima vremena neka pogleda. HVALA PUNO

Edit: Pregledao sam po forumu ima sličnih pitanja za oba problema ali nisam uspio riješiti.

Potpis

My life is you Halima.

Rent a car Tuzla
Osiguranje
Rent a car Servis
SEO Usluge
Smještaj u Tuzli
Kupoprodajna mreža

Database81.accdb416k

Re: Obračun registracije automobila. 03.08.2012. u 12:32 · pre 173 meseca #9

Molim Vas jel ima neko da mi pojasni ovo.

Potpis

My life is you Halima.

Rent a car Tuzla
Osiguranje
Rent a car Servis
SEO Usluge
Smještaj u Tuzli
Kupoprodajna mreža

Re: Obračun registracije automobila. 03.08.2012. u 14:57 · pre 173 meseca #10

Evo primera.Nadam se da će ti biti jasnije kada ga pogledaš.

Potpis

Jednog dana...

SLOJ-Database81.accdb396k

Re: Obračun registracije automobila. 04.08.2012. u 01:23 · pre 173 meseca #11

Hvala puno sada sam shvatio i uradio kako sam želio uz vašu pomoć. Ono što ima ovaj forum nema sigurno cijeli balkan! HVALA JOŠ JEDNOM.

Potpis

My life is you Halima.

Rent a car Tuzla
Osiguranje
Rent a car Servis
SEO Usluge
Smještaj u Tuzli
Kupoprodajna mreža

Re: Obračun registracije automobila. 15.08.2012. u 02:28 · pre 173 meseca #12

Pozdrav raja,
evo mene opet, već ste navikli na mene... Sada kad sam sve upakovao kako treba primjetio sam jedan problem koji se javlja kada ljudi koji nisu u toku sa ovim programčićem kojeg radim već dugo... Naime kada upišem kilovate, kubike, godinu proizvodnje onda da bi se stanje u formama mjenjalo moram klikati jedno po jedno polje ili ići putem tab, nekad davno sam imao jedan imenik i po njemu sam pokušao uraditi ovako, ali neće...

Znači da skratim, kako kada unesem određeni broj kilovata, da se automatski u polju POLICA1 promjeni cijena, a da nemoram kliknuti na polje.

Code:
Private Sub KW_Change()
Dim KW1 As String
KW1 = KW.Text
TextKW.Value = KW1
Me.POLICA1.Requery
End Sub

Hvala Vam na pomoći.

EDIT:

Sada mi stoji ovako:

Code:

Private Sub POLICA1_GotFocus()
Me.POLICA1 = POLICA2(Me.KW)
End Sub

Potpis

My life is you Halima.

Rent a car Tuzla
Osiguranje
Rent a car Servis
SEO Usluge
Smještaj u Tuzli
Kupoprodajna mreža

Re: Obračun registracije automobila. 21.08.2012. u 10:39 · pre 172 meseca #13

Molim Vas jel može neko da mi pomogne, sve sam pokušao ali nemože :)

Potpis

My life is you Halima.

Rent a car Tuzla
Osiguranje
Rent a car Servis
SEO Usluge
Smještaj u Tuzli
Kupoprodajna mreža

Re: Obračun registracije automobila. 21.08.2012. u 13:09 · pre 172 meseca #14

Ako sam dobor shvatio iz prilozenog koda vrednost polja POLICA1 je u stvari POLICA2(Me.KW)

Citat:

Pocev-od-mene:
code]
Private Sub POLICA1_GotFocus()
Me.POLICA1 = POLICA2(Me.KW)
End Sub[/code]

Ako je tako,onda u prvom kodu stavis prvo Me.POLICA1 = POLICA2(Me.KW)
,pa tek onda Me.POLICA1.Requery

Potpis

Jednog dana...

Re: Obračun registracije automobila. 21.08.2012. u 14:14 · pre 172 meseca #15

Prijatelju, glavna fora je u GotFocus... Kako da ja nemoram doći na to polje mišem, a da on promjeni evo baza pa da lakše skontaš u čemu je problem.

PS. Nemogu upload 35 mb mi je baza, a ovdje samo 1 mb može...

Ti si mi gore već pomogao i postavio GOTFOCUS dali može da ja unesem CCM, KW, GOD a da on bez gotfocusa promjeni sve vrijednosti.

Potpis

My life is you Halima.

Rent a car Tuzla
Osiguranje
Rent a car Servis
SEO Usluge
Smještaj u Tuzli
Kupoprodajna mreža

Re: Obračun registracije automobila. 21.08.2012. u 14:41 · pre 172 meseca #16

Pa ZIP-uj je.

Potpis

Teško je biti direktor a još teže ne biti!?

Re: Obračun registracije automobila. 21.08.2012. u 15:00 · pre 172 meseca #17

Pa pokušao sam, ali izgleda da se nemože 35,1 mb kompresovati u 1024 kb, kojom metodom?

ps. moj najbolji rezultat je 3,49 mb ako imaš rješenje, neki program i sl. javi. POZ

Potpis

My life is you Halima.

Rent a car Tuzla
Osiguranje
Rent a car Servis
SEO Usluge
Smještaj u Tuzli
Kupoprodajna mreža

Re: Obračun registracije automobila. 21.08.2012. u 15:30 · pre 172 meseca #18

Pre nego zipuješ uradi Compact and Repair baze. Ako i tada bude veća, probaj da napraviš poseban primer gde većina podataka i nepotrebnih objekata neće egzistirati. Tada je spakuj i uploaduj.

Potpis

https://mzahorjanski.wixsite.com/mzahorjanski
https://www.fiverr.com/miroljubzahorja?up_rollout=true
https://www.youtube.com/@miroljubzahorjanski

Re: Obračun registracije automobila. 21.08.2012. u 19:55 · pre 172 meseca #19

Evo ti baza u prilogu.Sve rešavaš pomoću komandnog dugmeta.Nadam se da si to želeo.Pozdrav.
PS:Možeš ceo kod sa tog komandnog dugmeta da staviš na događaj OnLostFocus GOD ili AfterUpdate GOD,ali čini mi se da ti je ovo elegantnije.

Potpis

Jednog dana...

SLOJ-Database2.accdb400k

Re: Obračun registracije automobila. 22.08.2012. u 08:51 · pre 172 meseca #20

Hvala ti puno, ovo mi je trebalo uspio sam sada riješiti sve i isprobao. Hvala još jednom.

Potpis

My life is you Halima.

Rent a car Tuzla
Osiguranje
Rent a car Servis
SEO Usluge
Smještaj u Tuzli
Kupoprodajna mreža

Forum kao aplikacija na telefonu

Srodne teme