Register Register Member Login Member Login Member Login Forgot Password ??
PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone
 

Registered : 109,027

HOME > ASP > ASP Forum > ด่วน!!! ช่วยแจมหน่อยค้าบ (แก้ยังไม่ออก) Error Type: Microsoft VBScript compilation (0x800A03EA) Syntax error



 

ด่วน!!! ช่วยแจมหน่อยค้าบ (แก้ยังไม่ออก) Error Type: Microsoft VBScript compilation (0x800A03EA) Syntax error

 



Topic : 016974

Guest







code คือ

<%
' Criteria = " WHERE [LIKE] <> '0' "
'if Request("Submit") = "Search" then
' if request.form("[LIKE]") <> "" then
' Criteria = Criteria & " AND [LIKE] = '" & request.form("[LIKE]") & "'"
' end if

' if request.form("date") <> "" then
' Criteria = Criteria & " AND date = '" & request.form("date") & "'"
'end if

' if request.form("id_customer") <> "" then
' Criteria = Criteria & " AND id_customer = " & request.form("id_customer")
'end if
'

'end if
worklike = request.Form("[LIKE]")

%>

<HTML>
<HEAD>
<TITLE> Database Management System</TITLE>
<META http-equiv="Content-Type" content="text/html; charset=windows-874">
</HEAD>
<BODY>
<form name="send" action="select.asp" method="post" >
<table width="52%" border="1" align="center" cellpadding="0" cellspacing="0">
<tr>
<td colspan="2"><div align="center">ค้นหา&nbsp;&nbsp; </div></td>
</tr>
<tr>
<td width="34%"><span lang="th">ความถนัด</span>:</td>
<td width="66%"><label>
<input name="[LIKE]" type="text" id="[LIKE]">
</label></td>
</tr>
<tr>
<td>&nbsp;</td>
<td><label>
<input type="submit" name="Submit" value="Search">
<input type="submit" name="Submit2" value="Reset">
</label></td>
</tr>
</table>
</form>
<BR></TD>
<br>
<%
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("test_project_update.mdb")
'Sql="Select EMPLOYEE. E_MAIL,EMPLOYEE.TEL,
extra *
from EMPLOYEE, extra" & Criteria
Sql="Select EMPLOYEE. E_MAIL,EMPLOYEE.TEL,
extra.*
from EMPLOYEE, extra
where [like] like '%" & worklike & "%'"
Set RS =Server.CreateObject("ADODB.Recordset")
RS.open Sql,Conn,1,3
if RS.recordcount <> 0 then
RS.MoveFirst
end if
%>
<TABLE border="1">
<TR>
<TD>&nbsp;&nbsp;&nbsp;&nbsp; <span lang="th">รหัสความถนัด</span>&nbsp;&nbsp;&nbsp;&nbsp; </TD>
<TD>&nbsp;&nbsp;&nbsp;&nbsp;<span lang="th">รหัสพนักงาน</span>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </TD>
<TD>&nbsp;&nbsp;&nbsp;&nbsp; <span lang="th">ชื่อ</span>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </TD>
<TD>&nbsp;&nbsp;&nbsp;&nbsp; <span lang="th">นามสกุล</span>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </TD>
<TD>&nbsp;&nbsp;&nbsp;&nbsp; <span lang="th"> E_MAIL</span>&nbsp;&nbsp;&nbsp;&nbsp; </TD>
<TD>&nbsp;&nbsp;&nbsp;&nbsp; <span lang="th">TEL</span>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </TD>
<TD>&nbsp;&nbsp;&nbsp;&nbsp; <span lang="th">ความถนัด</span>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </TD>
</TR>
<%
if RS.recordcount <> 0 then
Do While Not RS.EOF
%>
<TR>
<TD><%= RS("ID_extra")%></TD>
<TD><%= RS("EMP_ID")%></TD>
<TD><%= RS("NAME_THAI")%></TD>
<TD><%= RS("SURENAME_THAI")%></TD>
<TD><%= RS("E_MAIL")%></TD>
<TD><%= RS("TEL")%></TD>
<TD><%= RS("LIKE")%></TD>
</TR>
<%
RS.MoveNext
Loop
end if
%>
</TABLE>
<html>
<body>
</body>
</html>
<p>&nbsp;</p>
<%
rs.close
conn.close
%>
</BODY>
</HTML>
---------------------------------------------------------------------------
Error Type:
Microsoft VBScript compilation (0x800A03EA)
Syntax error
/project/select.asp, line 54, column 6
extra *



