[es] - Opet problem sa tabelom! (sabiranje dva polja iz baze)

KiselinaXP
Crna rupa

Član broj: 54030
Poruke: 232
*.teol.net.

Jabber: kiselina@elitesecurity.org
ICQ: 226466859

Profil

Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{04.04.2005. u 21:15 - pre 232 meseci}

U dole navedenoj temi "Pomoc oko tabele" nisam bas skroz razumeo sta ste hteli reci i kako. Moj problem je :

[img]

I kako da u polje Svega saberem red Opravdano i Neopravdano.

_{[Ovu poruku je menjao mladenovicz dana 05.04.2005. u 12:22 GMT+1]}

A gde je moj moped ko da je u moravu propo!
Pero kojot genije!

Odgovor na temu

izonic
ishab zonic
Tuzla

Član broj: 38128
Poruke: 591
217.71.52.*

Sajt: www.icentar.ba

+2 Profil

Re: Opet problem sa tabelom!

^{04.04.2005. u 22:03 - pre 232 meseci}

nemogu se sjetit sta sam napisao a na ovo sam slucajno naletio.
Haj da prdpostavim:
koliko se sjecam u jednom plju imas opravdan u drugom neopravdani casovi i kako te razumijem treba ti zbir.
ako je to to onda.
polje ukupno=polje opravdani puta pole neopravdani.

zxz

Odgovor na temu

Marko_L
Beograd

Član broj: 20532
Poruke: 2885
*.yubc.net.

Jabber: Marko_L@elitesecurity.org

+828 Profil

Re: Opet problem sa tabelom!

^{04.04.2005. u 22:11 - pre 232 meseci}

Code:
db.Recordsource = "SELECT opravdano, neopravdano, (opravdano + neopravdano) AS svega FROM [ime tabele]"
db.Refresh

"db" ti je ime objekta koji predstavlja bazu, a [ime tabele] je ime tabele u kojoj se nalaze ta polja koja pominješ.Polje "svega" ti ne treba uopšte, jer se račun obavlja u SQL-u.

-Odracuonogakomijedrpiorazmaknicu.
-Ne rxdi mi txstxturx, kxd god hocu dx
ukucxm "x" onx ukucx "x".
-Ko kaaz e da ja neuummem da kuuca
m.
-Piše "Insert disk 3", a jedva sam i ova
dva ugurao u drajv
-Postoje samo dve osobe kojima
verujem, jedna sam ja, a druga nisi ti

Odgovor na temu

KiselinaXP
Crna rupa

Član broj: 54030
Poruke: 232
*.teol.net.

Jabber: kiselina@elitesecurity.org
ICQ: 226466859

Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 15:54 - pre 232 meseci}

U redu je a kako da mi zbir svih redova opravdano sabere u lblUkupno.

A gde je moj moped ko da je u moravu propo!
Pero kojot genije!

Odgovor na temu

KiselinaXP
Crna rupa

Član broj: 54030
Poruke: 232
*.teol.net.

Jabber: kiselina@elitesecurity.org
ICQ: 226466859

Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 16:30 - pre 232 meseci}

Ovo nece da mi radi. Evo ti pa isprobaj ti molim te!!! Hvala unapred

A gde je moj moped ko da je u moravu propo!
Pero kojot genije!

Prikačeni fajlovi

Tabela.rar - 8.52k

Odgovor na temu

Marko_L
Beograd

Član broj: 20532
Poruke: 2885
*.yubc.net.

Jabber: Marko_L@elitesecurity.org

+828 Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 16:36 - pre 232 meseci}

Code:
db.RecordSource = "SELECT SUM(opravdano) AS ukupno FROM [ime_tabele]"
db.Refresh
lblUkupno = db.Recordset.Fields(0).Value

Odgovor na temu

KiselinaXP
Crna rupa

Član broj: 54030
Poruke: 232
*.teol.net.

Jabber: kiselina@elitesecurity.org
ICQ: 226466859

Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 16:41 - pre 232 meseci}

Nece ni ovo de vidi to sto sam stavio pa ti probaj da ispise i u tabeli i Svega i u labelu Ukupno. Ajd molim te nemas pojma koliko me muci....................

