копирование файла по сети

[TranzitZP]

Все здравствуйте. Нужна помощь.
В файле Access, я прописал функцию скачивания файла из локальной сети на свой компьютер - работет отлично.

Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
....
Function DownLoadFile(FromName, ToName) As Boolean
DownLoadFile = URLDownloadToFile(0, FromName, ToName, 0, 0) = 0
End Function
....
link = "\\10.0.0.1\Share\load.txt" ' файл в сети
FileToLoad = "C:\load.txt" ' место для копирования к себе в папку
If DownLoadFile(link, FileToLoad) Then Me!asd = "файл из сети скопирован удачно"

Сейчас возникли у меня трудности с написанием в VBA функции обратного копирования имеющегося текстового файла со своего компа в расшаренную папку другого компьютера локальной сети.
У кого есть пример, напишите пожалуйста, а то в интернете найти не смог. Заранее спасибо.

[R Dmitry]

CopyFile(<Source>,<Destination>,<Ov erwrite>)

Назначение: копирует один или несколько файлов.

Параметры:

<Source> - строка, путь к источнику копирования (что копировать). В последнем компоненте параметра можно использовать групповые символы "*" и "?".
<Destination> - строка, путь назначения (куда копировать).
<Overwrite> - необязательный, булево (число). Перезаписывать существующие файлы, или нет. По умолчанию - True (перезаписывать). Если файл, который нужно перезаписать, имеет атрибут read-only, возникнет ошибка (независимо от установки этого параметра).

Пример:

Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.CopyFile "C:\*.bat", "D:\", 0

[TranzitZP]

Я почему-то думал, что функция CopyFile не может копировать файлы по сети, а только копирует в пределах своего компа. Или я не прав?
К сожелению сейчас нет возможности это проверить - локальная сеть на работе.

[R Dmitry]

Сообщение от TranzitZP

Я почему-то думал, что функция CopyFile не может копировать файлы по сети, а только копирует в пределах своего компа. Или я не прав?
К сожелению сейчас нет возможности это проверить - локальная сеть на работе.

у меня тоже сейчас локалки нет