Partial Class info_and_buy
    Inherits System.Web.UI.Page

   

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim s As String
        Dim idsg As String
        Dim userholds1 As String
        s = Request.QueryString("address")
        Image1.ImageUrl = s
        idsg = Request.QueryString("ids")
        userholds1 = Request.QueryString("userhold1")
        Label2.Text = userholds1

    End Sub

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        SqlDataSource2.Insert()
        If TextBox1.Text = 0 Then
            SqlDataSource2.Delete()

        End If

    End Sub

    Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles LinkButton1.Click
        Response.Redirect("buy.aspx?userholds=" & Label2.Text)
    End Sub

    Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim m As String
        m = Request.QueryString("userhold1")
        Label5.Text = m
        Response.Redirect("mainpage.aspx?userhold=" & Label5.Text)

    End Sub

   
   
  
End Class