A gde je moj moped ko da je u moravu propo!
Pero kojot genije!

Odgovor na temu

Marko_L
Beograd

Član broj: 20532
Poruke: 2885
*.yubc.net.

Jabber: Marko_L@elitesecurity.org

+828 Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 16:47 - pre 232 meseci}

Na formi frmRazred u Command1_Click stavi ovo

Inače velika ti je greška što si u bazi stavio da sva polja budu text tipa, a radiš sa brojčanim podacima što otežava računske operacije (zato sam i stavio ono val kod "opravdano").Bilo bi dobro da umesto text, staviš da polja budu nekog brojčanog tipa, recimo integer.

Odgovor na temu

KiselinaXP
Crna rupa

Član broj: 54030
Poruke: 232
*.teol.net.

Jabber: kiselina@elitesecurity.org
ICQ: 226466859

Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 16:59 - pre 232 meseci}

Ovo sada funkcionise, ali u cemu je sada problem:

u labelu sve dobro sabere
a u tabeli ako sam naprimer unjeo u opravdani i neopravdano 5 i 6 ispise 56 dok u labelu 11.

i kada stisnem dugme vise nemogu nista upisivati u tabelu kada upisem i stisnem dugme da sabere on to sto sam unjeo izbrise...

A gde je moj moped ko da je u moravu propo!
Pero kojot genije!

Odgovor na temu

Marko_L
Beograd

Član broj: 20532
Poruke: 2885
*.yubc.net.

Jabber: Marko_L@elitesecurity.org

+828 Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 17:02 - pre 232 meseci}

A da, pošto su ti polja text data tipa, on ih ne sabira, nego spaja.Dakle, ono umesto onog gore što sam ti napisao, stavi ovako

Ili promeni tip podataka u poljima u bazi.

Odgovor na temu

KiselinaXP
Crna rupa

Član broj: 54030
Poruke: 232
*.teol.net.

Jabber: kiselina@elitesecurity.org
ICQ: 226466859

Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 17:08 - pre 232 meseci}

Hvala ti puno i dali jos znas kako da oni sto pise matematika, istorija, opravdano, neopravdano itd. osim ime i prezime bude uspravno napisano.

A gde je moj moped ko da je u moravu propo!
Pero kojot genije!

Odgovor na temu

Marko_L
Beograd

Član broj: 20532
Poruke: 2885
*.yubc.net.

Jabber: Marko_L@elitesecurity.org

+828 Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 17:38 - pre 232 meseci}

Mislim da to nije moguće u datagrid-u.Možda da probaš da iskombinuješ nešto sa lebelom tako što ćeš da joj staviš wordwrap na true i "stanjiš" je tako da može da stane samo jedno slovo u redu, pa onda to staviš iznad datagrid-a, tačnije iznad polja koje predstavlja.Ili možda da iskombinuješ nešto sa excelom, ako već hoćeš da dobiješ neki efektniji izveštaj.

Odgovor na temu

KiselinaXP
Crna rupa

Član broj: 54030
Poruke: 232
*.teol.net.

Jabber: kiselina@elitesecurity.org
ICQ: 226466859

Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 17:57 - pre 232 meseci}

Ma dobro nista od toga onda. Je*iga jesam ti vec dosadio posto imam jos pitanja.
Ako u tabeli imam "Srednja ocjena" kako da upisem kod da tu sabere sva polja u koloni sa predmetima i da podjeli sa brojem predmeta, a u polju uspijeh da gleda koja je srednja ocjena i da ispise uspjeh npr. ako je u srednjoj ocjeni 2.48 da u uspjehu ispise 3.Izvini molim te ali sta cu kad ne znam a imaju iskusniji pa moram pitat... Hvala!

A gde je moj moped ko da je u moravu propo!
Pero kojot genije!

Odgovor na temu

Marko_L
Beograd

Član broj: 20532
Poruke: 2885
*.yubc.net.

Jabber: Marko_L@elitesecurity.org

+828 Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 18:49 - pre 232 meseci}

