Upload de arquivos

[Rose Silva]

Bom Dia,

estou com uma duvida de como fazer um upload estou usando esté código no botão salvar arquivo mas sempre da um erro.

Quero abrir uma caixa de dialogo para o usuario escolher o arquivo e mandar para o servidos

o código está em vb.net asp.net não resolve o meu problema ...

Private Sub btnADDoc_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnADDoc.Click

        Dim wAbrir As New OpenFileDialog
        Dim wSalvar As New SaveFileDialog

        wAbrir.Filter = "todos os arquivos(*.*)|*.*|txt Files(*.txt)|*.txt|Arquivos de Texto(*.doc)|*.doc*|Planilhas(*.xml)|*.xml"
        wAbrir.ShowDialog()

                My.Computer.Network.UploadFile("D:\EAG", "\\10.61.5.1\sigoinet$")



    End Sub

Editado Agosto 4, 2009 por quintelab
Adicionado BBCode Code

[juninnn]

Faz assim:

Dim wAbrir As New OpenFileDialog
        Dim wSalvar As New SaveFileDialog

        wAbrir.Reset()
        wAbrir.Filter = "todos os arquivos(*.*)|*.*|txt Files(*.txt)|*.txt|Arquivos de Texto(*.doc)|*.doc*|Planilhas(*.xml)|*.xml"
        wAbrir.ShowDialog()

        My.Computer.Network.UploadFile(wAbrir.FileName, "\\10.61.5.1\sigoinet\" & wAbrir.SafeFileName.ToString)

Editado Agosto 4, 2009 por juninnn