<br />
<b>Notice</b>:  Undefined offset: 2 in <b>/home2/icentarb/public_html/icentar/classes/class.permissions.php</b> on line <b>735</b><br />
Function Ucitaj()
On Error Resume Next
Dim Db As Database
Dim Rs As Recordset
Dim Mjesto As String, Zemlja As String
Dim X

Set hd = Me.WebBrowser0.Document
Set Db = CurrentDb
Set Rs = Forms![frmGdjeJeProdan].RecordsetClone
Rs.MoveLast
Rs.MoveFirst
Do While Not Rs.EOF
Mjesto = Format$(Rs!Mjesto)
If Mjesto <> "" Then

' **** ovdje sam stavio  ' vbCrLf & " - " & Format$(Rs!Proizvod)' jer bih želio da ovo ide u novi red, ali to ne radi ****

    hd.all("opis").Value = Format$(Rs!Firma) & _
    ", " & Format$(Rs!Adresa) & _
    ", " & Format$(Rs!Mjesto) & _
    vbCrLf & " - " & Format$(Rs!Proizvod) & _
    " - " & Format$(Rs!SumOfIzlaz) & " kom."
    
    hd.all("address").Value = Mjesto
    hd.all("findAdrress").Click
    End If
    
start:

    X = hd.all("PlaceName").Value
    If X = "True" Th