Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
sub procitaj() dim strData as string dim FF as integer dim pocetak as integer dim kraj as integer FF=FreeFile() open App.Path & "\ImeFajla.txt" For INPUT As #FF Line INPUT #FF,strData Close "FF pocetak=Instr(1,strData,",") kraj=Instr(pocetak+1,strData,",") sifra=Left(strData,pocetak-1) grupa=Mid(strData,p