<%dbdns="../"%> <% 'cp.asp?aid=竖排几排&bid=产品个数&cid=标题字数&did=要不要标题&eid=推荐&fid=图片尺寸 'cid 一个中文字算两个字符 'did 0不要 1要 'eid 0不推荐 1推荐 aid=int(request.querystring("aid")) bid=int(request.querystring("bid")) cid=int(request.querystring("cid")) did=int(request.querystring("did")) eid=int(request.querystring("eid")) fid=int(request.querystring("fid")) if eid=1 then e=" and SMT_key3=1" cpviews="" set rs=server.createobject("adodb.recordset") sql="select top "&bid&" * from SMT_cp where SMT_key=1 and SMT_key1=1 and SMT_key2=1"&e&" order by SMT_id desc" rs.open sql,conn,1,1 n=0 do while not rs.eof n=n+1 cpviews=cpviews&"" if n mod aid=0 then cpviews=cpviews&"" end if rs.movenext loop rs.close set rs=nothing cpviews=cpviews&"

" if did=1 then cpviews=cpviews&"
"&LeftT(rs("SMT_cpname"),cid)&"" end if cpviews=cpviews&"

" %> document.write('<%=cpviews%>')