<% on error resume next dirs = "../" PID = SafeRequest("PID", 1) CatID = SafeRequest("CatID", 1) if CatID = "" then CatID = 71 flag = Request("flag") %>

<%=Cascade%> <% sql = "select p.abimg, p.PID, p.subject, p.abstract, c.Price, p.onLine from tblProduct c, tblPost p where p.PID = c.PostID and p.CatID = " & CatID & " and p.OnLine = 'y' order by pOrder desc" %> 回上一頁｜回頁首