Imports System.IO

Partial Class _default
    Inherits System.Web.UI.Page

    Private Sub _default_Load(sender As Object, e As EventArgs) Handles Me.Load
        'klasördeki resimleri yükler
        Dim filePaths As String() = Directory.GetFiles(Server.MapPath("/imagesfirmalar/"))
        Dim files As New List(Of ListItem)()
        For Each filePath As String In filePaths
            Dim fileName As String = Path.GetFileName(filePath)
            files.Add(New ListItem(fileName, "/imagesfirmalar/" + fileName))
        Next
        RepeaterImages.DataSource = files
        RepeaterImages.DataBind()
    End Sub
End Class