<%
if request("set") <> "" then
Set rs = CreateObject("adodb.recordset")
sql = "SELECT * FROM tbl_status"
rs.open sql, cnn, 1, 3
if rs.eof then rs.addnew
rs("active") = request("set")
rs.update
rs.close
set rs = nothing
end if
Set rs = CreateObject("adodb.recordset")
sql = "SELECT * FROM tbl_status"
rs.open sql, cnn, 1, 3
if rs.eof then
status = "0"
else
status = abs(cint(rs("active")))
end if
rs.close
set rs = nothing
%>
Web Ordering - Activate / Deactivate
<%if status & "" = "1" then%>
The online ordering system is currently online.
Click here to take it offline.
<%else%>
The online ordering system is currently offline.
Click here to put it online.
<%end if%>
<%
cnn.close
set cnn = nothing
%>