01.Protected Sub bindShow()
02. Dim sql As String
03. Dim dv As DataView
04.ส่วน sql ตรงนี้อ่ะค่ะ
05. [color=orange] sql = "SELECT tb_ibank_complaint.*,tb_complaint_occu.Detail "
06. sql += "FROM tb_ibank_complaint INNER JOIN tb_complaint_occu"
07. sql += "ON tb_ibank_complaint.Occu = tb_complaint_occu.Id "
08.
09. Response.Write(sql)
10. dv = ObjDb.GetDataSet(sql).Tables(0).DefaultView
11. If dv.Count > 0 Then
12. Me.lbTypeR.Text = dv.Item(0)("TypeR").ToString
13. Me.lbSubject.Text = dv.Item(0)("Subject").ToString
14. Me.lbSubmitDate.Text = dv.Item(0)("SubmitDate").ToString
15. Me.lbMessage.Text = dv.Item(0)("Message").ToString
16. Me.lbName.Text = dv.Item(0)("Name").ToString
17. Me.lbLastname.Text = dv.Item(0)("Lastname").ToString
18. Me.lbIdCard.Text = dv.Item(0)("IdCard").ToString
19. Me.lbOccu.Text = dv.Item(0)("Detail").ToString
20. Me.lbContactPhone.Text = dv.Item(0)("ContactPhone").ToString
21. Me.lbEmail.Text = dv.Item(0)("Email").ToString
22. Me.lbAddress.Text = dv.Item(0)("Address").ToString
23. End If
24.
25. End Sub
