no10devil

Fri 14 Dec 2007 11:04:43
Fri 14 Dec 2007 11:04:43
ผมอยากให้มันลบข้อมูลทุก ๆ เรคคอร์ดที่ตรงกับรหัสของใบเสร็จอ่ะครับ..ผมจะต้องทำยังไง
Table Billtran
------------------------
idtran
-
-
-
Table Protran
------------------------
idpro
idbill
-
-
-
ผมจะต้องเขียนคำสั่งยังไงอ่ะครับ ผมส่งค่าจากฟอร์มนึงที่เลือกรหัสบิลมาแล้วอ่ะครับ
ผมเขียนแบบนี้แล้วมันไม่ยอมลบให้อ่ะครับ
<%
billid=request.QueryString("billid")
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("db/dbit.mdb")
set rs=server.createobject("adodb.recordset")
Sql = "delete * from billtran where idtran = "&billid
Conn.Execute(Sql)
sqlitem="select * from protran"
rs.open sqlitem,conn,1,3
if not rs.bof then
rs.movefirst
end if
while not rs.eof
chkbill=rs("billid")
if chkbill=billid then
rs.delete
rs.update
end if
rs.movenext
wend
rs.close
Conn.Close
Set Conn=nothing
response.Redirect("adminshowbilltran.asp")
%>
Table Billtran
------------------------
idtran
-
-
-
Table Protran
------------------------
idpro
idbill
-
-
-
ผมจะต้องเขียนคำสั่งยังไงอ่ะครับ ผมส่งค่าจากฟอร์มนึงที่เลือกรหัสบิลมาแล้วอ่ะครับ
ผมเขียนแบบนี้แล้วมันไม่ยอมลบให้อ่ะครับ
<%
billid=request.QueryString("billid")
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("db/dbit.mdb")
set rs=server.createobject("adodb.recordset")
Sql = "delete * from billtran where idtran = "&billid
Conn.Execute(Sql)
sqlitem="select * from protran"
rs.open sqlitem,conn,1,3
if not rs.bof then
rs.movefirst
end if
while not rs.eof
chkbill=rs("billid")
if chkbill=billid then
rs.delete
rs.update
end if
rs.movenext
wend
rs.close
Conn.Close
Set Conn=nothing
response.Redirect("adminshowbilltran.asp")
%>
webmaster

Fri 14 Dec 2007 15:10:58
Fri 14 Dec 2007 15:10:58
ตามมาตรฐาน SQL คำสั่ง delete ต้องเป็น
DELETE FROM [table_name] WHERE ...
ไม่มี * นะครับ ส่วนใน access ผมไม่ค่อยได้ใช้ผิดพลาดขออภัยด้วยครับ
DELETE FROM [table_name] WHERE ...
ไม่มี * นะครับ ส่วนใน access ผมไม่ค่อยได้ใช้ผิดพลาดขออภัยด้วยครับ

















