%@ Language=JavaScript%>
<%
/* Connection Pooler */
var ConnectionCache = new ConnectionCache()
/* server-side recordset */
var rsSubCatagory = new Recordset("rsSubCatagory", "ACC_venturetape", "", "", "SELECT * FROM Subcatagories", "SubCatagoryID", true, 2, 3, 3, "");
rsSubCatagory_BeforeOpen();
rsSubCatagory.Open();
rsSubCatagory.ProcessAction();
rsSubCatagory.SetMessages("","");
/* server-side recordset */
var rsCatagory = new Recordset("rsCatagory", "ACC_venturetape", "", "", "SELECT * FROM Categories", "CategoryID", true, 2, 3, 3, "");
rsCatagory_BeforeOpen();
rsCatagory.Open();
rsCatagory.ProcessAction();
rsCatagory.SetMessages("","");
%>
<%
function rsSubCatagory_BeforeOpen() {
// I check the FilterCriteria. If it exists, the recordset already
// has a filter and we don't assign the action. I do this so the
// navigation buttons will work properly
if (rsSubCatagory.FilterCriteria == "")
{
rsSubCatagory.Action = "Filter(\"" + "CatagoryID = 4" + "\")"
}
}
function rsCatagory_BeforeOpen() {
if (rsSubCatagory)
{
if (rsSubCatagory.GetColumnValue("CatagoryID") != "undefined" && !rsSubCatagory.IsEOF() && !rsSubCatagory.IsBOF())
{
var where = "CategoryID" + " = '" + FilterSupportEscapeQuotes(rsSubCatagory.GetColumnValue("CatagoryID")) + "'"
rsCatagory.Action = "Filter(\"" + where + "\")"
}
}
else
{
Response.Write("
Drumbeat Interaction Message: Please make sure that the Recordset icon, rsSubCatagory, is to the left of the Recordset icon, rsCatagory, in the basement of the layout.
")
Response.End
}
}
function Text1_Server(html) {
var theValue = rsCatagory.GetColumnValue("Category")
html = subAwithBinC("[section]", theValue, html)
Response.Write(html)
}
%>
Venture Tape Insulation Catalog