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:
PreuzmiIzvorni kôd (vbnet):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"
Set Rs = DB.OpenRecordset(SQL)
If Format$(Rs.Fields(0)) <> "" Then
I = Val(Rs.Fields(0))
End If
I = I + 1
SifraN = Format(I, "000000")
Rs.Close
Set DB = Nothing
End Function
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.
Pozdrav