[es] - Access: If ... Then... problem sa OnLoad

bobiris
Slobodan Blagojevic
Čuvanje dece (četvoro malih) kod
kuće.
Sabac

Član broj: 2956
Poruke: 181
*.verat.net

Profil

Access: If ... Then... problem sa "OnLoad"

^{16.07.2003. u 00:29 - pre 252 meseci}

Imam problem prilikom otvaranja forme sa "OnLoad".

napisao sam sledeći kod:

Private Sub Form_Load()
If RangSen2002.Value = 1 Then
ZB2002Sen = ZB2002Sen + 5
ElseIf RangSen2002.Value = 2 Then
ZB2002Sen = ZB2002Sen + 3
ElseIf RangSen2002.Value = 3 Then
ZB2002Sen = ZB2002Sen + 1
End If
Form.Refresh
End Sub

On mi ovo odradi, ali samo za prvi zapis, za ostale zapise neće. Ako sve ovo stavim na "OnOpen", prijavi da ne može da piše u tabelu, iako je Editovanje dozvoljeno.

[Ovu poruku je menjao tOwk dana 16.07.2003. u 13:12 GMT]

Boban (otac šestoro dece).

Odgovor na temu

byTer

Član broj: 10936
Poruke: 1221
*.ptt.yu

ICQ: 47761626

Profil

Re: If ... Then... problem sa "OnLoad"

^{16.07.2003. u 03:47 - pre 252 meseci}

Jesi pokusao sa
select case. Mozda i uspe ako nesto promenis

)

Odgovor na temu

Nub.Saibot
Srbija/BG

Član broj: 11838
Poruke: 99
*.direcpceu.com

Profil

Re: If ... Then... problem sa

^{16.07.2003. u 11:53 - pre 252 meseci}

Citat:

bobiris:
Imam problem prilikom otvaranja forme sa "OnLoad".

napisao sam sledeći kod:

Private Sub Form_Load()
If RangSen2002.Value = 1 Then
ZB2002Sen = ZB2002Sen + 5
ElseIf RangSen2002.Value = 2 Then
ZB2002Sen = ZB2002Sen + 3
ElseIf RangSen2002.Value = 3 Then
ZB2002Sen = ZB2002Sen + 1
End If
Form.Refresh
End Sub

On mi ovo odradi, ali samo za prvi zapis, za ostale zapise neće. Ako sve ovo stavim na "OnOpen", prijavi da ne može da piše u tabelu, iako je Editovanje dozvoljeno.

Nisam siguran da li sam dobro razumeo tvoj post, ali meni ovo liči da želis da na neki način sumiraš polja u tabeli pri učitavanju forma. Međutim, tvoj kod radi to samo sa prvim redom jer na ostale i ne prelazi. Moraš staviti obradu polja u petlju. Ne koristim Visual Basic pa cu umesto VB koda napisati pseudo kod.

1. Postavi kursor tabele na prvi red
2. Sve dok nije kraj tabele radi
3. obrada polja
4. Postavi kursor tabele na sledeci red
5. Idi na korak 2

Valjda sam pogodio u čemu je stvar :)

Odgovor na temu

bobiris
Slobodan Blagojevic
Čuvanje dece (četvoro malih) kod
kuće.
Sabac

Član broj: 2956
Poruke: 181
*.verat.net

Profil

Re: If ... Then... problem sa "OnLoad"

^{16.07.2003. u 12:22 - pre 252 meseci}

Pogodio si, to hocu, ali ni ja ne znam da napisem to u Visual Basic-u. Pokusacu sa VB scriptom, kao za WEB.

Boban (otac šestoro dece).

Odgovor na temu

Simke
Marko Simic
Sandfield Associates (Solution
Developer)
Novi Zeland

Član broj: 1158
Poruke: 751
*.dialup.xtra.co.nz

ICQ: 71578686
Sajt: www.sandfield.co.nz

Profil

Re: If ... Then... problem sa "OnLoad"

^{16.07.2003. u 12:49 - pre 252 meseci}

