Dim Program As String Program = App.path & "\RAR.EXE" ' treba da ima rar.exe vo istiot direktorium od ovaj program Dim Fajlovi As String Fajlovi= App.path & "\Bazi\*.mdb" Dim VoRar As String VoRar= "C\Bazi.rar"