<% on error resume next
id=Request.querystring("id")
if id <> "" then
dim fs
set fs=Server.CreateObject("Scripting.FileSystemObject")
Filepath = Server.MapPath(id)
if fs.FileExists( Filepath ) then
putanja = id
else
putanja = "aa"
end if
set fs=nothing
else
putanja = "aa"
end if
%>
JU Narodna knjižnica Kostrena | Novosti