Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,027

HOME > ASP > ASP Forum > ComboBox+Searchอีกครั้ง ทวนให้กระจ่างเลยนะคะ....คืออยากสร้าง Code แบบที่พอใส่keywordแล้วคลิ๊กเลือก Combo Box

ComboBox+Searchอีกครั้ง ทวนให้กระจ่างเลยนะคะ....คืออยากสร้าง Code แบบที่พอใส่keywordแล้วคลิ๊กเลือก Combo Box

เริ่มหัวข้อใหม่

Guest

ทวนให้กระจ่างเลยนะคะ....คืออยากสร้าง Code แบบที่พอใส่keywordแล้วคลิ๊กเลือก Combo Box ที่มีรายละเอียดหรือประเภทให้เลือกเช่นเพลง,เกมส์,กีฬาและเราเลือกประเภทเกมส์แล้วกดปุ่ม go,Search เพื่อแสดงข้อมูลต้องทำอย่างไรคะหรือเพิ่มอะไรคะ เช่น ใน Web ค้นหาทุนการศึกษาพอคลิ๊กเลือก ทุนระดับป.ตรี ในมันจะโชว์ผลการsearchที่มีประเภทของทุนป.ตรีอะค่ะ...ขอบคุณค่ะ
ดูโค้ดให้ด้วยค่ะว่าต้องเพิ่มอะไรและตารางในaccessตอนนี้มี1ตารางถ้ามีComboเข้ามาต้องมีตารางทุนเพิ่มมาอีกแต่สงสัยว่าจะต้องทำไงให้มันเชื่อมต่อกันกับตารางอีกตัวอะคะ(ตอนนี้dbชื่อsearcค่ะถ้ามีเพิ่มเช่นUniversityควรเขียนโค้ดเพิ่มยังไงคะ)...ช่วยตอบทาง[email protected]ด้วยจะเป็นพระคุณมากๆเลยค่ะ
<%
url= Request.queryString("url")
title= Request.queryString("title")
description= Request.queryString("description")
search2=Request.queryString("search")
if search2="" Then
response.redirect"search.htm"
end if%>

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-874">
<title>¼Å¨Ò¡¡ÒÃ¤é¹ËÒ<%=search2%></title>
</head>
<%
'â¤é´µÔ´µèÍ°Ò¹¢éÍÁÙÅ
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.mappath("../db/search/search.mdb")
Set rs = Server.CreateObject("ADODB.RecordSet")

'¤ÓÊÑè§àªç¤ÇèÒÁÕ¡ÒÃ¡ÓË¹´¤èÒ¡ÒÃ¤é¹ËÒ record ËÃ×ÍäÁèËÒ¡ÁÕ¡ÒÃàªç¤à¤Ã×èÍ§ËÁÒÂ¶Ù¡·ÕèË¹éÒªèÍ§¡ÓË¹´¤èÒ ÁÑ¹¨Ð¹ÓÁÒàªç¤ÇèÒÁÕ¡ÒÃ¡ÓË¹´¤èÒ¡ÒÃ¤é¹ËÒÍÐäÃºÒ§
'ÍÂèÒ§¤ÓÊÑè§¹ÕéËÁÒÂ¤ÇÒÁÇèÒËÒ¡ÁÕ¡ÒÃµÔ¡à¤Ã×èÍ§ËÁÒÂ¶Ù¡·ÕèË¹éÒªèÍ§ TITLE áÅéÇ ÁÑ¹¨Ð¹ÓÁÒàªç¤ËÒ¡ÁÕ¡ÒÃµÔ¡¨ÃÔ§¤ÓÊÑè§¤é¹ËÒ¨Ð¡ÅÒÂà»é¹¡ÒÃà¾ÔèÁÇ§ã¹¡ÒÃ¤é¹ËÒ ã¹¤×Í¡ÒÃà¾ÔèÁrecord TITLE
'à¢éÒä»ã¹¤é¹ËÒ á»ÅÇèÒ¤Ó·ÕèÊÑè§ãËé¤éËÒ¨Ð¤é¹¨Ò¡µÒÃÒ§·Õèª×èÍÇèÒTITLE ¡ÑºµÒÃÒ§ª×èÍ DESCRIPTION ÍÂèÒ§¹Õéà»é¹µé¹
if title="true" Then
Sql = "Select * FROM search Where detail Like'%"&search2&"%'Or DESCRIPTION Like'%"&search2&"%'"
Elseif url="true" then
Sql = "Select * FROM search Where URL Like'%"&search2&"%' Or DESCRIPTION Like'%"&search2&"%' "
Elseif title="true" AND url="true" then
Sql = "Select * FROM search Where TITLE Like'%"&search2&"%' Or URL like'%"&search2&"%'"
Else
Sql = "Select * FROM search Where DESCRIPTION Like'%"&search2&"%'"
end If
rs.Open Sql,Conn,1,3
'¡ÒÃ¨Ñ´áºè§¼Å¡ÒÃ¤é¹ËÒ·Õèä´éà»ç¹Ë¹éÒæËÒ¡¼Å·Õèä´éÁÕà¡Ô¹ 20¨Ðâ´¹µÑ´áºè§ä»¢Öé¹Ë¹éÒ¶Ñ´ä»
PerPage = 20
rs.PageSize = PerPage
TotalE = rs.RecordCount
TotalP = rs.PageCount
If Request.QueryString("Page") = "" or Request.QueryString("Page") < TotalP or Request.QueryString("Page") = "0" Then
rpage = 1
Else
rpage = CInt(Request.QueryString("Page"))
End If %>
¼Å¡ÒÃ¤é¹ËÒ·Ñé§ËÁ´ 
<%= TotalE %> 
ÃÒÂ¡ÒÃ
¹ÓáÊ´§·Ñé§ËÁ´
<%= rpage %>
/ <%= TotalP %> 
Ë¹éÒ
<%If NOT rs.EOF Then rs.AbsolutePage = rpage
RNumber = 1
Do While Not rs.EOF and RNumber <= PerPage %>
<table class = text1 width="100%" border="0" bgcolor="#eeeeee">
<tr>
<td width="9%" align="center">
  #<%=Right("000"&rs("ID"),4)%><%=i%>
</td>

<td width="91%" bgcolor=#FFFFFF>(<%=rs("DESCRIPTION")%>)<a href="http://<%=rs("URL")%>" target="_blank">
<%=rs("TITLE")%></a>
</td>
</tr>
<tr>
<td width="9%" bgcolor=#FFFFFF> </td>
<td width="91%" bgcolor=#FFFFFF>
<%=rs("DESCRIPTION")%>
</td>
</tr>
<tr>
<td width="9%" bgcolor=#FFFFFF> </td>
<td width="91%" bgcolor=#FFFFFF>
<%=rs("URL")%></td>
</tr>
</table>
<% RNumber = RNumber + 1
rs.MoveNext
Loop
%>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" >
<tr>
<td width="43%"> </td>
<td width="7%">
<%= rpage %>/<%= TotalP %></td>
<td width="50%"> <center><%If rpage > 1 Then %>
<a href="test.asp?Page=1&search=<%=search2%>">Ë¹éÒáÃ¡ </a>
<a href="test.asp?Page=<%= rpage - 1 %>&search=<%=search2%>"><<</a>
<%End If
For LoopCounter = 1 to TotalP
If LoopCounter = rpage Then %>
<%=LoopCounter %>
<% Else %>
<a href="test.asp?Page=<%=LoopCounter %>&search=<%=search2%>"><%= LoopCounter%></a>
<% End If
Next
If rpage < TotalP Then %>
<a href="test.asp?Page=<%= rpage + 1 %>&search=<%=search2%>"> >></a>
<a href="test.asp?Page=<%=TotalP %>&search=<%=search2%>">Ë¹éÒÊØ´·éÒÂ</a>
<%End If%></center>
</td>
</tr>
</table>

<body>

</body>

</html>

Tag : - - - -

Date : 15 ม.ค. 2549 04:01:26

By : สงสัย

View : 3037

Reply : 2

No. 1

Guest

สวัสดีครับ
รู้สึกจะตอบให้คำถามล่างไปแล้ว
ย้ำอีกทีจาก Code ...(เอามาซะเยอะเลย) คือ น้องแค่เพิ่ง combo แล้วก็ส่งค่าไป Where เพิ่ม เข้าไปเท่านั้นเองครับ

สงสัยก็ถามอีกทีนะครับ ไม่ยากเลยครับ ลองดูนะ

MSN : [email protected]
Yahoo : [email protected]
Google Talk : [email protected]
QQ : 67176
ICQ : 36338120

Date : 17 ม.ค. 2549 00:50:25

By : Wiwat K.

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : ComboBox+Searchอีกครั้ง ทวนให้กระจ่างเลยนะคะ....คืออยากสร้าง Code แบบที่พอใส่keywordแล้วคลิ๊กเลือก Combo Box

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก

<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)

Exchange: นำเข้าสินค้าจากจีน, Taobao, เฟอร์นิเจอร์, ของพรีเมี่ยม, ร่ม, ปากกา, power bank, แฟลชไดร์ฟ, กระบอกน้ำ

Load balance : Server 01

Registered : 109,027

document.write("<font color=996600>[ASP]</font>"); ComboBox+Searchอีกครั้ง ทวนให้กระจ่างเลยนะคะ....คืออยากสร้าง Code แบบที่พอใส่keywordแล้วคลิ๊กเลือก Combo Box

No. 1

ค้นหาข้อมูล

อัพโหลดแทรกรูปภาพ

Notice

ComboBox+Searchอีกครั้ง ทวนให้กระจ่างเลยนะคะ....คืออยากสร้าง Code แบบที่พอใส่keywordแล้วคลิ๊กเลือก Combo Box