<%
Dim RS3,sql3,content3,ProductID,UploadFiles
SET RS3=SErver.CreateObject("ADODB.RECORDSET")
sql3="Select * From Product Order BY ProductID DESC "
RS3.Open sql3,conn,1,3
ProductID=RS3.Fields("ProductID")
DefaultPicUrl=RS3.Fields("DefaultPicUrl")
DO While NOT RS3.Eof
%>
<%
Dim RS3,sql3,content3,ProductID,UploadFiles
SET RS3=SErver.CreateObject("ADODB.RECORDSET")
sql3="Select * From Product Order BY ProductID DESC "
rs.Open sql3,conn,1,3
DO While NOT rs.Eof
%>
<a href="show.asp?ProductID=<%=rs("ProductID")
%>"><img src=<%=rs("DefaultPicUrl")
%> border="0" width="103" height="84"></a>
<%
rs.MoveNext
Loop%>