共享文件夹的拷贝问题

[lyphb]

我想用VB实现对网络其它机器上的共享文件夹的拷贝。就像从网上邻居里拷贝一样，请问应该用什么方法？谢谢各位大侠了。

[golden24kcn]

filecopy "c:\0.123","\\lili\c:\0.123",是这个意思吗?

[rainstormmaster]

'引用Microsoft Scripting Runtime
Private Sub Command1_Click()
Dim sharefolder As String
Dim FSO As New FileSystemObject

sharefolder = "\\C2\wps2000\lib" '机器名c2上的共享名为wps2000的文件夹下的lib文件夹
FSO.CopyFolder sharefolder, "D:\MCCC", True '拷贝文件夹到"D:\MCCC"，如有同名文件 则覆盖（第三个参数为false，则不覆盖）
Set FSO = Nothing
End Sub

[lyphb]

to rainstormmaster:
你上述的方法是可以实现copy文件夹下的所有文件，但我想要copy的是原路经为："\\C2\wps2000"下所有的文件夹以及文件.
有什么好思路？

[lyphb]

看来只有用copyfolder和copyfile了。大家有没有其他更好的方法？
网上邻居了的copy是怎么实现的？