Stuff

}

if productCat="" or productCat="40" then
sqlstr="select id,productTopInfo,productImage,productPrice,productfactor,productTitle,TopProducts from Products where productCat=40 or TopProducts=true"
elseif productCat="39" then
sqlstr="select id,productTopInfo,productImage,productPrice,productfactor,productTitle,TopProducts from Products where productCat=39 or sales=true"
else
sqlstr="select id,productTopInfo,productImage,productPrice,productfactor,productTitle,TopProducts from Products where productCat like '"&Request.QueryString("productCat")&"'"
end if 
sqlstr=sqlstr &" and NotOnLine=false"
sqlstr=sqlstr & " order by order_1"
rs.Open sqlstr,con,3,3
if rs.RecordCount<1 then
Response.Write("<tr class='title' width='100%'><td width='100%'><font size=2><center>&#1500;&#1488; &#1511;&#1497;&#1502;&#1497;&#1501; &#1499;&#1512;&#1490;&#1506; &#1502;&#1493;&#1510;&#1512;&#1497;&#1501; &#1489;&#1511;&#1496;&#1490;&#1493;&#1512;&#1497;&#1492; &#1494;&#1493;</span></center></td><tr>")
else
rs.PageSize=12
rs.AbsolutePage=intPage
intRecCount = rs.PageSize
intPageCount = rs.PageCount
Do While Not rs.EOF And intRecCount > 0
%>
<tr valign=top class='TableColor'>
<td><%call oneProduct()%></td>
<%
intRecCount = intRecCount - 1
rs.MoveNext
if not rs.EOF And intRecCount > 0 then
%>
<td><%call oneProduct()%></td>
</tr>
<%
intRecCount = intRecCount - 1
rs.MoveNext
end if
loop
rs.Close()
end if
%>
</table></td></tr>
<tr><td colspan=2 align=center>
<%
for i=1 to intPageCount
if intPageCount>1 then
Response.Write("<a  href='javascript:changei("&i&")' class='FormLink' >"&i&"</a>&nbsp;")
end if
next
%>
</td></tr></table>
<!--#include file="InLineOneProduct.asp"-->


<script language=javascript>
function changei(x){
var url;
url="index.asp?pname=<%=Pname%>&productCat=<%=Request.QueryString("productCat")%>&page="+x;
document.location.href=url;
}

function noUserLogin()
{
alert('&#1497;&#1513; &#1510;&#1493;&#1512;&#1498; &#1500;&#1492;&#1512;&#1513;&#1501; &#1500;&#1488;&#1514;&#1512;');
}
</script>
</table>