<html> <head> <title>ThaiCreate.Com ASP & Microsoft Access Tutorial</title> </head> <body> <% Dim Conn,strSQL,objExec Set Conn = Server.Createobject("ADODB.Connection") Conn.Open "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("mydatabase.mdb"),"" , "" For Each chkVol in Request.Form("chkDel") strSQL = "" strSQL = strSQL&"DELETE FROM customer " strSQL = strSQL&"WHERE CustomerID = '"&chkVol&"' " Set objExec = Conn.Execute(strSQL) Next Response.write("Record Deleted.") Conn.Close() Set objExec = Nothing Set Conn = Nothing %> </body> </html>
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง