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)