<% Dim IsLogin
IsLogin = Session("status")
if IsLogin<>1 then
response.redirect("login.asp?login=no")
end if
Dim admin
admin = Session("admin")
%>
Podglad akapitu
<%
id = Request.queryString("id")
sql = "select * from akapit where id="& id
set rs=dbc.Execute(sql)
Dim kategoria
kategoria = CStr(rs("kategoria"))
%>