Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
Function Art(Naziv_Art As String) As String
Dim I As Integer
Dim DuzStr As Integer
Dim Temp As String
Dim Znak As String
Const Znak1 = "
"
Const Znak2 = ""
DuzStr = Len(Naziv_Art)
Temp = Naziv_Art
For I = 1 To DuzStr
Znak = Mid(Naziv_Art, I, 1)