Igang med en fil upload tingest

SÅ nu kan jeg godt uploade filer. var noget nemmere end jeg troede:

    protected filupload as System.Web.UI.HtmlControls.HtmlInputFile
    protected lblbesked as System.Web.UI.WebControls.label
   
    Public sub Page_Load(Source as Object, E as EventArgs)
       
    end sub

    'Tjekker om en fil eksisterer med filnavnet og hvis ikke smider den filen op.
    'Derefter tjekker den igen om filen blev uploadet
    Public sub tilfojfil_click(sender As Object, e As System.EventArgs)
        lblbesked.text = nothing
        If filuploadSelected(filupload) = true then
       
            dim strfilsti as string = filupload.postedfile.filename
            dim filnavn as string = System.IO.Path.GetFileName(strfilsti)
       
            If file.Exists(server.mappath("../filer/" & filnavn)) then
                lblbesked.text = "En fil med det filnavn eksisterer allerede"
            else
                filupload.PostedFile.SaveAs(Server.MapPath("../filer/" & filnavn))               
               
                If file.Exists(server.mappath("../filer/" & filnavn)) then
                    lblbesked.text = "Filen blev uploaded her: <b>" & Server.MapPath("../filer/") & "</b><br />"
                    lblbesked.text += "og filen hedder: <b>" & filnavn & "</b>"
                else
                    lblbesked.text = "Filen blev <b>IKKE</b> uploadet. Kontakt venligst webmaster."
                end if
            end if
        else
            lblbesked.text = "Du skal vælge en fil"
        end if

    end sub

    Public Function filuploadSelected(ByVal filupload As System.Web.UI.HtmlControls.HtmlInputFile) As Boolean
        ' Returns a True if the passed
        ' FileField has had a user post a file
        If filupload.PostedFile Is Nothing Then Return False
        If filupload.PostedFile.ContentLength = 0 Then Return False
        Return True
    End Function




Men jeg kan ikke slette filerne igen. Den siger ingen fejl eller noget, men filerne slettes hellere ikke:

    protected lblbesked as System.Web.UI.WebControls.label
    protected drpadminfjernfil as System.Web.UI.WebControls.dropdownlist
   
    Public sub Page_Load(Source as Object, E as EventArgs)
        If not page.ispostback then
            fylddropdown()
        end if
    end sub

    Public sub Fjernfil_click(sender As Object, e As System.EventArgs)
        dim filnavn as string = drpadminfjernfil.selecteditem.text

        File.Delete(filnavn)

        fylddropdown()
        'response.write(filnavn)
    end sub

    Public sub fylddropdown()
        drpadminfjernfil.items.clear()
        Dim files() As String = Directory.GetFiles(server.mappath("../filer/"))
       
        Dim f As String
        For Each f In files
            Dim filename As String = Path.GetFileName(f)
            drpadminfjernfil.items.add(filename)
        Next
    end sub

Du er der jo nærmest allerede jaffafo.... Du skal bare lige lave en :
filupload.PostedFile.SaveAs(<path>);

Ok.... nu er jeg vist lidt for tidligt på fære her :o)
Det er jo noget kode der gør hvad det skal du har posted - og ikke kode der skal bringes til det :o)
Undskyld der jaffafo !
Mvh

ingen der kan hjælpe med at slette filer igen?

du kan bare bruge System.IO.File.Delete(<path>)

hovsa..  glemt den her.. smid lige et svar :)

ok :o)