<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 Kompakt()
Dim StaroIme As String
Dim NovoIme As String

'On Error Resume Next

StaroIme ="Imesa putanjom do be baze"
NovoIme = "Putanjadobebaze "\Nova.mdb"
    If Dir(NovoIme) <> "" Then _
        Kill NovoIme
    DBEng