Protected Sub btnOK_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnOK.ClickDim myconn As New SqlConnection _"Data Source=ACC226\SQLEXPRESS;Initial Catalog=mxscggroup_net_scggroup;User Id
Password
Integrated Security=SSPI;")Dim myda As New SqlDataAdapter("Select * From member where username='" & txtUserName.Text & "' and password='" & txtPassWord.Text & "'", myconn)Dim ds As New DataSet"Table")If ds.Tables("Table").Rows.Count >= 1 Then
privilage.Text = ds.Tables(
lblphone.Text = ds.Tables(
"table").Rows(0).Item(3)"table").Rows(0).Item(4)'ตรวจสอบสิทธิ์ 1 = ลูกค้าให้ไปที่หน้า indexUser.aspx ถ้าเป็น 0 = admin ไปที่หน้า admin/default.aspx
If (privilage.Text = 1) Then
Session(
Me.Response.Redirect("indexUser.aspx")"phone") = lblphone.TextElseIf (privilage.Text = 0) Then
Me.Response.Redirect("admin/default.aspx")Else
lblerror.Text =
"ไม่มีข้อมูล"
End If
Else
lblerror.Text =
"Username หรือ Password ไม่ถูกต้องกรุณาพิมพ์ใหม่ค่ะ"
End If
End Sub
คือ ตรง privilage.Text กับ lblphone.Text อ่ะค่ะ ทำไมมันไม่แสดงค่าที่รับมาจากฐานข้อมูล แต่ตรงช่วง
If (privilage.Text = 1) Then
Session(
Me.Response.Redirect("indexUser.aspx")"phone") = lblphone.TextElseIf (privilage.Text = 0) Then
Me.Response.Redirect("admin/default.aspx")Else
lblerror.Text =
"ไม่มีข้อมูล"
End If
มันไปตามหน้าที่เรากำหนดนะคะ ดูให้หน่อยนะคะ ขอบคุณค่ะ
(
myda.Fill(ds,