Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,038

HOME > ASP > ASP Forum > ช่วยดูโค้ดให้หน่อยครับ เป็น Code checkLogin ครับ มันไม่ยอมเช็คเงื่อนไขครับ Check session ผิดตรงไหนหน่วยชี้แนะ

ช่วยดูโค้ดให้หน่อยครับ เป็น Code checkLogin ครับ มันไม่ยอมเช็คเงื่อนไขครับ Check session ผิดตรงไหนหน่วยชี้แนะ

เริ่มหัวข้อใหม่

Guest

เป็น Code checkLogin ครับ มันไม่ยอมเช็คเงื่อนไขครับ
<%//Check session
if not Session("datasn") then
username = request.form("username")
password = request.form("password")

//Check Condition
if not(username = "" or password = "") then

//Open connection
Response.Buffer = true

StrDSNPath = "Provider=MSDASQL; Server=SN_COM01; database=dbsn; UID=datadb; PWD=321654"
Set ObjDB = Server.Createobject("ADODB.Connection")
ObjDB.Open strDSNPath

//Create recordset
SQLString = " SELECT * FROM Login WHERE USERNAME = '" + username + "' AND PASSWORD = '" + password + "'"
Set rs1 = Server.CreateObject("ADODB.Recordset")
rs1.Open SQLString, ObjDB,,2
if not rs1.eof then

userId = rs1.Fields.Item("USERID").Value
//Active session
Session("datasn") = true

//Keep logfile
SQLString2 = "SELECT * FROM Logfile ORDER BY LOGFILEID DESC"
Set rs2 = Server.CreateObject("ADODB.Recordset")
rs2.Open SQLString2, ObjDB,,2
if rs2.eof then
logId = 1
else
logId = rs2.Fields.Item("LOGFILEID").Value + 1
end if

rs2.AddNew
rs2.Fields("LOGFILEID") = logId
rs2.Fields("USERNAME") = userName
rs2.Fields("IPADDRESS") = Request.serverVariables("REMOTE_ADDR")
rs2.Fields("LOGINDATE") = Date
rs2.Fields("LOGINTIME") = Time
rs2.Update
rs2.Close

//login
if rs1.Fields.Item("ULEVEL").value = 1 then
Session("AdminPage") = true
Response.Redirect("M_Admin.asp?logId=" + Cstr(logId))

elseif rs1.Fields.Item("ULEVEL").value = 2 then
Session("Managerpage") = true
Response.Redirect("M_Manager.asp?logId=" + Cstr(logId))

elseif rs1.Fields.Item("ULEVEL").value = 3 then
Session("Userpage") = true
Response.Redirect("M_User.asp?logId=" + Cstr(logId))

end if

else Response.Redirect("ErrorPage.asp?temp=login")
end if //if not rs1.eof then

else Response.Redirect("Errorpage.asp?temp=login")
end if //if not(userName = "" or password = "") then

end if //if not Session("datasn") then
%>

ผิดตรงไหนหน่วยชี้แนะด้วยครับ

Tag : - - - -

Date : 31 ก.ค. 2551 10:43:23

By : narongsr

View : 1763

Reply : 0

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : ช่วยดูโค้ดให้หน่อยครับ เป็น Code checkLogin ครับ มันไม่ยอมเช็คเงื่อนไขครับ Check session ผิดตรงไหนหน่วยชี้แนะ

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก

<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)

Registered : 109,038

ค้นหาข้อมูล

อัพโหลดแทรกรูปภาพ

Notice