<% set rsantal = connect.execute ("select antal from antal") set rsiantal = connect.execute ("select iantal from antal") set rsvisa = connect.execute ("select id from visa") %> News and Article manager <% rsantal.close set rsantal = nothing rsiantal.close set rsiantal = nothing rsvisa.close set rsvisa = nothing %>
Setup
Menu
   

Number of news/articles to show:(currently showing <%= rsantal("antal") %>)

<!--#include file="inc_visa_nyheter.asp" -->

Preview
 

Number of summaries to show:(currently showing <%= rsiantal("iantal") %>)

<!--#include file="inc_visa_ingress.asp" -->

Preview
 

Article to show:(currently showing ID <%= rsvisa("id") %>)

<!--#include file="include.asp" -->

Preview
 
<% if request("action") = "modify" then strantal=request.form("antal") connect.execute ("update antal set antal="& strantal &"") response.Redirect("setup.asp") end if if request("action") = "modify_v" then intid=request.form("visa") connect.execute ("update visa set id="& intid &"") response.Redirect("setup.asp") end if if request("action") = "modify_i" then striantal=request.form("iantal") connect.execute ("update antal set iantal="& striantal &"") response.Redirect("setup.asp") end if %>