Forgot Password ??

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

	Registered : 109,038

HOME > ASP > ASP Forum > ครายก็ด้ายยย ช่วยทีครับ ลองรันโคดนี้ทีนะครับ ผมรันแล้วมันขึ้นว่า Microsoft VBScript compilation error '800a03ea' Syntax error

ครายก็ด้ายยย ช่วยทีครับ ลองรันโคดนี้ทีนะครับ ผมรันแล้วมันขึ้นว่า Microsoft VBScript compilation error '800a03ea' Syntax error

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

Guest

ลองรันโคดนี้ทีนะครับ
<HTML>
<BODY>
<%
URL = Request.ServerVariables("http://localhost/job/search.asp")
keyword=Request.QueryString("search")
%>
<center>
<b>การสืบค้นข้อมูล</b>
<form action="<%=URL%>"method="get">
เลือกฟิลด์ที่ค้นหา
<select name="SelectField">
<option value="1">ชื่อผู้แต่ง</option>
<option value="2">ชื่อเรื่อง</option>
</select>
พิมพ์คำสำคัญ
<input name="Search"value="<%=keyword%>"/>
<input class=button type="submit"value="Go"/>
</form> </center> <hr>
<%SearchOption=Request("SelectField")
if keyword <>"" then
DBpath=Server.MapPath("dtabase.mdb")
set DBconnect=Server.CreateObject("ADODB.Connection")
DBconnect.Open"Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&DBPath&";"
Select Case SearchOption
Case "1"
SQL= " SELECT * "&" FROM books "&' WHERE author LIKE "%" &Replace(keyword,"",""")& "%'"
Case "2"
SQL= " SELECT * "&" FROM books "&" WHERE title LIKE '%" &Replace(keyword,"",""")& "%' OR subject LIKE '%" &Replace(keyword,"",""")& "%'"
Case Else
SQL= ""
End Select
Set RS=DBconnect.Execute(SQL)
%>
<center>
<table border="1" cellspacing="1" cellpadding="1" bor>
<tr> <th>เลขทะเบียน</th>
<th>ชื่อผู้แต่ง</th>
<th>ชื่อเรื่อง</th>
<%
count=0
Do While Not RS.EOF
%>
<td><%=RS.Fields("ID").Value%></td>
<td><%=RS.Fields("author").Value%></td>
<td><%=RS.Fields("title").Value%></td></tr>
<%RS.MoveNext
count=count+1
Loop
%>
</table>
ผลการค้นหา ชื่อที่มีคำว่า"<%=keyword%>"พบ<%=count%>ระเบียน
</center>
<%
RS.Close
SetRS=Nothing
DBconnect.Close
Set DBconnect=Nothing
End if
%>
</BODY></HTML>

ผมรันแล้วมันขึ้นว่า
Microsoft VBScript compilation error '800a03ea'

Syntax error

/search.asp, line 26

SQL= " SELECT * "&" FROM books "&' WHERE author LIKE "%" &Replace(keyword,"",""")& "%'"
---------------------------------^
ช่วยแก้ทีนะครับ

Tag : - - - -

Date : 18 Jul 2546 15:09:03

By : สุระศักดิ์

View : 3177

Reply : 2

No. 1

TC Admin

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

รู้สึกจะผิดในส่วนของ sql ครับ
ลองดูตัวนี้ครับ ผมว่าคุณน่าจะใช้พวกเครื่องหมายผิดครับ

SQL="SELECT * FROM job_work Where name Like '%"&value_name &"%'" & " or " & "surname Like '%"&value_name &"%'"

Date : 19 Jul 2546 00:48:19

By : webmaster

No. 2

Guest

ขอบคุณมากครับ

Date : 1 Aug 2546 15:53:53

By : นายสุระศักดิ์ สาระพงษ์

ค้นหาข้อมูล

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

Re : ครายก็ด้ายยย ช่วยทีครับ ลองรันโคดนี้ทีนะครับ ผมรันแล้วมันขึ้นว่า Microsoft VBScript compilation error '800a03ea' Syntax error

รายละเอียด

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

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

Notice

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

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

โดย

อีเมล์

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

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

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

Load balance : Server 01