Centar za edukaciju-BiH

Predmet:Problemi viÅ¡ekorisničkog rada

---

Imam Access bazu koja radi u mreži. Znači BackEnd na jednom kompjuteru, a FrontEnd na kompjuterima od 4 do 5 korisnika. Problem je kada dva ili možda viÅ¡e korisnika unosi ili mijenja podatak u istoj tablici i tada dolazi do greÅ¡ke. Ima li načina da se ovakovi problemi rijeÅ¡e.

---

Predmet:Re: Problemi viÅ¡ekorisničkog rada

---

Jedan nacin je da naprav is lokalne tabele pa da napr pri zatvaranju formi za unos preneses podatke ili da napravis nevezana polja na formi pa na komandni taster da vrsis update podataka u bazu.

---

Predmet:Re: Problemi viÅ¡ekorisničkog rada

---

Možeš li mi molim te, ovo malo bolje objasniti.
Kod mene je problem slijedeći. za generiranje ID-a u određenoj tablici koristim slijedeći kod koji si ti na napravio:

U formi kojom se pune podaci za polje ID, Default Value je =SifraN().
I sad kada više od jednog operatora otvori na svome kompjuteru tu istu formu u svakoj se generira isti String tako da samo jedan može spremiti podatak dok se ostalima javlja greška.

---

Predmet:Re: Problemi viÅ¡ekorisničkog rada

---

Sad mi je jasno sta ti se desava.
Mogao bi jos dodati broj racunara u sifru i nebi se poklapale.

Function SifraN()
Dim DB As Database
Dim SQL As String
Dim Rs As Recordset
Dim I As String


Set DB = CurrentDb
SQL = "SELECT Max(OrderID) AS BrojN " & "FROM tblProdaja" ' SQL za najveci OrderID u tabeli prodaja
Set Rs = DB.OpenRecordset(SQL) ' podize rekordset
If Format$(Rs.Fields(0)) <> "" Then ' ako ima redova tada
I = Val(Rs.Fields(0)) ' Ucitava vrijednost polja OrderID u var. i
End If
I = I + 1 ' na tu vrijednost dodaje 1

SifraN = Format(I, "000000")
Rs.Close
Set DB = Nothing
End Function

Imam goste nocas.
Sutra cu se pozabaviti ovim ako ne rijesis.

---

Predmet:Re: Problemi viÅ¡ekorisničkog rada

---

Probaj pozvati ovu proceduru na before update i zapisati id.
Znaci bilo bi
Me.ImeIDPolja=SifraN()

Ako ovo ne bude islo valja nesto kompleksnije uraditi.
Posto rece da imas oko 5 racunara mozda bi moglo da prodje.

---

Predmet:Re: Problemi viÅ¡ekorisničkog rada

---

Hvala, probat ću u srijedu jer do tada ne radim na poslu.

---

Predmet:Re: Problemi viÅ¡ekorisničkog rada

---

Evo isprobao sam prijedlog koji si mi dao i to mi ispravno upiše novi podatak u tablicu, jedino je problem što u formi kroz koje unosim novi podatak polje ID na koje se ovo odnos stalno ostaje prazno tj ne vidi se novi ID sve dok se ne ode na novi unos pa se onda ponovo vrati na prednodni.

---

Predmet:Re: Problemi viÅ¡ekorisničkog rada

---

Evo i primjer

Prilozi:

---

Predmet:Re: Problemi viÅ¡ekorisničkog rada

---

Mozda si skinuo ovu proceduru sa onog default value. Cini mi se da je bila tamo.
Trebala bi ostati ako hoces da vidis, mada cesto neces vidjeti pravi odnosno on ce se ponovo generisati pa ako vec ima takav ovecat ce ga.

---

Predmet:Re: Problemi viÅ¡ekorisničkog rada

---

Ovo je O.K.
Hvala

---