<%
keyword=1190
sql ="Select * From Prin_Order_Data where pro like '%"&keyword&"%'and Conf_key='No'order by carlenderregis DESC "
Set RS =Server.CreateObject("ADODB.Recordset")
RS.open Sql,Conn,1,3
if rs.bof or rs.eof then
response.write "ไม่มีข้อมูลในตาราง"
else
Nrecord=RS.recordcount
Rs.pageSize = pageLen
totalPage = Rs.PageCount
Rs.absolutePage = pageNo
%>