Pošto vidim da imaš dosta računskih operacija za obaviti, ponovo moram da predložim da stvaiš da ti ta polja sa ocenama i opravdanim/neopravdanim budu number tip podataka, kao što rekoh, recimo integer.E sad, pošto ti hoćeš da ti prikaže sve u jednoj tabeli predpostavljam, onda je najbolje samo da nadogradiš onaj SQL koji si već koristio, ovako

Code:
Private Sub Command1_Click()
datPrimaryRS.RecordSource = "select sum(val(Opravdano)) AS ukupno FROM Razred"
datPrimaryRS.Refresh
lblUkupno = datPrimaryRS.Recordset.Fields(0).Value
datPrimaryRS.RecordSource = "select [Ime i prezime],Istorija,Matematika,[Maternji jezik]," & _
"Fizika,[Strani jezik],((val(Istorija) + val(Matematika) + val([maternji jezik]) + val(Fizika) + val([Strani jezik])) / 5) " & _
"AS [Srednja ocjena], cint(((val(Istorija) + val(Matematika) + val([maternji jezik]) + val(Fizika) + val([Strani jezik])) / 5)) " & _
"AS Uspjeh,Vladanje,Opravdano,Neopravdano,(val(Opravdano)+val(Neopravdano)) AS Svega from Razred"
datPrimaryRS.Refresh
End Sub

Naravno, ukoliko si promenio tip podataka u bazi ne moraš da koristiš val, znači onaj deo gde stoji

Code:
((val(Istorija) + val(Matematika) + val([maternji jezik]) + val(Fizika) + val([Strani jezik])) / 5)

bi mogao da napišeš i ovako

Code:
((Istorija + Matematika + [maternji jezik] + Fizika + [Strani jezik]) / 5)

Odgovor na temu

KiselinaXP
Crna rupa

Član broj: 54030
Poruke: 232
*.teol.net.

Jabber: kiselina@elitesecurity.org
ICQ: 226466859

Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 19:58 - pre 232 meseci}

Covece pa ti si zakon. Neces se ljutit ako ti kasnije postavim jos koje pitanje?

A gde je moj moped ko da je u moravu propo!
Pero kojot genije!

Odgovor na temu

KiselinaXP
Crna rupa

Član broj: 54030
Poruke: 232
*.teol.net.

Jabber: kiselina@elitesecurity.org
ICQ: 226466859

Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 21:14 - pre 232 meseci}

Covece evo sada jedno zanimljivo pitanje:

Sve isto tabela i ostalo samo sto sada imam:

lbl5
lbl4
lbl3
lbl2
lbl1
lblSr

e sada da kada stisnem cmdRefresh da u lbl5 ispise koliko petica ima iz matematike u koloni [Matematika], u lbl4 da ispise koliko ima cetvorki u koloni [Matematika] itd.
u lblSr da iz kolone matematika izvuce srednju ocjenu... E covjece ti si legenda hvala ti unaprijed sto puta!!!!!!!!!!!!!!!!!!!!!!!!!!!

A gde je moj moped ko da je u moravu propo!
Pero kojot genije!

Odgovor na temu

Marko_L
Beograd

Član broj: 20532
Poruke: 2885
*.yubc.net.

Jabber: Marko_L@elitesecurity.org

+828 Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 21:43 - pre 232 meseci}

Code:
Private Sub cmdRefresh_Click()
datPrimaryRS.RecordSource = "SELECT COUNT(matematika) FROM Razred WHERE val(matematika) = 5"
datPrimaryRS.Refresh
lbl5.Caption = datPrimaryRS.Recordset.Fields(0).Value
datPrimaryRS.RecordSource = "SELECT COUNT(matematika) FROM Razred WHERE val(matematika) = 4"
datPrimaryRS.Refresh
lbl4.Caption = datPrimaryRS.Recordset.Fields(0).Value
datPrimaryRS.RecordSource = "SELECT COUNT(matematika) FROM Razred WHERE val(matematika) = 3"
datPrimaryRS.Refresh
lbl3.Caption = datPrimaryRS.Recordset.Fields(0).Value
datPrimaryRS.RecordSource = "SELECT COUNT(matematika) FROM Razred WHERE val(matematika) = 2"
datPrimaryRS.Refresh
lbl2.Caption = datPrimaryRS.Recordset.Fields(0).Value
datPrimaryRS.RecordSource = "SELECT COUNT(matematika) FROM Razred WHERE val(matematika) = 1"
datPrimaryRS.Refresh
lbl1.Caption = datPrimaryRS.Recordset.Fields(0).Value
datPrimaryRS.RecordSource = "SELECT AVG(val(matematika)) FROM Razred"
datPrimaryRS.Refresh
lblSr.Caption = datPrimaryRS.Recordset.Fields(0).Value
End Sub

