Ir para conteúdo

Arquivado

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

analistadesistema

Shell + String em VB 2013

Recommended Posts

Estou em uma situação ao qual não consigo encontrar uma solução no momento.

================================================================
Public Class Form1
Dim Dir1 as String = "C:\temp\*.*"
Dim Dir2 as String = "C:\Pasta Temp\temp\*.*"
Dim Dir3 as String = "C:\Pasta_Temp\temp\*.*"
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Shell("xcopy /E /H " & Dir1 & " " & Dir2, vbNormalFocus)
'aqui ocorre um erro dentro do shell (numero de parametro invalido)
'esse erro ocorre por conta da String Dir2 conter espaço
'preciso de uma idéia de como contornar esse problema.
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Shell("xcopy /E /H " & Dir1 & " " & Dir3, vbNormalFocus)
'aqui o conteúdo da pasta é copiada normalmente.
'pois a string Dir3 contem um _ no local do espaço.
End Sub
End Class
=====================================================================
vou utilizar as Strings Dir1, Dir2 e Dir3 de um Arrays Publico de um Modulo no meu projeto,
por esse motivo os valores destas Strings vai ser variados.
fico no aguardo de um auxílio dos colegas.

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.