<%if request("no") ="" then pageno =1 else pageno=request("no") end if%>
กลับหน้าแรกหามานานท่องเที่ยวทั่วไทย

ลิงก์ผู้สนับสนุน : -




 
Power by ::::::::http://www.thaiasp.net

พบปัญหาอะไรบอกกันบ้างนะ.. เช่น Url ซ้ำกันหรือเข้าไม่ได้ ( บอกเป็นตัวเลขในวงเล็บนะครับ )
- - - - - - - -> คลิกบอกตรงนี้เลยอ่ะ <- - - - - - - -

:: ใส่คำที่คุณต้องการค้นหา ::
   

คำที่คุณกำลังค้นหา คือ <%=request("keyword")%>
   ต้องการเพิ่มเว็บไซต์กรุณาคลิกที่นี่ || ต้องการดูเว็บไซต์ทั้งหมดคลิกที่นี่

  • Talamok.com ทะเลหมอกดอทคอม แนะนำสถานที่ชมวิวทะเลหมอกทั่วไทย อาทิ เช่น เนินกูดดอย ผาโหล่นน้อย ดอยวาว

  • พื้นที่โฆษณา 1 บรรทัด พื้นที่นี้รอท่านอยู่นะครับ | สนใจลงโฆษณาติดต่อ 08-1629-3354 โจ ( เจ้าของเว็บหามานานดอทคอม )
     
<% thmonth=array("ม.ค.","ก.พ.","มี.ค.","เม.ย.","พ.ค.","มิ.ย.","ก.ค.","ส.ค.","ก.ย.","ต.ค.","พ.ย.","ธ.ค.") ' ---- ส่วนติดต่อกับฐานข้อมูลเพื่อแสดงรายการคำถาม Set Conn=Server.CreateObject("ADODB.Connection") conn.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("../cgi-bin/superintrowebsite.mdb") if request("keyword") <> "" then Sql="Select id,name,address,describ,group from webdat where (name like '%"&request("keyword")&"%') or (describ like '%"&request("keyword")&"%') or (group like '%"&request("keyword")&"%') order by id desc" else Sql="Select id,name,address,describ,group from webdat order by id desc" end if Set RS =Server.CreateObject("ADODB.Recordset") RS.open Sql,Conn,1,3 total=RS.Recordcount if total=0 then%>
ไม่พบข้อมูล.....ใกล้เคียงกับคำที่คุณต้องการครับผม
----> ลองคำอื่นดูนะครับ
<%else pagesize=20 totalpage=total\pagesize if (total mod pagesize) <> "0" then totalpage= totalpage+1 end if RS.Move pagesize*(pageno-1) a=1 if trim(pageno) <> trim(totalpage) then endrecord = pagesize else if (total mod pagesize)=0 then endrecord=10 else endrecord=(total mod pagesize) end if end if For a=1 to endrecord%> <%ano=rs("name") ano=replace(ano,"<","<") ano=replace(ano,chr(13),"
") if flag=8 then flag=6 color="ffffff" elseif flag=4 then flag=8 color="ffffff" elseif flag=2 then flag=4 color="ffffff" elseif flag=3 then flag=2 color="ffffff" else flag=3 color="ffffff" 'สีอ่อนสุด End If %>

target="_blank"><%=RS("address")%> - <%=RS("name")%> ---> ( <%=RS("id")%> )
<%=RS("describ")%>
กลุ่ม : : :> target=_blank><%=RS("group")%>
  <%RS.MoveNext Next rs.close conn.close%>
: : : : : : : : ค้นหาพบทั้งหมด <%=total%> website : : : : : : : :

<% response.write "
กำลังแสดงหน้าที่ " & pageno & "/" & totalpage & "
" %> หน้าที่ <%For b=1 to totalpage%> "><%=b%> | <%Next%><%end if%>

กลับด้านบน
Power by ::::::::http://www.thaiasp.net

:: ใส่คำที่คุณต้องการค้นหา ::
   

 
   ต้องการเพิ่มเว็บไซต์กรุณาคลิกที่นี่ || ต้องการดูเว็บไซต์ทั้งหมดคลิกที่นี่

ลิงก์ผู้สนับสนุน : -


 
 
Custom Search

 
 


    ที่พักพัทยา | ที่พักเกาะสมุย | ที่พักเกาะเสม็ด | ที่พักเกาะช้าง | ที่พักเกาะเต่า | ที่พักหัวหิน/ชะอำ | ที่พักภูเก็ต | ที่พักกระบี่ | ที่พักเกาะพะงัน
    ที่พักกรุงเทพ | ที่พักกาญจนบุรี | ที่พักเชียงราย | ที่พักเชียงใหม่ | ที่พักชุมพร | ที่พักพังงา | ที่พักปาย | ที่พักหาดจอมเทียน | ที่พักทั่วไทย
    ที่พักเขาใหญ่ | ที่พักเขาตะเกียบ | ที่พักสงขลา/หาดใหญ่ | ที่พักตรัง | ที่พักแนะนำ / น่าสนใจ
 
Copyright © 2002 All right reserved. webmaster@hamanan.com ไปหน้าแรกหามานานดอทคอม