<%proid=trim(request("proid"))
conn.execute("update product set hits=hits+1 where proid="&proid&"")
sql="select * from product where proid="&proid
set rs=conn.execute(sql)%>
|
<%=rs("proname")%> |
 " border="0" > |
| <%=rs("yongtu")%> |
|
<%set rsp=server.createobject("adodb.recordset")
sqlp="select top 1 * from product where proid<"&rs("proid")&" order by proid desc"
rsp.open sqlp,conn,1,1
if not rsp.eof then
while not rsp.eof%>
上一個(gè):"><%=rsp("proname")%>
<%rsp.movenext
wend
end if
rsp.close
set rsp=nothing%>
|
|
<%set rsn=server.createobject("adodb.recordset")
sqln="select top 1 * from product where proid>"&rs("proid")&" order by proid asc"
rsn.open sqln,conn,1,1
if not rsn.eof then
while not rsn.eof%>
下一個(gè):"><%=rsn("proname")%>
<%rsn.movenext
wend
end if
rsn.close
set rsn=nothing%>
|
<%rs.close:set rs=nothing%> |
