Dim Conn,strSQL,objRec Set Conn = Server.Createobject("ADODB.Connection") Conn.Open "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("mydatabase.mdb"),"" , "" '*** Search By Name or Email ***' strSQL = "SELECT * FROM MyTable as a INNER JOIN Table1 as b on a.IP = b.IP " strSQL = strSQL & "WHERE (IP LIKE '%"& Request.QueryString("txtKeyword") &"%' " strSQL = strSQL & "or Cill LIKE '%"& Request.QueryString("txtKeyword") &"%' ) " Set objRec = Server.CreateObject("ADODB.Recordset") objRec.Open strSQL, Conn, 1,3
Quote:WHERE (IP LIKE
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง