Pokusaj ponovo da okacis tvoju bazu.

evo kako bi ti izgleda kod, a ti samo promjeni naziv tabele i stavi polja koja želiš promjeniti


Dim d As Database
Set d = CurrentDb
Dim ev As Recordset

Set ev = d.OpenRecordset("select * from tblzapisnik where broj_zapisnika='" & fzapisnik & "' and verzija=" & fverzija)

If ev.EOF() Then
ev.AddNew ' ako ne postoji
Else
ev.Edit 'mjenjanje
End If

ev.Fields("broj_zapisnika") = fzapisnik
ev.Fields("verzija") = fverzija
ev.Fields("datum_zapisnika") = fdatum
ev.Fields("gradjevina") = fgradjevina
ev.Update
ev.Close

Set d = Nothing

Nije mi uspjelo da dobijem to sto zelim, a mozda nisam dobro ni objasnio.
U principu, zelio bih u POVRATNICI DECEKIRANJEM polja STATUS_2 nekog artikla, a za taj artikal je "vezan" dokument ULAZA (prijemnica, trebovanje,...) , pronaci u istoj tabeli taj ARTIKAL koji je "usao" prijemnicom ili trebovanjemi promijeniti polje STATUS_1, u tom poronadjenom zapisu na -1, tj YES.

Ovaj ARTIKAL, u zapisu koji je dodat toj POVRATNICI ima izmedju ostalog i zapisan podatak, broj PRIJEMA, TREBOVANJA kojim je "usao".

Decekiranje bi trebalo da odradi nesto tipa:pronadji naziv ovog decekiranog artikla u tabeli ARTIKAL sa PRIJEMOM ili TREBOVANJEM broj taj i taj i kada ga pronadjes promijeni polje STATUS_1 sa -1.

Trtko, hvala na trudu.

Ako sam te dobro shvatio mislim da je ovo resenje tvog problema, a ako ne zelis da ti se vidi Status 1 u povratnici udji u Design mod i postvai Visible na false za Status 1.

Promjene mi trebaju u tabeli.
Evo slika koja ce mozda jos malo pojasniti sta zelim.]

Zeljko, zakomplikovao si mnogo ovo sa promenama statusa. da pogledas nesto odtema gde smo pisali kako se proemen statusa prate odistinski ? Samo sugestija, ne moras da prihvatis.

Da, vidim da sam zapetljao. Trazio sam po ovom forumu, ali nisam pronasao to sto trebam.
Nije u pitanju sam STATUS kao STATUS,nego pronalazenje istog artikla sa kojeg uklonim cekirani status, moze biti to i dvoklik. Potrebno mi je da pronadjem isti taj artikal iz POVRATNICE, u tabeli, ali da zadovoljava nekoliko uslova i kada ga pronadje na nekom drugom mjestu u tabeli da odradi izmjenu nekog podatka.
Treba pogledati formu POVRATNICA i tabelu ARTIKAL.
Pokusavao sam sa find and replace, iz helpa ali nisam uspio.
Zadnja stavlka u tabeli ima popunjena polja PRIJEM "P-001" naziv?artikla ARTIKAL 6, povratnica "P-001" i sttus cekiran. Zelim , da kada deselektjem taj artikal u formi, on pronadje u tabeli isti taj artikal (obiljezen je na slici i "pripada" dokumentu PRIJEM) i da njegovim pronalaskom cekira status 1.
U posljedenjem zapisu u tabeli postoji broj PRIJEMA i naziv artikla i mislio sam da mi to bude uslov pretrage...tipa pronadji artikal koji ima isti naziv kao selektovani, koji ima PRIJEM "P-001" , gdje je TREBOVANJE prazno i gdje je POVRATNICA prqzna. Kada pronadjes taj zapis, tj ARTIKAL selektuj polje selekt 1.
Jednostavno :)

Hvala svima na trudu i izvinite sto slabo prenosim ono sto mi treba.

Nazalost ne mogu da ti pomognem. Jos uvek ne razumem sta radis. Mozda moze Fox028 posle dodatnog objasnjenja? U sustini, nacin na koji pratis artikle na dokumentima je potpuno neuobicajen, da ne kazem pogresan. Kad ovo kazem, uopste ne mislim na statuse. Zato imas probleme i bice sve veci i veci. Mozda da opises sta to u stvari radis, koji to poslovni proces pokusavas da unapredis bazom podatka, pa da ti Zoran mozda pomogne sa valjanim modelom baze podataka. Posle ce programiranje biti znatno lakse. Neces morati da radis stvari koje je tesko i objasniti, a kamoli uraditi.

Nema nikakve veze moj posao sa artiklima. Samo me interesovalokako mogu nekim klikom, dogadjajem, da zamijenim neki podatak u tabeli necim sto mu zadam.

Trtko me dobro uputio, ali ja sam njegovo rjesenje pokusao na Access 2003, pa nije islo, a na Access 2007 sam blizu rjesenja.

Ovo ne radi ...javlja gresku Sintax error in query expression 'Naziv_Artikla'= 'ARTIKAL 6'
Set Art = Prijemnica.OpenRecordset("SELECT Status_1 FROM Artikal " & " WHERE Naziv_Artikla = '" & Text9)

Ovo radi
Set Art = Prijemnica.OpenRecordset("SELECT Status_1 FROM Artikal " & " WHERE Naziv_Artikla = 'ARTIKAL 6';")

Ovo ne radi...javlja gresku Sintax error (missing operator) in query expression 'Nayiv_Artikla'= 'ARTIKAL 6'
Set Art = Prijemnica.OpenRecordset("select Status_1 from Artikal where Naziv_Artikla= " & Text9)

Znaci da mi je problem u definisanju Text9 (u ovom slucaju to je polje u kome se ispisuje naziv artikla)

Zato ti ne radi sto mjesas kruske s jabukama.
Koliko vidim jos ne razumijes koje sve tipove varijabli imas i kako se s njima radi
Najsesce varijable su STRING i NUMERIC , s kojima ti sad radis

ako ti je naziv_artikla = STRING onda bi to izgledalo ovako ( obrati paznju na apostrofe ' )


Set Art = Prijemnica.OpenRecordset("select Status_1 from Artikal where Naziv_Artikla= '" & Text9 & "'")

pa bi upit izgledao ovako

Select status_1 from Artikal Where Naziv_artikla= 'Rakija sljivovica'


a ako ti ja NUMERIK


Set Art = Prijemnica.OpenRecordset("select Status_1 from Artikal where Naziv_Artikla= " & Text9 )

pa bi upit izgledao ovako

Select status_1 from Artikal Where Naziv_artikla = 19

To je to. Hvala Trtko, hvala i ostalima koji su ulozili znanje i vrijeme da mi objasne,