[es] - pomoc za vba kod

mmilinca

Član broj: 57773
Poruke: 60
82.208.209.*

Profil

^{20.10.2006. u 08:47 - pre 213 meseci}

Pozdrav forumasi...

Kako da na nekoj formi nakon izmene postojecih ili upisa novih podataka, odredim da li je comanda insert ili update i da na osnovu toga izvrsim neke upite.Npr ako je update onda izvrsi sql1 i sql2, a ako je insert onda izvrsi sql3 i sql4. Naravno , sve ovo kroaz vba kod. Najveci problem je odrediti tip command-e

Odgovor na temu

niposto
Beograd

Član broj: 116959
Poruke: 3
*.adsl.beocity.net.

Profil

Re: pomoc za vba kod

^{23.10.2006. u 14:50 - pre 213 meseci}

Mozhesh li recimo kroz neki primer da objasnish problem. Nije mi ovako jasno bash

Odgovor na temu

mmilinca

Član broj: 57773
Poruke: 60
82.208.209.*

Profil

Re: pomoc za vba kod

^{25.10.2006. u 09:20 - pre 213 meseci}

evo pojasnjenja:
otvara se 1 forma, i na njoj nesto upisuje ili menjaju vec postojeci podaci. Nakon zapamcenih izmena i zatvaranja forme, aktivira se kod koji proverava da li je u odgovrajucu tabelu uradjen insert ili update. Na osnovu toga se u drugu tabelu u odredjeno polje upisuje string "insert" ili "update". Ovo vazi za vise formi u aplikaciji

Odgovor na temu

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 3085
*.eqao.com.

+79 Profil

Re: pomoc za vba kod

^{25.10.2006. u 15:09 - pre 213 meseci}

Citat:

otvara se 1 forma, i na njoj nesto upisuje ili menjaju vec postojeci podaci.

Tvoja forma zna da li je u pitanju update ili insert. Forma ima property Newrecord, koji je TRUE kad se dodaje novi rekord ili FALSE, kad se nalazis na postojecem rekordu. I kod UPDATE i kod INSERT, na formi se desava BeforeUpdate event. tu mozes da kazes nesto kao:

1. Deklarises negde jednu PUBLIC varijablu
PUBLIC Globalvar_NewRecord int

2. na forminon Before UPdate

private sub Form_beforeUpdate

Globalvar_NewRecord = 0 '0 je neutralna

IF me.newRecord
THEN
Globalvar_NewRecord = 1 'INSERT
ELSE
Globalvar_NewRecord = 2 ' UPDATE
END IF

end sub

3. na forminom After Update:

sub form_AfterUpdate()

SELECT CASE Globalvar_NewRecord
CASE 0
'nista ne raditi u ovom slucaju
CASE 1
'neki kod da koji se izvrsava za INSERT
CASE 2
'neki kod koji se izvrsava za UPDATE
END SELECT

end sub

I tako na svakoj formi za koju treba da pratis INSERT/UPDATE

:-)

Odgovor na temu