Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

rafaeloliveira83

A conversão da seqüência de caracteres '*.txt' no tipo 'In

Recommended Posts

Estou precisando criar um programa que exclua alguns arquivos especificos, porem está gerando erro na seguinte linha:

 

 

Dim ArquivosInfo As IO.FileInfo() = Diretório.GetFiles(pastaTemp, "*.txt")

 

        Dim pastaTemp As STRING = "C:\Windows\Temp"
        Dim Diretório As New IO.DirectoryInfo("C:\Windows\Temp")
        Dim ArquivosInfo As IO.FileInfo() = Diretório.GetFiles(pastaTemp, "*.txt")

Fala que

 

A conversão da seqüência de caracteres '*.txt' no tipo 'Integer' não é válida.

Se eu retiro o o pastatemp, "*.txt") ele aceita normal.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Vamos por partes:

 


Dim pastaTemp As STRING = "C:\Windows\Temp"         
Dim Diretório As New IO.DirectoryInfo("C:\Windows\Temp")         
Dim ArquivosInfo As IO.FileInfo() = Diretório.GetFiles(pastaTemp, "*.txt")

Primeiro se você criou uma variável com o caminho da sua pasta, você pode usa-la na segunda linha:


Dim pastaTemp As STRING = "C:\Windows\Temp"         
Dim diretorio As New IO.DirectoryInfo(pastaTemp)

Na terceira linha você já esta usando sua variável diretorio que já possui o caminho da pasta, você não tem que informar este caminho no método GetFiles. Basta colocar seu filtro:

 


Dim pastaTemp As STRING = "C:\Windows\Temp"         
Dim diretorio As New IO.DirectoryInfo(pastaTemp) 
Dim ArquivosInfo As IO.FileInfo() = diretorio.GetFiles("*.txt")

Abraços...

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.