 Product Category |
|
<%
dim subcat(50)
set rs = Server.CreateObject("ADODB.RECORDSET")
sql_work= "SELECT * from pro_tree where type_id1=40 order by type_order asc"
rs.Open sql_work , conn ,1,1
i=0
while (not rs.eof)
set rs_cat = Server.CreateObject("ADODB.RECORDSET")
sql_cat = "SELECT * from pro_tree where type_id1=" & rs.Fields("type_id") & " order by type_order asc"
rs_cat.Open sql_cat , conn ,1,1
' if (not rs_cat.eof) or (rs("type_orderby")=1) then
%>
|
=<%=rs("type_id") %>"><%=rs("text_en") %>
|
<%
while not rs_cat.EOF and not rs_cat.BOF
set rs_3 = Server.CreateObject("ADODB.RECORDSET")
sql_3 = "SELECT * from pro_tree where type_id1=" & rs_cat("type_id") & " order by type_order asc"
rs_3.Open sql_3, conn ,1,1
%>
| |
<%
if not rs_3.eof then
response.write "" & rs_cat("text_en") & ""
else
%>
&cat_name=<%=rs_cat("text_en")%>" >
<%=rs_cat("text_en")%>
<%
subcat(i)=rs_cat("type_id")
i=i+1
end if
rs_3.close
set rs_3=nothing
%>
|
<%
rs_cat.movenext
wend
%>
|
<%
' end if
rs_cat.Close
set rs_cat = nothing
rs.movenext
wend
rs.close
set rs=nothing
%>
|
| LOGIN： |
|
|
|
|
<%
set rs_pro = Server.CreateObject("ADODB.RECORDSET")
if request("cat_id")<>"" then
sql_pro= "SELECT * from model where model_categoryid=" & request("cat_id") & " order by model_order asc"
elseif request("supcat_id")<>"" then
sql_pro= "SELECT * from model where model_cat_high_id=" & request("supcat_id") & " order by model_categoryid,model_order asc"
else
sql_pro= "SELECT * from model where model_categoryid=" & subcat(0)
for i=1 to 50
if subcat(i)<>"" then
sql_pro= sql_pro & " or model_categoryid=" & subcat(i)
end if
next
sql_pro= sql_pro & " order by model_categoryid,model_order asc" 'where model_categoryid=115
end if
rs_pro.Open sql_pro , conn ,1,1
rs_pro.pagesize=3
dim number_record,number_page,page_now,record_now
number_record=rs_pro.recordcount
number_page=rs_pro.pagecount
page_now=rs_pro.absolutepage
if request("page")<>"" then
rs_pro.absolutepage=CInt(request("page"))
else
page_now=1
end if
record_now=(page_now-1)*rs_pro.pagesize
j=1
if not rs_pro.eof then
while (j<=3) and (not rs_pro.eof)
%>
<%
j=j+1
rs_pro.movenext
wend
else
%>
|
| Sorry,No product of this category now. |
<%
end if
rs_pro.close
set rs_pro=nothing
%>
|
|
|
|
" width="140" style="padding-left:15px; padding-top:10x" border="0" align="right" />