<%
Sql="Select Top 5 * From Product Order By UpdateTime Desc"
Set Rs=Conn.ExeCute(Sql)
While Not Rs.Eof
%>
|

咖啡罐 |

全自动照相机 |
<%
Rs.MoveNext
Wend%>
<%
For I=1 To Rs.PageSize
If Rs.Eof Then
Exit For
End IF
%>
|

随身听 |

无线扫地机 |
<%
Rs.MoveNext
Next
%>
<%
Set Rs=Conn.ExeCute("Select * From Product Where Id="&Request("Id"))
If Not(Rs.Eof And Rs.Bof) Then
%>
|

超声波洗涤器 |

电控阀门 |
|

雪茄盒 |

烟纸盒 |
|
|
|
|
|
上一页
|
<%
End If
%>
|