<% Set rs_0 = Server.CreateObject("ADODB.Recordset") sql_0="select * from "&table_1&" where exist_it = '1' and re_sno = 0 order by sno desc" 'Response.Write sql_0 rs_0.Open sql_0,conn,1,3 msg = request("msg") if rs_0.eof then Response.Write "目前沒有任何最新消息.." else b_page = request("b_page") if len(b_page)=0 then b_page = 1 end if rs_0.pagesize = 10 rs_0.AbsolutePage = b_page %>