Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load dim uid=Convert.ToString(Request.QueryString("uid")) conClass.Connect() 'Opening database connection. Dim sql As String = "select fname,gender,dob from login where uid=" & uid Dim cmd As New SqlCommand(sql, conClass.con) Dim reader As SqlDataReader = cmd.ExecuteReader While reader.Read 'This line shows error. lblFname.Text = reader.GetString(0) Page.Title = reader.GetString(0) lblGender.Text = reader.GetString(1) lblDOB.Text = reader.GetString(2) End While reader.Close() End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)