Editing: research/find_search_res.asp

<!--#INCLUDE FILE="Connectdb.asp"--> <% total=0 'if search_key = "" then search_key=session("search_key") type_search=session("type_search") ' response.write"llll"& type_search ' response.write "<br>searchkey"&search_key 'end if 'search_key="��" ' type_search=2 ' sql = "select * from search_th_ms" select case type_search case 1 '���ʧҹ�Ԩ�� sql = "select * from search_th_ms where search_id like '%"&search_key&"%' order by search_id" case 2 '��������ͧ sql = "select * from search_th_ms where search_title like '%"&search_key&"%' order by search_id" case 3 '����� sql = "select * from search_th_ms where search_aut like '%"&search_key&"%'order by search_id" case 4 '�� (��) sql = "select * from search_th_ms where search_year like '%"&search_key&"%'order by search_id" case 5 'Key word sql = "select * from search_th_ms where search_key like '%"&search_key&"%'order by search_id" end select Set ors = Server.CreateObject("ADODB.Recordset") ors.Open sql, Conn, 1, 3 'response.write "<br>oooo"&sql if not ors.eof then '�礤�� sql �����㹰ҹ������� result = ors(0) end if '********************** if result > 0 then ors.movefirst colorv=1 do while not ors.eof ors.movenext total=total+1 loop ors.close set ors=nothing end if 'session("total")=total 'end if '�ͧ if total = "" ' total=session("total") 'response.write "<br>total="&total if total=0 then response.write "�ѧ����բ����Ť�Ѻ" else if request("no")="" then pageno=1 start=1 else pageno=int(request("no")) start=int(request("start")) end if pagesize=10 totalpage=total\pagesize if (total mod pagesize) <> "0" then totalpage=totalpage+1 end if if pageno<> totalpage then endrecord=pagesize else if (total mod pagesize)=0 then endrecord=pagesize else endrecord=(total mod pagesize) end if end if end if %>