 |
|
        |
|
<% If Not istop then objRS.Open sqlBreadcrumbCat(siteCode, pgroup), objConn Dim bcHREF, bcName Do While Not objRS.EOF bcName = objRS("name") bcHREF = " " Response.Write Trim(bcHREF) & VbCrLf Response.Write " " Response.Write Trim(bcName) & VbCrLf Response.Write " " & VbCrLf Response.Write " > " & VbCrLf objRS.MoveNext Loop objRS.close End If Response.Write catname %> |
| |
|
|||
|
|
|
|
       |
| 1.800.456.0321privacy
& securityterms
of use©2003
by Country Curtains Mail Order, Inc. |
|