《 在
hew...@bbs.yuntech.edu.tw (洛可~美麗心情‥) 的大作中提到: 》
: 1. <%
: 2. Set conDB=Server.CreateObject("ADODB.Connection")
: 3. constr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("new.mdb")
: 4. conDB.Open constr
: 5. Set rstObj=Server.CreateObject("ADODB.Recordset")
: 6. rstObj.Open "order",conDB,2,1
: 7. %>
: 8. <font color="#FF0000">刪除前 </font>
: 9. <br>
: 10. <table>
: 11. <TR><TD>name</TD><TD>租車時間</TD><TD>還車時間</TD><TD>stroe</TD><TD>還車地點</TD><TD>租車地點</TD><TD>刪除</TD></TR>
: 12. <%
: 13. Do While Not rstObj.EOF
: 14. %>
: 15. <TR><TD><%=rstObj("name")%></TD></TD><TD><%=rstObj("租車時間")%></TD><TD><%=rstObj("還車時間")%></TD><TD><%=rstObj("sex")%></TD><TD><%=rstObj("store")%>
: </TD>
: 16. _<TD><%=rstObj("還車地點")%></TD><TD><a href="deleteOK.asp?ID=<%=rstObj("orderid")%>">Delete</a></TD></TR>
: 17. <%
: 18. rstObj.MoveNext
: 19. Loop
: 20. %>
: 錯誤類型:
: Microsoft JET Database Engine (0x80040E14)
: 無效的 SQL 陳述式;預期為'DELETE'、'INSERT'、'PROCEDURE'、'SELECT' 或 'UPDATE' 。
: /newcar/delete.asp, line 22 (以上的錯誤類型是從電腦上直接印下,而畫面上實際錯誤的地方是
: 第6列的地方)
: 煩請各位高手幫忙看一下,這些程式那裡有錯誤,而且本程式中並無使用SQL陳述式,
: 非常感謝~
: 如果有高手知曉這方面的問題,請MAIL給我,謝謝您~
:
flym...@ms72.url.com.tw
我猜 第6行改成這樣也許可能可以
6. rstObj.Open " select * from order ",conDB,2,1
--
[m [1;32m※ 來源:‧蛋捲廣場 bbs.tku.edu.tw‧[FROM: 61.230.19.74] [m