Forgot Password ??

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

	Registered : 109,028

HOME > ASP > ASP Forum > ค้นหาโดยใช้เงื่อนไข2ฟิลท์ ลองทำตามที่พี่ตอบแล้วครับเป็นอาทิตย์ยังไม่ได้เลยช่วยด้วยครับ Code ที่ใช้ใช้ในบทเรียนนำมาดัดแปลงดังนี้

ค้นหาโดยใช้เงื่อนไข2ฟิลท์ ลองทำตามที่พี่ตอบแล้วครับเป็นอาทิตย์ยังไม่ได้เลยช่วยด้วยครับ Code ที่ใช้ใช้ในบทเรียนนำมาดัดแปลงดังนี้

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

Guest

ลองทำตามที่พี่ตอบแล้วครับเป็นอาทิตย์ยังไม่ได้เลยช่วยด้วยครับ Code ที่ใช้ใช้ในบทเรียนนำมาดัดแปลงดังนี้
Sample1.asp
<%
keyword=Request.Form("keyword")
if keyword="" then
keyword=Request.QueryString("keyword")
end if
%>
<form name="form1" method="post" action="Sample1.asp">
<font size="2">ค้นหาจาก Dcode
<input type="text" name="keyword" value="<%=keyword%>">
<input type="submit" name="Submit" value="ค้นหา">
<input type="reset" name="Submit2" value="Reset">
</font>
</form>
<font size="2">
<%
if keyword="" then
Response.write("<br>กรุณากรอก Keyword เพื่อค้นหาจาก Dcode<hr>")
else
pageLen = 50 'กำหนดจำนวนแต่ละหน้าที่ต้องการแสดงกี่ Reccord
pageNo = request.QueryString("pageNo")
if pageNo="" then pageNo = 1
Set Conn=Server.Createobject("ADODB.Connection")
Conn.Open "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("../Main_database.mdb"),"" , ""
'หรือจะใช้เป็น Conn.Open "product","",""
sql ="Select * From AWH where Dcode like '%"&keyword&"%'order by Work_Group_Code ASC"
Set RS =Server.CreateObject("ADODB.Recordset")
RS.open Sql,Conn,1,3
Nrecord=RS.recordcount
Rs.pageSize = pageLen
totalPage = Rs.PageCount
If Rs.EOF Then
%>
ไม่มีข้อมูลในตาราง !
<%Else%>
</font>
<table width="100%">
<tr bgcolor="Silver">
<td width="11%"><div align="center"><font size="2">Dcode</font></div></td>
<td width="7%"><div align="center"><font size="2">Order</font></div></td>
<td width="7%"><div align="center"><font size="2">เครื่องมือ</font></div></td>
<td width="6%"><div align="center"><font size="2">กลุ่มงาน</font></div></td>
<td width="6%"><div align="center"><font size="2">ผู้ทำงาน</font></div></td>
<td width="8%"><div align="center"><font size="2">ชม.ปกติ</font></div></td>
<td width="8%"><div align="center"><font size="2">ล่วงเวลา</font></div></td>
<td width="8%"><div align="center"><font size="2">ชม.เครื่อง</font></div></td>
<td width="8%"><div align="center"><font size="2">หมายเหตุ</font></div></td>
<td width="14%"><div align="center"><font size="2">%งาน</font></div></td>
<td width="17%"><div align="center"><font size="2">วันที่บันทึกข้อมูล</font></div></td>
</tr>
<%
recNo=1
Do While Not RS.EOF and recNo <= pageLen
%>
<tr bgcolor="#FFFFCC">
<td><div align="center"><font size="2"><%= Rs("Dcode")%></font></div></td>
<td><div align="left"><font size="2"><%= Rs("ONO")%></font></div></td>
<td><div align="left"><font size="2"><a href="../Code/MachineGroup.asp"><%= Rs("Group_Code")%></a></font></div></td>
<td><div align="center"><font size="2"><a href="../Code/WorkGroup.asp"><%= Rs("Work_Group_Code")%></a></font></div></td>
<td><div align="center"><a href="../Code/Employee_no.asp" target="_blank"><font size="2"><%= Rs("Employee_No")%></font></a></div></td>
<td><div align="center"><font size="2"><%= Rs("MH")%></font></div></td>
<td><div align="center"><font size="2"><a href="../Code/Time.asp"><%= Rs("TCode")%></a></font></div></td>
<td><div align="center"><font size="2"><%= Rs("MC")%></font></div></td>
<td><div align="center"><font size="2"><a href="../Code/NCode.asp"><%= Rs("NCode")%></a></font></div></td>
<td><div align="center"><font size="2"><%= Rs("Status")%></font></div></td>
<td><div align="center"><font size="2"><%= Rs("Date")%></font></div></td>
</tr>
<%
recNo=recNo+1
RS.MoveNext
Loop
rs.close
conn.close
%>
</table>
<font size="2">
<%
end if
%>
<br>
<br>
จำนวน: <%=Nrecord%> รายการ<br>
ขณะนี้อยู่หน้า <%=pageNo%> ในทั้งหมด <%=totalPage%> หน้า
<%
if cint(pageno) > 1 then %>
<br>
<a href="sample1.asp?pageNo=1&keyword=<%=keyword%>">หน้าแรก</a>  
<a href="sample1.asp?pageNo=<%=pageNo-1%>&keyword=<%=keyword%>">ย้อนกลับ</a>
 
<% end if
if cint(pageno) < totalPage then %>
<a href="sample1.asp?pageNo=<%=pageNo+1%>&keyword=<%=keyword%>">หน้าต่อไป</a> 
<a href="sample1.asp?pageNo=<%=totalPage%>&keyword=<%=keyword%>">หน้าสุดท้าย</a>
<% end if

%>
<br>
กระโดดไปหน้า
<%for idx = 1 to totalPage
%>
<a href="sample1.asp?pageNo=<%=idx%>&keyword=<%=keyword%>">
<% if idx=cint(pageno) then%>
<b><%=idx%></b>
<%else %>
<%=idx%>
<%end if%>
</a> 
<%
next
end if
%>
ผมต้องการค้นหาโดย ฟิลท์ Dcode และ ฟิลท์ Wrok_Group กรุณาช่วยด้วยครับ
ขอบคุณครับ

Tag : - - - -

Date : 5 เม.ย. 2548 17:00:10

By : MMCMWS

View : 2462

Reply : 3

No. 1

TC Admin

โพสกระทู้ ( 74,058 )
บทความ ( 838 )

sql ="Select * From AWH where Dcode like '%"&keyword&"%' and Work_Group_Code="&var&" order by Work_Group_Code ASC"

Date : 5 เม.ย. 2548 17:19:54

By : @W_IN

No. 2

Guest

แล้วส่วนส่งข้อมูลละครับต้องทำอย่างไรผมหมายถึงKeyword ของ Work_Group_Code ครับ

Date : 6 เม.ย. 2548 13:51:11

By : MMCMWS

No. 3

TC Admin

โพสกระทู้ ( 74,058 )
บทความ ( 838 )

="&var&" ครับ

Date : 7 เม.ย. 2548 10:29:29

By : @W_IN

ค้นหาข้อมูล

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

Re : ค้นหาโดยใช้เงื่อนไข2ฟิลท์ ลองทำตามที่พี่ตอบแล้วครับเป็นอาทิตย์ยังไม่ได้เลยช่วยด้วยครับ Code ที่ใช้ใช้ในบทเรียนนำมาดัดแปลงดังนี้

รายละเอียด

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

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

Notice

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

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

โดย

อีเมล์

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

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

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