 |
| Select series |
|
 |
|
<%
if pTypeFlag = "a" then
sql = "select * from productType where level=1 and left(code,4)='"&ptype&"'"
else
sql = "select * from productType2 where level=1 and left(code,4)='"&ptype&"'"
end if
rs.open sql,conn,3
if pType2="" then
if not rs.eof then
pType2 = rs("code")
end if
end if
do while not rs.eof
if pType2=rs("code") then
'classFlag = "STYLE2"
pType2Name = rs("mingcheng")
pType2Pic= rs("pic1")
else
classFlag = ""
end if
%>
| &ptype2=<%=rs("code")%>" class="menu02_a" > <%=rs("mingcheng")%> |
<% rs.moveNext
loop
rs.close
%>
 |
 |
|
 |
| |
|
 |
|
|
 |
 |
| HOME | Product | Product F/P |
 |
| Latest Launch |
more... |
<%
sql = " select top 1 * from product where newflag=1 order by px,updateriqi desc"
rs.Open sql,Conn,3
for i=1 to 1
if rs.eof then
pid=""
pxinghao = ""
pmingcheng = ""
pguige = ""
picName = "../ima/pic01.jpg"
else
pid=rs("pid")
pxinghao = rs("pxinghao")
pmingcheng = rs("pmingcheng")
mingcheng = left(mingcheng,inStr(mingcheng,chr(13)))
pguige = rs("pguige")
pguige = left(pguige,inStr(pguige,chr(13)))
picName = "../upload/product/"&rs("pic6")
strlen = 14
rs.movenext
end if
next
rs.close
%>
<% if pid<>"" then %>
<%else%>
<%end if%>
|
 |
Model: <%=pxinghao%> |
| Name: <%=pmingcheng%> |
| Size: <%=pguige%> |
| |
|
|
|
 |
| Recommending |
more... |
<%
sql = " select top 4 * from product where tuijianFlag=1 order by px,updateriqi desc"
rs.Open sql,Conn,3
dim pid1(4),picname1(4)
for i=1 to 4
if rs.eof then
pid1(i)=""
'pxinghao = ""
'pmingcheng = ""
'pguige = ""
picName1(i) = "../ima/pic01.jpg"
else
pid1(i)=rs("pid")
'pxinghao = rs("pxinghao")
'pmingcheng = rs("pmingcheng")
'mingcheng = left(mingcheng,inStr(mingcheng,chr(13)))
'pguige = rs("pguige")
'pguige = left(pguige,inStr(pguige,chr(13)))
picName1(i) = "../upload/product/"&rs("pic6")
'strlen = 14
rs.movenext
end if
next
rs.close
%>
<% if pid1(1)<>"" then %>
<%else%>
<%end if%> |
 |
<% if pid1(2)<>"" then %>
<%else%>
<%end if%> |
 |
<% if pid1(3)<>"" then %>
<%else%>
<%end if%> |
 |
<% if pid1(4)<>"" then %>
<%else%>
<%end if%> |
|
|
|
|
|
 |
| Office Chair |
 |
Galleria Sofa |
 |
Product by Life Style |
 |
PROJECT Function |
<%
sql="select * from productType where left(code,4)='H006'"
set rs=conn.execute(sql)
while not rs.eof
if len(rs("code"))>4 then
%>
| "><%=rs("mingcheng")%> |
<%
end if
rs.movenext
wend
%>
|
|
<%
sql="select * from productType where left(code,4)='H005'"
set rs=conn.execute(sql)
while not rs.eof
if len(rs("code"))>4 then
%>
| "><%=rs("mingcheng")%> |
<%
end if
rs.movenext
wend
rs.close
%>
|
|
<%
sql = "select * from productType where level=0 and code<>'H005' and code<>'H006'and code<>'H007'"
rs.open sql,conn,3
'if pType="" then
' if not rs.eof then
' pType = rs("code")
' pTypeFlag = "a"
' end if
' end if
do while not rs.eof
%>
| "><%=rs("mingcheng")%> |
<%
rs.movenext
loop
rs.close
%>
|
|
|
<%
sql="select * from productType where left(code,4)='H007'"
set rs=conn.execute(sql)
while not rs.eof
if len(rs("code"))>4 then
%>
| "><%=rs("mingcheng")%> |
<%
end if
rs.movenext
wend
rs.close
%>
|
|
 |
 |
 |
 |
|
|
 |
|
|
|