Como obtener el numero de la fecha de todos los miercoles desde hoy hasta fin de año

[german_martin]

Simplemente esto:

Código ASP:

Dim Start As DateTime = DateTime.Today.AddDays(-7)
        Start = Start.AddDays((10 - CInt(Start.DayOfWeek)) Mod 7)
        Dim year As Integer = Start.Year
        Dim Selected As New List(Of DateTime)()
        While year = Start.Year
            Selected.Add(Start)
            Start = Start.AddDays(7)
            Response.Write(Start)
            Response.Write("</br>")
        End While