Set Rs=Guan.Execute("Select top 1 IID From Guan_A_Info Where IID<"&IID&" order by IID desc")
If Not (Rs.Bof And Rs.Eof) Then
if LID=0 then
response.Write("<center><a href='show_products.asp?iid="&Rs("IID")&"'>上一頁</a></center>")
else
response.Write("<center><a href='show_products.asp?iid="&Rs("IID")&"'>Next</a></center>")
end if
end if
Set Rs=Nothing
Set Rs=Guan.Execute("Select top 1 IID From Guan_A_Info Where IID>"&IID&"")
if LID=0 then
response.Write("<center><a href='show_products.asp?iid="&Rs("IID")&"'>下一頁</a></center>")
else
response.Write("<center><a href='show_products.asp?iid="&Rs("IID")&"'>Before</a></center>")
end if
Set Rs=Nothing
%>