Åbne genvej uden open file dialog

Jeg har følgende kode, som opretter en liste over genveje i en mappe:

    Sub genveje()

        Dim storefile As directory
        Dim directory As String
        Dim files As String()
        Dim File As String

        files = storefile.GetFiles("\\bcad1\genvej", "*.url")

        For Each File In files
            Response.Write(File & "<BR>")
        Next
    End Sub

    Sub test()
        Dim dirInfo As New DirectoryInfo("\\genvej")

        ShortCutList.DataSource = dirInfo.GetFiles("*.url")
        ShortCutList.DataBind()
    End Sub

Når man trykker på linket åbnes dialogboksen hvor man kan vælge at åbne filen eller gemme den på skrivebordet. Er det muligt at deaktivere dialogboksen og automatisk åbne genvejen?