Nije mi jasno kada hoces da se kod izvrsava? OnLoad event i treba da izvrsava kod samo jednom. Ako hoces da se kod izvrsava kada ides sa rekorda na rekord, koristi OnCurrent event.

All beer is good. Some beer is better.

Odgovor na temu

leka
Dejan Lekić
senior software engineer, 3Developers
Ltd.
London, UK

Član broj: 234
Poruke: 2534
*.racasse.se

Sajt: dejan.lekic.org

+2 Profil

Re: If ... Then... problem sa "OnLoad"

^{16.07.2003. u 12:56 - pre 252 meseci}

Moze li autor da objasni kakve veze ima njegov tekst sa bazama podataka????

Dejan Lekic
software engineer, MySQL/PgSQL DBA, sysadmin

Odgovor na temu

bobiris
Slobodan Blagojevic
Čuvanje dece (četvoro malih) kod
kuće.
Sabac

Član broj: 2956
Poruke: 181
*.verat.net

Profil

Re: If ... Then... problem sa "OnLoad"

^{16.07.2003. u 13:09 - pre 252 meseci}

Prvo za Leku: (Autor)

Ovaj tekst ima veze sa bazama podataka jer se radi o programu (ili bazi) koju pravim u Access-u. Ako sam pogresio forum, molim te usmeri me na pravi.

Sada za Simketa:

Pa hocu da se izvrsi jednom, jer se radi o reportu koji je samo za "gledanje", ne za azuriranje, ali hocu da prodje sve zapise, a ne samo prvi, tj. onaj koji se prilikom ucitavanja pojavi na ekranu.

Sa VB scriptom bih se snasao, ali mislim da Visual Basic u okviru Accesa to mnogo brze odradjuje. Baza je velika (?), ima 17000 zapisa sa dosta podataka. Ako otvaram ODBC konekciju, pa pisem kod kao za Asp, mislim da ce to dosta usporiti stvar.

Boban (otac šestoro dece).

Odgovor na temu

vbraca
Bratislav Velickovic
Administrator informacionih sistema
Kragujevac

Član broj: 4956
Poruke: 230
*.211.EUnet.yu

Sajt: velickovic.net

Profil

Re: Access: If ... Then... problem sa "OnLoad"

^{16.07.2003. u 18:12 - pre 252 meseci}

Koristi za formu OnCurrent event a ako je u pitanju izvestaj za stampu - koristi OnFormat dogadjaj detalja izvestaja

Pozdrav,

Bratislav Velickovic
hhtp://blog.velickovic.net

Odgovor na temu

bobiris
Slobodan Blagojevic
Čuvanje dece (četvoro malih) kod
kuće.
Sabac

Član broj: 2956
Poruke: 181
*.verat.net

Profil

Re: Access: If ... Then... problem sa "OnLoad"

^{17.07.2003. u 11:58 - pre 252 meseci}

Da, ali kada u Formi "šetaš" kroz zapise unapred, sve je ok, svaki odrađuje šta treba, ali kada se onda vraćaš nazad, on opet odrađuje, i tako u krug, pa se vrednost stalno povećava, svaki put kada pristupiš zapisu.

To nije rešenje, možda za Report, u slučaju da se samo štampa, bez pregledanja.

Boban (otac šestoro dece).

Odgovor na temu

Nub.Saibot
Srbija/BG

Član broj: 11838
Poruke: 99
*.direcpceu.com

Profil

Re: If ... Then... problem sa

^{18.07.2003. u 12:53 - pre 252 meseci}

Citat:

bobiris:
Pogodio si, to hocu, ali ni ja ne znam da napisem to u Visual Basic-u. Pokusacu sa VB scriptom, kao za WEB.

U VB sam radio samo sitne programe tako da ne mogu da ti pomognem oko pisanja koda. Ako ti nešto znači mogu kod da ti napišem u Delphi-ju.

Potrazi pomoć u forumu VB & ASP http://www.elitesecurity.org/forum/21

Odgovor na temu