<%if request("do")= "del" Then SQLDel = "UPDATE Forces_SidenavBanners SET Deleted = 'yes' WHERE LinkID = "&request("id")&" " Set RSDel = MyConn.Execute(SQLDel) response.redirect "admin-shopping-links.asp" end if %>

SIDENAV BANNERS

Add a Sidenav Banner



Sidenav Banners
<% SQLAccountsR = "SELECT * FROM Forces_SidenavBanners WHERE Deleted = 'no' ORDER BY LinkID DESC" Set RSAccountsR= MyConn.Execute(SQLAccountsR) if RSAccountsR.EOF then response.write("") else i = 0 while not RSAccountsR.EOF %> <%i= i + 1%> <%if int(i)/2 = int(i)\2 then%> <%else%> <%end if%> <% RSAccountsR.MoveNext WEND End If RSAccountsR.Close %>
 Title   Link 
There are currently no sidenav banners.
<%=RSAccountsR("Title")%> " width="100" alt="" border="0">
<%=RSAccountsR("Link")%>
" onclick="if(!confirm('Are you sure you want to delete this record? It will be removed permanently!')) return false;">