Uzgred, toplo preporučujem da skineš i pročitaš degojs-ov tutorijal (imaš link u top temi sa često postavljanim pitanjima) i upoznaš se sa osnovama SQL-a.Trebaće ti.

Odgovor na temu

KiselinaXP
Crna rupa

Član broj: 54030
Poruke: 232
*.teol.net.

Jabber: kiselina@elitesecurity.org
ICQ: 226466859

Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 22:08 - pre 232 meseci}

E skinosam tutorijale i hvala ti, a gledaj sada u tabeli smo imali [Uspjeh] e kako da sada u labelu:

lbl55 lbl555
lbl44 lbl444

stavim kod da u tabeli i koloni [Uspijeh] u lbl55 ispise koliko ima odlicnih a u lbl555 postotak, tako isto i sa lbl44 lbl444 i sa ostalim. Jest da te mucim ali staces kad se uvijek nadje pitanje valjda nemas nista protiv!!!!!!!!!!!!!

A gde je moj moped ko da je u moravu propo!
Pero kojot genije!

Odgovor na temu

Marko_L
Beograd

Član broj: 20532
Poruke: 2885
*.yubc.net.

Jabber: Marko_L@elitesecurity.org

+828 Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{05.04.2005. u 22:46 - pre 232 meseci}

Ma nije meni problem da ti napišem, ali ti baš nećeš ni malo da se potrudiš.Iz ovih prethodnih postova si mogao da provališ kako da odradiš i to što ti treba.Evo recimo za taj broj odličnih možeš da iskoristiš isti SQL koji sam ti dao u prethodnom postu, samo zameniš matematika sa "Uspjeh".Evo ovako

Code:
datPrimaryRS.RecordSource = "SELECT COUNT(Uspjeh) FROM Razred WHERE val(Uspjeh) = 5"
datPrimaryRS.Refresh
lbl55.Caption = datPrimaryRS.Recordset.Fields(0).Value

Isto to uradiš i sa 4, 3, 2 i 1, a za postotak moraš da imaš ukupan broj učenika, što možeš dobiti sa

Code:
Dim ukupnoucenika As Integer
ukupnoucenika = datPrimaryRS.Recordset.RecordCount

Ili sa SQL-om

Code:
Dim ukupnoucenika As Integer
datPrimaryRS.RecordSource = "SELECT COUNT([ime i prezime]) FROM Razred"
datPrimaryRS.Refresh
ukupnoucenika = datPrimaryRS.Recordset.Fields(0).Value

A onda na osnovu lbl55 i ukupnog broja učenika računaš procenat

Code:
lbl555.Caption = Val(lbl55) * (100 / ukupnoucenika)

Isto tako i za 4, 3, 2 i 1.Snaći ćeš se.

Odgovor na temu

KiselinaXP
Crna rupa

Član broj: 54030
Poruke: 232
*.teol.net.

Jabber: kiselina@elitesecurity.org
ICQ: 226466859

Profil

Re: Opet problem sa tabelom! (sabiranje dva polja iz baze)

^{06.04.2005. u 12:30 - pre 231 meseci}

Covece bas sam lijen ali jeb*ga nije valjda nikakav problem ucim fiziku moram popraviti pa zato. A vidis onaj kod sto si mi napiso:

Code:

lbl555.Caption = Val(lbl55) * (100 / ukupnoucenika)

u redu da ja upisem koliko ima ucenika ali kako da on sam prepozna koliko ih ima kada se upisuje u tabelu? Ma nema covece ti si Heroj!!!!!!!!

A gde je moj moped ko da je u moravu propo!
Pero kojot genije!

Odgovor na temu