Tag : - - - -







Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 4 ธ.ค. 2550 21:56:59 By : p View : 1353 Reply : 4
 

 

No. 1

Guest


อยากทราบว่า table employee กับ extra มี field อาไรบ้างครับ







Date : 7 ธ.ค. 2550 11:16:57 By : sys
 


 

No. 2

Guest



ลองใช้ select ตามรูปแบบนี้นะครับ

select tablename.fieldname where [like] tablename.fieldname '%"& valuable&"%' "



แต่ว่าถ้าจาให้ดี ขอทราบว่า table employee กับ extra มี field อาไรบ้างครับ
แล้วผมจะแก้ sql ให้ครับ

Date : 7 ธ.ค. 2550 11:22:00 By : sys
 

 

No. 3

Guest



tableที่ต้องการได้แล้วครับ

Employee table

field name datatype
1. EMP_ID Number
2. TITLE_NAME Text
3. NAME_THAI Text
4. SURENAME_THAI Text
5. POST_ID Text
6. ORG_ID Text
7. E_MAIL Text
8. TEL Number
---------------------------------------------------------------
extra table

field name datatype
1. ID_extra AutoNumber
2. EMP_ID Number
3. NAME_THAI Text
4. SURENAME_THAI Text
5. LIKE Text
----------------------------------------------------------------------
Date : 8 ธ.ค. 2550 22:05:42 By : p
 


 

No. 4

Guest


sql = "SELECT EMPLOYEE.E_MAIL, EMPLOYEE.TEL, extra.ID_extra, extra.EMP_ID, extra.NAME_THAI, extra.SURENAME_THAI, extra.[LIKE] FROM EMPLOYEE, extra WHERE (((extra.[LIKE]) Like '%" & orklike "%')) GROUP BY EMPLOYEE.E_MAIL, EMPLOYEE.TEL, extra.ID_extra, extra.EMP_ID, extra.NAME_THAI, extra.SURENAME_THAI, extra.[LIKE];"


ย๊าว ๆ ลองดูนะครับ
Date : 9 ธ.ค. 2550 12:03:51 By : sys
 

   

ค้นหาข้อมูล


   
 

แสดงความคิดเห็น
Re : ด่วน!!! ช่วยแจมหน่อยค้าบ (แก้ยังไม่ออก) Error Type: Microsoft VBScript compilation (0x800A03EA) Syntax error
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ FTP| ใส่แถวของตาราง ใส่คอลัมน์ตาราง| ตัวยก ตัวห้อย ตัวพิมพ์ดีด| ใส่โค้ด ใส่การอ้างถึงคำพูด| ใส่ลีสต์
smiley for :lol: smiley for :ken: smiley for :D smiley for :) smiley for ;) smiley for :eek: smiley for :geek: smiley for :roll: smiley for :erm: smiley for :cool: smiley for :blank: smiley for :idea: smiley for :ehh: smiley for :aargh: smiley for :evil:
Insert PHP Code
Insert ASP Code
Insert VB.NET Code Insert C#.NET Code Insert JavaScript Code Insert C#.NET Code
Insert Java Code
Insert Android Code
Insert Objective-C Code
Insert XML Code
Insert SQL Code
Insert Code
เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

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

Notice

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

   
  เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง
 
โดย
อีเมล์
บวกค่าให้ถูก
<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)







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

Load balance : Server 05
ThaiCreate.Com Logo
© www.ThaiCreate.Com. 2003-2024 All Rights Reserved.
ไทยครีเอทบริการ จัดทำดูแลแก้ไข Web Application ทุกรูปแบบ (PHP, .Net Application, VB.Net, C#)
[Conditions Privacy Statement] ติดต่อโฆษณา 081-987-6107 อัตราราคา คลิกที่นี่