Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC SQL Server Driver][SQL Server]Line 1: Incorrect syntax near '#'.
/helpdesk_system/select_job_type.ASP, line 17
14===> '**************************************************
15===> SQL="SELECT * FROM Helpdesk_Service_order WHERE a_date = #"& year(date)&"/"&month(date)&"/"&day(date)&"#"
16=== > '**************************************************
17=== > set RS = Conn_helpdesk.execute(SQL)
18=== > set RS = Server.CreateObject("adodb.recordset")
19 === > RS.Open SQL,Conn,1,3
Tag : - - - -
Date :
24 ม.ค. 2549 14:11:02
By :
May
View :
2248
Reply :
12
No. 1
Guest
ลอง เอาเครื่องหมาย # ออกดูสิครับ
SQL="SELECT * FROM Helpdesk_Service_order WHERE a_date = "& year(date)&"/"&month(date)&"/"&day(date)&""
ลองดูนะครับ ผมกะไม่ค่อยเก่งเท่าไหร่ แต่ก็อยากช่วยน้า
Date :
24 ม.ค. 2549 14:52:54
By :
ผ่านมาคับ
No. 2
Guest
ขอบคุณ คุณผ่านมา ค่ะ
ลองลบออกแล้วเกิด error ตัวนี้ค่ะ
Error Type:
ADODB.Recordset (0x800A0BB9)
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
/helpdesk_system/select_job_type.ASP, line 19
Date :
24 ม.ค. 2549 15:28:03
By :
May
No. 3
Guest
ลองอันนี้ก่อนน้า
SQL="SELECT * FROM Helpdesk_Service_order WHERE a_date = "& year(date)&"" [email protected] add มาได้เลยหนะ
Date :
24 ม.ค. 2549 16:32:41
By :
ผ่านมา
No. 4
Guest
SQL="SELECT * FROM Helpdesk_Service_order WHERE year(a_date) = "& year(date)&""
<%@ language = vbscript%>
<!-- #include file="../helpdesk_system/conn.asp" -->
<%
sql1 = "Select * from Helpdesk_Job_type"
set rsjobtype = Conn_helpdesk.execute(sql1)
sql2 = "select * from Helpdesk_Service_order"
set rs_s = Conn_helpdesk.execute(sql2)
set rs_s = Server.CreateObject("adodb.recordset")
'rs_s.Open sql2,Conn_helpdesk,1,3
'*******************************************************
a_date = now()
'**************************************************
SQL="SELECT * FROM Helpdesk_Service_order WHERE a_date = #"& year(date)&"/"&month(date)&"/"&day(date)&"#"
'SQL="SELECT * FROM Helpdesk_Service_order WHERE a_date = "& year(date)&"/"&month(date)&"/"&day(date)
'**************************************************
set RS = Conn_helpdesk.execute(SQL)
set RS = Server.CreateObject("adodb.recordset")
RS.Open SQL,Conn_helpdesk,1,3
'**************************************************
If Request.Form("Job_Id")<>"" Then
'=========ส่วนการสร้าง ID ในขอบเขตวันที่
IDdate=Right(year(date),2) '== สร้าง ID 1-2 ด้วยหลักหน่วยและหลักสิบของ ค.ศ.
If len(Month(date))=1 then '== สร้าง ID 3-4 ด้วย ค่าเดือนและเช็คหลักด้วย ถ้ามีหลักเดียวก็ เติม 0
IDdate=IDdate & "0" & Month(date)
Else
IDdate=IDdate & Month(date)
End If
If len(day(date))=1 then '== สร้าง ID 5-6 ด้วย ค่าวันและเช็คหลักด้วย ถ้ามีหลักเดียวก็ เติม 0
IDdate=IDdate & "0" & day(date)
Else
IDdate=IDdate & day(date)
End If
'=========ส่วนการสร้าง ID ในขอบข่าย จำนวน
RS.AddNew
RS("Service_id")=IDdate & Request.Form("Job_Id") & "001"
RS("a_date")=year(date)&"/"&month(date)&"/"&day(date)
RS.Update
Else
'=========ส่วนการสร้าง ID ในขอบเขตวันที่
IDdate=Right(year(date),2) '== สร้าง ID 1-2 ด้วยหลักหน่วยและหลักสิบของ ค.ศ.
If len(Month(date))=1 then '== สร้าง ID 3-4 ด้วย ค่าเดือนและเช็คหลักด้วย ถ้ามีหลักเดียวก็ เติม 0
IDdate=IDdate & "0" & Month(date)
Else
IDdate=IDdate & Month(date)
End If
If len(day(date))=1 then '== สร้าง ID 5-6 ด้วย ค่าวันและเช็คหลักด้วย ถ้ามีหลักเดียวก็ เติม 0
IDdate=IDdate & "0" & day(date)
Else
IDdate=IDdate & day(date)
End If
'=== ตรวจสอบค่าขอบข่ายจำนวน
topstaffID=0
RS.MoveFirst
Do Until RS.EOF
If Request.Form("Job_Id")=Mid(RS("Service_id"), 7, 1) Then
if cInt(Right(RS("Service_id"),3))>topstaffID Then topstaffID=cInt(Right(RS("Service_id"),3))
End If
RS.MoveNext
Loop
'=========ส่วนการสร้าง ID ในขอบข่าย จำนวน
IDstaff=cInt(Right(RS("Service_id"),3))+1 '=== นำค่า 3 ตัวของ ID มา แปลงเป็นเลขจำนวนเต็ม
IDstaff=topstaffID+1
If len(IDstaff)=1 Then
IDstaff="00" & IDstaff
ElseIf len(IDstaff)=2 Then
IDstaff="0" & IDstaff
End If
RS.AddNew
RS("Service_id")=IDdate & Request.Form("Job_Id") & IDstaff
RS("a_date")=year(date)&"/"&month(date)&"/"&day(date)
RS.Update
End If
RS.Close
Set RS=Nothing
End If
<select name="Job_Id" >
<option value="" selected >--โปรดเลือก ลักษณะงาน--</option>
<%
strsql1 = "Select * from Helpdesk_Job_type "
Set rsjobtype = Conn_helpdesk.execute(strsql1)
do until rsjobtype.eof
response.write"<option value ="""&rsjobtype("Job_Id")&""">"&rsjobtype("Type_Detail")&"</option>"
rsjobtype.movenext
loop
%>
</select>
</p>
<p>
<input type=reset name=reset value="Reset" >
<input type="submit" name= Submit value="Save" >
</form>
</p>
Date :
25 ม.ค. 2549 16:39:01
By :
May
No. 11
Guest
Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC SQL Server Driver][SQL Server]Line 1: Incorrect syntax near '#'.
/helpdesk_system/select_job_type.ASP, line 18
Date :
25 ม.ค. 2549 16:40:05
By :
May
No. 12
Guest
ขอถามด้วยคนครับมันขึ้นแบบนี้แก้ยังไงครับ
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified