Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #57 da revista programar. Faz já o download aqui!

arrelialp

Pesquisar um diretório

Mensagens Recomendadas

arrelialp    0
arrelialp

Bom dia,

Gostava de saber qual a melhor forma de pesquisar um diretório / diretoria (atenção, não é um ficheiro), carregando num botão, e passar o caminho que o utilizador pesquisa para uma caixa de texto, sem o nome do ficheiro, apenas o caminho.

Estive a pesquisar e penso que devo utilizar o Namespace System.IO, talvez DirectoryInfo...

Obrigado desde já

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
arrelialp    0
arrelialp

'Tá feito. Afinal não era muito difícil:

Private Sub ButtonPath_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonPath.Click
        FolderBrowserDialog1.ShowDialog()
        TextBoxCaminho.Text = FolderBrowserDialog1.SelectedPath
    End Sub

Não esquecer passar o FolderBrowserDialog para o Form :confused:

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
bioshock    170
bioshock

Apesar de esse código ser um bocado insuficiente. Experimenta clicar nesse button para executar esse código e depois clicar em cancelar :confused:

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
arrelialp    0
arrelialp

... se carrego em cancelar não faz nada, ou seja, não passa a directoria seleccionada para a caixa de texto. O que está certo  :confused: pois é o que pretendo.

Ah, também não dá nenhum erro.

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
bioshock    170
bioshock

Pensava que estavas a mandar uma MessageBox em vez da actual caixa de texto. Por acaso a caixa de texto aceita campos nulos, um outro objecto pode-te mandar uma exception, que se assemelha ao facto de não teres seleccionado nada. Para resolver isso fazes uma condição e verificas se, dentro da caixa de diálogo, foi pressionado o button OK.

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites
arrelialp    0
arrelialp

Ok. Valeu e obrigado!

Realmente, o que o "bioshock" aqui disse tem todo o sentido pois fiquei com dificuldades, uma vez eu pretender que, após a seleção da path, seja juntado no fim do caminho, o carater "\" (sem as aspas). Com o código em cima, sempre que o utilizador carrega no botão Cancel, aparecia no caminho a barra "\". O código final ficou assim:

Private Sub ButtonPath_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonPath.Click
        Dim result As DialogResult = FolderBrowserDialog1.ShowDialog()
        If (result = DialogResult.OK) Then
            TextBoxCaminho.Text = FolderBrowserDialog1.SelectedPath & "\"
        Else
            TextBoxCaminho.Text = Nothing
        End If
End Sub

EDIT: Geshi adicionado

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora


×

Aviso Sobre Cookies

Ao usar este site você aceita a nossa Política de Privacidade