Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 15.01.2010, 10:19   #1
Exo
Форумчанин
 
Аватар для Exo
 
Регистрация: 25.09.2007
Сообщений: 102
По умолчанию VBA vs FTP

Всем привет, такой вопрос,

есть два файла, файл1 лежит на сетевом диске и является общей базой, файл2 рассылается пользователям.
Пользователи заполняют файл2, нажимаю кнопку и все данные введенные ими записываются в файл1.

Проблемы бы не было, если бы у моей компании не было бы региональных отделов, которые не имеют прямого доступа к сетевому диску на котором лежит файл1. Им приходиться поднимать VPN, что весьма затруднительно для большинства моих региональных коллег, ибо...ну не дружат они с компьютером, начинаются звонки, "а как?, "а у меня не работает!!!" и т.п.

Появилась идея выложить файл1 на FTP (получается нужен только интернет)

вариант под дурачка не прокатил, т.е. просто прописать путь вида (фрагмент кода):

Код:
myPath = "ftp://log:pass.ftpSERV.ru/Total DATA.xlsx"
    Set ws = ThisWorkbook.ActiveSheet: On Error Resume Next: Set wb = Workbooks.Open(Filename:=myPath)
после запуска макроса, Excel выдает сообщение о попытки "подключения к серверу" и эта попытка стремиться к бесконечности, ждал мин 15, нечего не происходило.

(указав путь на сетевой диск вида:
Код:
myPath = "U:/Total DATA.xlsx"
    Set ws = ThisWorkbook.ActiveSheet: On Error Resume Next: Set wb = Workbooks.Open(Filename:=myPath)
все отлично работает)

может нужна специальная команда или еще что-то?
подскажите...если такая идея (FTP) вообще возможна.
Exo вне форума Ответить с цитированием
Старый 15.01.2010, 10:44   #2
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,858
По умолчанию

Цитата:
может нужна специальная команда или еще что-то?
подскажите...если такая идея (FTP) вообще возможна.
Не пробовал, но вряд ли возможно использовать общий доступ к файлу, расположенному на FTP...

Скачать файл, изменить его, закачать обратно - в общем-то, не проблема.
Но редактировать файл, находящийся на FTP, не получится.

Я бы предложил расположить файл на сервере, доступном через Интернет.
Пользователи будут заходить на сервер (через удаленный рабочий стол), и работать с файлом.

Цитата:
Пользователи заполняют файл2, нажимаю кнопку и все данные введенные ими записываются в файл1.
В этом случае пользователям совсем необязательно иметь доступ к файлу1.
Надо только переделать макрос - чтобы он не дописывал сам данные в файл1, а просто скидывал нужные данные во временные файлы (на FTP или на почту)
А второй макрос будет регулярно проверять наличие новых файлов, и дописывать новые данные в файл1, удаляя после этого временные файлы.

PS: Стоит задуматься об использовании баз данных (возможно, с веб-интерфейсом) вместо Excel...

Последний раз редактировалось EducatedFool; 15.01.2010 в 10:47.
EducatedFool вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
VBA Word,VBA Excel решить 2 задачи fafolo4ka Фриланс 6 05.03.2012 01:15
FTP cnst_bus Паскаль, Turbo Pascal, PascalABC.NET 0 28.10.2009 22:14
FTP prizrak1390 Работа с сетью в Delphi 13 13.05.2008 22:52
FTP MAcK Работа с сетью в Delphi 1 19.12.2007 15:51
FTP Димарик Работа с сетью в Delphi 2 27.06.2007 16:24