Есть шаринг в сетке.
На шаринг дан доступ юзеру "Х"
Как из под юзера "Y" программым путем залесть в эту папку ?
(что то типа того: Domain\user:password)
Option Explicit
Sub FTPLink()
Dim oShell
Dim sUrl As String
sUrl = "ftp://user:password@192.168.10.10" 'это пример, вы подставьте свою ссылку на фтп
Set oShell = CreateObject("Wscript.Shell")
oShell.Run (sUrl)
Set oShell = Nothing
End Sub
Сейчас этот форум просматривают: Google-бот и гости: 85