0

here i have to search the database according to serial no and show the information of that serial no
the problem here everything is fine and

Dim a As String
        Dim b As Boolean
        Dim dr As SqlDataReader
        Dim ConnStr As String
        ConnStr = ConfigurationManager.ConnectionStrings("gate").ConnectionString()
        Dim conn As New SqlConnection(ConnStr)

        conn.Open()
        Dim command As New SqlCommand("select * from visitors_pass", conn)
        dr = command.ExecuteReader
        b = False

        a = Integer.Parse(TextBox1.Text)
        While dr.Read()
            If (a = dr(0)) Then
                default4.label2.text = dr(0)
                default4.label4.text = dr(1)
                b = True
                dr.Close()
                conn.Close()
                Response.Redirect("default4.aspx")

                Exit While
            End If
        End While
        MsgBox("enter the numeric value")
        TextBox1.Focus()
        b = True



        If (b = False) Then
            MsgBox("no data matching to this serial number is found")

        End If
        dr.Dispose()
        conn.Dispose()
        dr.Close()
        conn.Close()
        TextBox1.Text = ""

    End Sub

the error is it is saying that default4 is not declared even i created it
if that is not the correct one then what is the correct one, plz help me thanks

1
Contributor
1
Reply
2
Views
8 Years
Discussion Span
Last Post by mshravs
0

plz any tell me whether the code is correct or not. i need it urgently plz help me

This topic has been dead for over six months. Start a new discussion instead.
Have something to contribute to this discussion? Please be thoughtful, detailed and courteous, and be sure to adhere to our posting rules.