Forgot Password ??

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

	Registered : 109,038

HOME > ASP > ASP Forum > ช่วยด้วยคับ! จะทำ search engine ด้วย asp จะทำ search engine ด้วย asp โดยใช้ตัว search bot

ช่วยด้วยคับ! จะทำ search engine ด้วย asp จะทำ search engine ด้วย asp โดยใช้ตัว search bot

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

Guest

จะทำ search engine ด้วย asp โดยใช้ตัว search bot เหมือน google จะทำยังงัยดี ช่วยด้วยคับ
ตอนนี้มีแต่ code ที่ search ได้เฉพาะในฐานข้อมูลเท่านั้น หรืออาจจะแก้ code จากด้านล่างนี้ก็ได้นะคับ หากใครสามารถช่วยได้ กรุณาส่ง mail ถึงผมเลยก็ได้นะคับ mail ข้างล่างเลยนะคับ

<html>
<body bgcolor="#FFFFFF">
<form name="form1" method="post" action="">
<p>คำที่ต้องการค้นหา
<input type="text" name="keyword" value="search the web">
<input type="submit" name="Submit" value="ค้นหา">
</p>
</form>
<p>
<%
if Request.Form("keyword")="" then
%>
กรุณากรอก Keyword ที่ต้องการค้นหา<br>
<% else
keyword= request.form("keyword")
Set Conn=Server.Createobject("ADODB.Connection")
Conn.Open "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("db\database.mdb"),"" , ""
'หรือจะใช้เป็น Conn.Open "database","",""
SQL="SELECT * FROM search Where name Like '%"& keyword & "%'"
Set RS = Conn.Execute (SQL)%>
<%
if RS.eof then
%>
ไม่มีเว็บที่คุณค้นหา
<% Response.End
End if %>
</p>
<table width="100%" border="0">
<tr>
<td colspan="3">
<%num=0
Do while Not RS.Eof
%>
<% =RS("name") %> <br>
คำอธิบาย
<% =RS("description")%>
<br>
ที่อยู่เว็บ
<%
response.write( "<a href=http://" )%>
<%=RS("address")%>
<%
response.write(" target=_blank")
response.write(">") %>
<%=RS("address")%>
<%response.write("</a>")%>
<hr>
<%
num=num+1
RS.MoveNext
Loop%>
</td>
</tr>
</table>
พบ <%=(num)%> เว็บไซต์<br>
<% end if %>
<p> </p><p> </p></body>
</html>

Tag : - - - -

Date : 6 ส.ค. 2549 15:02:04

By : susu ky

View : 2086

Reply : 0

ค้นหาข้อมูล

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

Re : ช่วยด้วยคับ! จะทำ search engine ด้วย asp จะทำ search engine ด้วย asp โดยใช้ตัว search bot

รายละเอียด

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

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

Notice

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

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

โดย

อีเมล์

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

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

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

Load balance : Server 02

Registered : 109,038

document.write("<font color=996600>[ASP]</font>"); ช่วยด้วยคับ! จะทำ search engine ด้วย asp จะทำ search engine ด้วย asp โดยใช้ตัว search bot

ค้นหาข้อมูล

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

Notice

ช่วยด้วยคับ! จะทำ search engine ด้วย asp จะทำ search engine ด้วย asp โดยใช้ตัว search bot