| White Man | 23.06.2016 23:05 | 
|---|---|
| Predmet:Re: After update problem To je to, hvala. Mozete li sada da mi uradite dugme za save, da kad snimi zakljuca combo box ID_Artikl, i kad se obrise sub forma tek tada otkljuca i dozvoli ponovni unos. Hvala unapred. | |
| dex | 24.06.2016 07:41 | 
|---|---|
| Predmet:Re: After update problem Kod za snimanje i zakljucavanje je Me.dirty = false Me.Id_Artikl.locked = true | |
| White Man | 19.06.2016 13:00 | 
|---|---|
| Predmet:After update problem Kako da namestim u formi frmRadniList, da kada odaberem ime artikla da u sab formi subfrmQueryRadniListStavke sve operacije vezane za taj artikl. Hvala unapred. | |
| Prilozi: after update.rar (Velicina datoteke:27.48 KB) | |
| Gjoreski | 19.06.2016 19:23 | 
|---|---|
| Predmet:Re: After update problem Na combo gde izaberes artikal na afterupdate sa jedan sql selektiraj sve operacije za taj artikal i prebaci na subformi. Mozes prebacivajne isto napraviti sa insert direkno u tabelama, a na subforma uradis samo refresh | |
| White Man | 19.06.2016 19:46 | 
|---|---|
| Predmet:Re: After update problem Treba da se napise kod, da kad abdejtuje operacije, ne dozvoljava ponovni unos artikla. | |
| zxz | 20.06.2016 21:06 | 
|---|---|
| Predmet:Re: After update problem Nije mi bas jasno sta hoces, drugo i nema podataka ukucannih da bi se mogao snaci. Imas formu koja je napravljena na osnovu tabele tblRadniList i ti imas polje šifre artikla i kako sam te razumio ti hoces kada odabere šifru artikla da ti se u subformi prepisu sve stavke iz tabele tblArtikliStavke za taj artikl. Jesm li dobro razumio? | |
| zxz | 20.06.2016 21:31 | 
|---|---|
| Predmet:Re: After update problem Ako je to onda evo kod. Private Sub ID_Artikl_AfterUpdate() Dim Db As Database Dim Rs As Recordset Dim IDArt As Integer Dim Rs1 As Recordset Set Rs1 = Forms![frmRadniList]![subfrmQueryRadniListStavke].Form.RecordsetClone IDArt = Me.ID_Artikl Set Db = CurrentDb Set Rs = Db.OpenRecordset("SELECT ID_ArtiklStavke FROM TblArtiklStavke WHERE ID_Artikl=" & IDArt) Do While Not Rs.EOF Rs1.AddNew Rs1!ID_RadniList = Me.ID_RadniList Rs1!ID_ArtiklStavke = Rs.Fields(0) Rs1.Update Rs.MoveNext Loop End Sub | |
| White Man | 20.06.2016 22:57 | 
|---|---|
| Predmet:Re: After update problem Da taj princip, samo sto ako se odabere jedan proizvod i on abdejtuje podatke, ako se opet odabere ta ili drugi on dodaje ispod, trebalo bi samo jednom da abdejtuje. I drugo ako se otvori sledeci radni lisr izbacuje gresku u Rs1.Update. Ako moze to da se ispravi i doradi kod. Hvala unapred. | |
| dex | 21.06.2016 13:08 | 
|---|---|
| Predmet:Re: After update problem Na kraju koda dodaj me.ID_Artikl.locked=true na formu na on Dirty ubaci me.ID_Artikl.locked=false | |
| White Man | 21.06.2016 16:22 | 
|---|---|
| Predmet:Re: After update problem Nece, da li mozete da ubacite ceo kod u bazu koju sam gore nakacio i da zakacite kad zavrsite? Hvala unapred. | |