Partial Class _Default
    Inherits System.Web.UI.Page


    Function get_random_num() As Integer
        Static Generator As System.Random = New System.Random()
        Return Generator.Next() Mod 1000
    End Function


    Protected Sub product_fetch() Handles Me.Load
        Dim product_url As String = "https://picsum.photos/id/" & get_random_num() & "/200"

        Image1.ImageUrl = product_url
        Image2.ImageUrl = product_url
        Image3.ImageUrl = product_url
        Image4.ImageUrl = product_url
        Image5.ImageUrl = product_url


    End Sub

End Class