i got "could not complete operation on some files and directroies. see the
data property of the expection for more details" while trying to copy a
folder from the server to my local PC.
the folder and the file inside got copy over but it generate that error.
here is my code
Private Sub CpyImgs()
Dim y As Integer = 0
Do Until y = arlsGpYN.Count
If CInt(arlsGpYN.I tem(y)) = 1 Then
Dim x As Integer = 0
Dim intGpYNFlag As Integer = CInt(arlsGpYN.I tem(y))
Do
Dim strPth As String = JbSitesDir(strJ obSite)
Dim strImgsPth As String =
CStr(arlsTemplt GpPth.Item(intG pYNFlag))
Try
If
My.Computer.Fil eSystem.Directo ryExists(strImg sPth) Then
My.Computer.Fil eSystem.CopyDir ectory(strImgsP th,
strPth, False)
Else
x += 1
End If
Catch ex As Exception
MessageBox.Show (ex.Message)
Return
End Try
x += 1
Loop Until x = arlsTempltGpPth .Count
Else
y += 1
End If
y += 1
Loop
End Sub
Can someone help? thank
data property of the expection for more details" while trying to copy a
folder from the server to my local PC.
the folder and the file inside got copy over but it generate that error.
here is my code
Private Sub CpyImgs()
Dim y As Integer = 0
Do Until y = arlsGpYN.Count
If CInt(arlsGpYN.I tem(y)) = 1 Then
Dim x As Integer = 0
Dim intGpYNFlag As Integer = CInt(arlsGpYN.I tem(y))
Do
Dim strPth As String = JbSitesDir(strJ obSite)
Dim strImgsPth As String =
CStr(arlsTemplt GpPth.Item(intG pYNFlag))
Try
If
My.Computer.Fil eSystem.Directo ryExists(strImg sPth) Then
My.Computer.Fil eSystem.CopyDir ectory(strImgsP th,
strPth, False)
Else
x += 1
End If
Catch ex As Exception
MessageBox.Show (ex.Message)
Return
End Try
x += 1
Loop Until x = arlsTempltGpPth .Count
Else
y += 1
End If
y += 1
Loop
End Sub
Can someone help? thank