usernames = request.Form("username") passwords = request.Form("password") level = request.form("level") strsql = "select * from User_login where username='"& usernames & "' and password= '"& passwords &"'" set rslogin = server.createobject("adodb.recordset") rslogin.open strsql, conn, 1, 2 If Not rslogin.eof Then levels = level session("level") = levels 'เก็บค่า level session("username") = rslogin("username") 'เก็บค่า username 'ตรวจสอบ level if levels = 1 then response.Redirect("level1.asp") elseif levels = 2 then response.Redirect("level2.asp") else response.Redirect("level3.asp") end if end if
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง