急求用VB实现文件传输


小弟想用VB6.0实现从局域网中考一个文件，但是看到大虾们的方法不知为何不能用。急求大虾指导！！！小弟不胜感激！！！
源代码：
Private Sub Command1_Click()
    Shell "net use \\1.1.1.2  ", vbHie
    FileCopy "e:\1.doc", "\\1.1.1.2\f:\1.doc"
End Sub就是按一下按钮把文件传过来就行
提示说文件路径未找到（第二句出错）
其中本机ip  1.1.1.1   旁边那个1.1.1.2
把本机的文件拷过去
或者把旁边那个机器上的文件拷过来都可以
文件夹均已经设成完全共享
两台机器用交换机或者直连线（我都试过了）连接
均为xp+sp2   vb6.0+sp6
跪求大虾指教！！