set Conn1 = Server.Createobject("ADODB.Connection") Conn1.Open "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("Network.mdb"),"" , "" strSQL = "UPDATE Reserve a " strSQL = strSQL&"SET Status = (Select Reserve From [" & Server.MapPath("mydatabase.mdb") & "].[MyTable] b where b.Reserve = 'Used' )" strSQL = strSQL&"where Status = 'Reserve'" Set objExec = Conn1.Execute(strSQL)
set Conn1 = Server.Createobject("ADODB.Connection") Conn1.Open "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("Network.mdb"),"" , "" strSQL = "UPDATE Reserve AS a INNER JOIN [" & Server.MapPath("mydatabase.mdb") & "].[MyTable] AS b ON a.IP=b.IP AND a.Port = b.Port " strSQL = strSQL&"SET a.Status = 'Used'" strSQL = strSQL&"where a.Status = 'Reserve' AND b.Reserve = 'Used'"
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง
