[es] - find & replace u recordsetovima

zeljko-pg
kratko
Pg

Član broj: 284110
Poruke: 18
*.144.crnagora.net.

+1 Profil

^{15.01.2012. u 13:08 - pre 149 meseci}

Kako napisati kod pomocu kojeg bih mogao da pronadjem zapis na osnovu nekoliko uslova i da u tom zapisu izvrsim projmjene odredjenih polja.
Naime, zelio bih da DECEKIRANJEM polja Status_2 u formi POVRTANICA pronadjem zapis u tabeli ARTIKAL koji odgovara nazivu artikla i broju PRIJEMA ili TREBOVANJA i da u tom pronadjenom zapisu promijenim STATUS_1 u YES.

Npr: Decekiranjem polja Status_2 na dogadjaj after upload pronadji TAJ Naziv_Artikla gdje Prijem odgovara Prijem, Trebovanje odgovara Trebovanje i kada pronadjes, promijeni Status_1 na YES.
Volio bih da to odradim koristeci kod i radeci sa record setovima jer sam neka druga dodavanja, brisanja, ... uspio da rijesim koristeci rad sa recordsetovima.
Nadam se da je jasno sta zelim.

Prilazem tabele. Hvala!

_{[Ovu poruku je menjao zeljko-pg dana 15.01.2012. u 21:09 GMT+1]}

Prikačeni fajlovi

primjer.rar - 55.99k

primjer2003.rar - 20.22k

Odgovor na temu

FOX028
Visoka tehnicka skola strukovnih studija
Kosovska Mitrovica

Član broj: 258986
Poruke: 850

Sajt: https://www.zile028.com

+49 Profil

Re: find & replace u recordsetovima

^{15.01.2012. u 13:33 - pre 149 meseci}

Pokusaj ponovo da okacis tvoju bazu.

[email protected]=

Odgovor na temu

Trtko
Koprivnica

Član broj: 69494
Poruke: 695
*.adsl.net.t-com.hr.

+8 Profil

Re: find & replace u recordsetovima

^{16.01.2012. u 10:36 - pre 149 meseci}

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

Odgovor na temu

zeljko-pg
kratko
Pg

Član broj: 284110
Poruke: 18
*.crnagora.net.

+1 Profil

Re: find & replace u recordsetovima

^{16.01.2012. u 17:14 - pre 149 meseci}

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.

Odgovor na temu

FOX028
Visoka tehnicka skola strukovnih studija
Kosovska Mitrovica

Član broj: 258986
Poruke: 850

Sajt: https://www.zile028.com

+49 Profil

Re: find & replace u recordsetovima

^{16.01.2012. u 18:10 - pre 149 meseci}

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.

[email protected]=

Prikačeni fajlovi

primjer2003_FOX028.rar - 31.91k

Odgovor na temu

zeljko-pg
kratko
Pg

Član broj: 284110
Poruke: 18
*.crnagora.net.

+1 Profil

Re: find & replace u recordsetovima

^{16.01.2012. u 18:37 - pre 149 meseci}

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

Prikačeni fajlovi

primjer.JPG - 56.71k

Odgovor na temu

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 3085
*.100.46-69.q9.net.

+79 Profil

Re: find & replace u recordsetovima

^{16.01.2012. u 19:30 - pre 149 meseci}

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.

Odgovor na temu

zeljko-pg
kratko
Pg

Član broj: 284110
Poruke: 18
*.crnagora.net.

+1 Profil

Re: find & replace u recordsetovima

^{17.01.2012. u 00:03 - pre 149 meseci}

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.

Odgovor na temu

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 3085
*.100.46-69.q9.net.

+79 Profil

Re: find & replace u recordsetovima

^{17.01.2012. u 16:20 - pre 149 meseci}

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.

Odgovor na temu

zeljko-pg
kratko
Pg

Član broj: 284110
Poruke: 18
*.crnagora.net.

+1 Profil

Re: find & replace u recordsetovima

^{17.01.2012. u 22:54 - pre 149 meseci}

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)

Odgovor na temu

Trtko
Koprivnica

Član broj: 69494
Poruke: 695
*.adsl.net.t-com.hr.

+8 Profil

Re: find & replace u recordsetovima

^{18.01.2012. u 07:45 - pre 149 meseci}

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

Odgovor na temu

zeljko-pg
kratko
Pg

Član broj: 284110
Poruke: 18
*.crnagora.net.

+1 Profil

Re: find & replace u recordsetovima

^{18.01.2012. u 09:42 - pre 149 meseci}

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

Odgovor na temu