Partial Class mainpage
    Inherits System.Web.UI.Page

    Protected Sub ImageButton5_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton5.Click
        Response.Redirect("info and buy.aspx?address=" & ImageButton5.ImageUrl & "&" & "ids=5" & "&" & "userhold1=" & Label1.Text)
    End Sub

    Protected Sub ImageButton2_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton2.Click
        Response.Redirect("info and buy.aspx?address=" & ImageButton2.ImageUrl & "&" & "ids=7" & "&" & "userhold1=" & Label1.Text)
    End Sub

    Protected Sub ImageButton8_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton8.Click
        Response.Redirect("info and buy.aspx?address=" & ImageButton8.ImageUrl & "&" & "ids=1" & "&" & "userhold1=" & Label1.Text)
    End Sub

    Protected Sub ImageButton3_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton3.Click
        Response.Redirect("info and buy.aspx?address=" & ImageButton3.ImageUrl & "&" & "ids=8" & "&" & "userhold1=" & Label1.Text)
    End Sub

    Protected Sub ImageButton4_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton4.Click
        Response.Redirect("info and buy.aspx?address=" & ImageButton4.ImageUrl & "&" & "ids=9" & "&" & "userhold1=" & Label1.Text)
    End Sub

    Protected Sub ImageButton1_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton1.Click
        Response.Redirect("info and buy.aspx?address=" & ImageButton1.ImageUrl & "&" & "ids=6" & "&" & "userhold1=" & Label1.Text)
    End Sub

    Protected Sub ImageButton9_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton9.Click
        Response.Redirect("info and buy.aspx?address=" & ImageButton9.ImageUrl & "&" & "ids=2" & "&" & "userhold1=" & Label1.Text)
    End Sub

    Protected Sub ImageButton6_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton6.Click
        Response.Redirect("info and buy.aspx?address=" & ImageButton6.ImageUrl & "&" & "ids=4" & "&" & "userhold1=" & Label1.Text)
    End Sub

    Protected Sub ImageButton7_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton7.Click
        Response.Redirect("info and buy.aspx?address=" & ImageButton7.ImageUrl & "&" & "ids=3" & "&" & "userhold1=" & Label1.Text)
    End Sub

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim u As String
        u = Request.QueryString("userhold")
        Label1.Text = u
    End Sub
End Class