<% checkPermission 0 catid = stripInput(request.querystring("id")) if catid = "" then mode = 1 title = "Lista kategorier" else sql = "exec fox_getlcatname " & catid set rs1 = conn.execute(sql) if rs1.EOF then mode = 1 title = "Lista kategorier" else mode = 2 title = rs1("lcatname") end if rs1.close set rs1 = nothing end if linkedperm = getPermission(1) %> Rollspelssmedjan - Länkar

Rollspelssmedjan logotyp

Slumpvist vald bild

 

Länkar

Länkkategorier

<% getLinkMenu %>

Tillbaka

<%= title %>

<% select case mode case 2 sql = "exec fox_getlinks " & catid set rs1 = conn.execute(sql) while not rs1.EOF linkid = rs1("linkid") linkname = rs1("linkname") linkurl = rs1("linkurl") linknewwindow = cint(rs1("linknewwindow")) linkdescription = rs1("linkdescription") rs1.movenext if linknewwindow = 1 then target = "target=" & chr(34) & "_blank" & chr(34) offsite = " >> Nytt fönster" else target = "" offsite = "" end if %>

><%= linkname %><%= offsite %>
<%= linkdescription %>

<% wend rs1.close set rs1 = nothing case else sql = "exec fox_getlcatname " set rs1 = conn.execute(sql) while not rs1.EOF lcatid = rs1("lcatid") lcatname = rs1("lcatname") lcatdesc = rs1("lcatdesc") rs1.movenext %>

<%= lcatname %>
<%= lcatdesc %>

<% wend rs1.close set rs1 = nothing end select %>
<% makeFooter %>