<%@ Language=VBScript %> <%Response.Buffer=True%> Wades - Monthly Specials <% OpenConnection1 Set rs=Server.CreateObject("ADODB.Recordset") Sel="Select * From Monthly WHERE nDisplay=1 ORDER BY MonthlyID" rs.Open Sel,DB,1,3 %>

 

<%If Not rs.EOF then While Not rs.EOF %> <%rs.MoveNext Wend rs.Close Else rs.Close%> <%End If%>
">
 
<%=rs("txtHeading")%>
<%=rs("txtDescription")%>
 
Our Monthly Specials are currently unavailable.
Please check back soon!