• 5 odgovora
  • 3.930 pregleda
Brisanj podataka??? 07.10.2004. u 16:40 · pre 268 meseci #1
Kako brisati podatke?
Ja koristim ovaj način(access 2000):
Public Function fpotvrdi()
Dim CurrentForm As Form
Set CurrentForm = Screen.ActiveForm
DoCmd.DoMenuItem acFormBar, acEditMenu, 7, acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, acMenuVer70
DoCmd.Close acForm, CurrentForm.Name, acSaveNo
End function

Ima li tko bolji,brži i efikasniji kod za potvrdu brisanja!!!


Potpis
romano
Re: Brisanj podataka??? 08.10.2004. u 06:37 · pre 268 meseci #2
A zasto ne koristis query?

Ovo DoCmd.DoMenuItem.... bih ti savetovao da zaboravis sto pre, i uopste sve te "automatizovane" stvari koje Access pruza. Sto ih je vise u programu, to je kvalitet koda losiji.

Nego lepo imas upit koji prima record id kao parametar i brise rekord.
Potpis
All beer is good. Some beer is better.
Re: Brisanj podataka??? 08.10.2004. u 13:30 · pre 268 meseci #3
Dobro ovo sa domenuItem ću zaboravit .A ako imaš neki mali primjerčić tako da počnem s tim novim i boljim načinom!
Hvala!
Potpis
romano
Re: Brisanj podataka??? 08.10.2004. u 14:02 · pre 268 meseci #4
Pogledaj u Helpu evente Delete, BeforeDelete, AfterDeleet i slicno.
Re: Brisanj podataka??? 08.10.2004. u 14:05 · pre 268 meseci #5
pokrenes sledeci delete query iz koda :
Code:
DELETE * FROM [ImeTabele]
WHERE NekoPolje=VrednostZaBrisanje


gde ti je :
- ImeTabele = naziv tabele iz koje brises redove
- NekoPolje = polje koje sadrzi vrednost na osnovu koje brises
- VrednostZaBrisanje = vrednost polja NekoPolje za koju ces red obrisati

queri pokreces sa

Code:
Call CurrentDB.Execute(tSQL,dbFailOnError)
Potpis

So Long, and Thanks for All the Fish


Re: Brisanj podataka??? 08.10.2004. u 15:38 · pre 268 meseci #6
Funkcionira brisanje!
Imao sam instrukcije oko 10 školskih sati i instruktor mi je pokazivao stari način s
DoCmd.DoMenuItem acFormBar, acEditMenu, 7, acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, acMenuVer70

Što me je jako zbunilo!

A čitajući teme na ovom forumu uvidio sam da vi to u accessu 2000 radite na drugi način tako da mi je ovo sad puno pomoglo i morat ću preći na ovo novo!Sad ću to uzet u ruke i prilagodit svom kodu!(malo proučit,vjerojatno sutra jer me danas stresla gripa)
Hvala na nesebičnoj pomoći i konstruktivnim riješenjima!
Valjda ću se i ja nekad moći odužit s nekom korisnom informacijom jer ovaj forum mi je puno pomogao i stvarno je super!
Potpis
romano
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme