Добро пожаловать к нам в гости! Наш сайт посвящён программе NeoBook, с помощью которой вы легко сможете создавать собственные мультимедиа-приложения без необходимости изучать сложные языки программирования! Зарегистрируйтесь, чтобы стать членом нашего сообщества.
Понасилуйте ftp через vbs-скрипт Перед использованием регистрируем библиотеку - в командной строке набрать regsvr32 c:\путь_к_библиотеке\ftp.dll Отменить регистрацию библиотеки - regsvr32 -u c:\путь_к_библиотеке\ftp.dll В скрипте редактируем строки с вводом адреса, имени, пароля, пути скачивания\сохранения (там я написал где), сохраняем и запускаем. Если сработает, то возможно переписать скрипт под конкретную задачу, это лишь тестовый пример (скрипт на закачку тоже есть отдельно).
Спасибо! Попробуем... Но только уже не сегодня, спать охота...
P.S. Мы не насильники! Всё только по взаимному согласию!...
- А вам какую операционку поставить - экспи, семерку или висту? - Это ты сейчас о чем? - Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный? - Ну, конечно, надежный! - Вот, значит - экспи, без вопросов! Сейчас сделаем...
(Улицы разбитых фонарей, сезон 10, серия 17)
Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!
При модном втюхе модоподдающимся начинает нравиться
Всем привет! DEMBEL, Провел вариант с vbs, результат такой: (+ значит положительно) 1-В объекте WebBrowser в Нео, vbs исполнялся сразу (еще до компиляции)))) = (+) 2-В Нео 562 (через фичу VBSScript)
Code
BrowserExecScript "WebBrowser1" "Dim oftp||Set oftp = CreateObject([#34]Primalscript.FTPTransfer[#34])|oftp.Passive = 1 ' пассивный режим|' oftp.Port = ' если используется порт не по умолчанию тут его можно указать|if oftp.Connect([#34]***.***.**[#34],[#34]***[#34],[#34]*********[#34]) = 0 Then| WScript.Echo oftp.Status|else| WScript.Echo [#34]Начинаем скачивать[#34]| If oftp.Get ([#34]/nn/update.ver[#34],[#34]C:\nnd\update.ver[#34]) = 0 Then 'Get| WScript.Echo oftp.Status| Else| WScript.Echo [#34]Фу,скачали...[#34]| End If| oftp.Disconnect|end If" "VBScript"
выдает ошибку: 80020101 результат = (-) ___________________________________________
DEMBEL, как загрузить на сервер, что надо написать в место Get (незнаю команды разные или нет при загрузки нескольких файлов)
Code
If oftp.Get ("/папка/файл","C:\файл") = 0 Then
If oftp.ХХХ ("C:\файлы","/папка/файлы") = 0 Then
____________________________________________
А если VBS в Нео открывать виндовкими средствами, они есть наверное на каждом компе, результат то будет тот же, и работать будет в Нео 5
если работает, то вот тебе скрипт загрузки а работать будет вне зависимости, vbs на любой винде обрабатывается
Добавлено (31 Январь 2009, 12:37) --------------------------------------------- отредактируй скрипты как тебе надо,убери комментарии (со значком `) - может их не понимает neo я плотно с neo не работал, не знаю почему не пашет внутренний код, вероятно у тебя там ошибки...
- скачать / загрузить на сервер (можно дописать обработку ошибок, в случае удачи вернут 0) Также можно еще попробовать приделать обработку параметров запуска скрипта, чтобы он был универсальный, все пути и пр. задавались извне, через параметры запуска, например upload.vbs -ftp.microsoft.com -user -pass
убери из подобных строчек wscript.echo чтобы так было:
Code
oftp.Connect("ХХХХ","ХХХХ","ХХХХ")
вначале запусти сам скрипт, если нет ошибок, то можешь использовать...
Quote (sp3d)
А vbs скрипты какой виндовской прогой можно запустить, кроме IE
Ты чего, эксплорером вздумал запускать? В винду встроены "серверы" и интерпретаторы скриптов (лежат в папке Виндовс\SYSTEM32) wscript.exe и cscript.exe, ими и запускай! Почитай справку к ним - запусти с параметром /? или поищи в справке виндовс - есть интересные параметры запуска... Для нашего скрипта подойдет: wscript.exe upload.vbs
Quote (sp3d)
а если есть точки в адресе сервера(типа: 100.100.001.001) их надо экранировать?
ну IE по-умолчанию пользуется обработчиком wscript.exe, но из-за собственной глючности IE c ним лучше не связываться
Добавлено (31 Январь 2009, 16:48) --------------------------------------------- а тебе же надо чтобы все файлы из папки перекачивались сразу? не могу пока заставить этот скрипт сразу все обрабатывать, только по одному файлу (маска *.* обрабатывается некорректно, нужна процедура отдельная). А если чтобы файлов немного было и имена известны - можешь такие условия сделать?
я так понял, что нео-бук этот скрипт(vbs) записывает в html страницу и тот запускается уже со страницы Потому что без html страницы он не запускается. А что это за ошибка такая, что она означает
а тебе же надо чтобы все файлы из папки перекачивались сразу? не могу пока заставить этот скрипт сразу все обрабатывать, только по одному файлу (маска *.* обрабатывается некорректно, нужна процедура отдельная). А если чтобы файлов немного было и имена известны - можешь такие условия сделать?
Файлов где-то будет 25 (+-5), имена не у всех, у 5 файлов имя будет генерится рандомом, поэтому не угадать. Но можно допустим сделать считывание имен и расширение с txt например организация списка такая: name1.dat name2.txt .............и т.д. А файлы загружать циклом получится?!
Сегодня-завтра планирую начать изготовление плагина. Нужен какой-нибудь FTP-сервер для тренировки и отладки. Какой? - А вам какую операционку поставить - экспи, семерку или висту? - Это ты сейчас о чем? - Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный? - Ну, конечно, надежный! - Вот, значит - экспи, без вопросов! Сейчас сделаем...
(Улицы разбитых фонарей, сезон 10, серия 17)
Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!
При модном втюхе модоподдающимся начинает нравиться
зарегистрируй аккаунт на nextmail, получишь почту и 1ГБ места с доступом по ftp, или попроси нашего админа сказать пароль ftp. С публичными ftp могут быть проблемы доступа, я ни одного нормального не нашел. Не хочешь регистрироваться, тогда я скажу свой логин/пароль на nextmail, у меня там все равно почти пусто Как задавать вопросы
зарегистрируй аккаунт на nextmail, получишь почту и 1ГБ места с доступом по ftp
Ага, попробую...
Quote (DEMBEL)
или попроси нашего админа сказать пароль ftp
На это я пойтить не могу! Государственная тайна!
Quote (DEMBEL)
я скажу свой логин/пароль на nextmail, у меня там все равно почти пусто
Quote (sp3d)
я могу свой дать но тока на народ ру,
Спасибо, но думаю не понадобится, т.к.
Quote (sp3d)
зарегился на nextmail так что если надо то можно и там
Добавлено (31 Январь 2009, 21:40) --------------------------------------------- Да, кстати, чего-то у меня уже пару недель C-Soft "через раз" с жуткими тормозами открывается. У кого-нибудь есть такое?
- А вам какую операционку поставить - экспи, семерку или висту? - Это ты сейчас о чем? - Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный? - Ну, конечно, надежный! - Вот, значит - экспи, без вопросов! Сейчас сделаем...
(Улицы разбитых фонарей, сезон 10, серия 17)
Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!
При модном втюхе модоподдающимся начинает нравиться
Плагин совершенно сырой ещё! Не сделано даже и четверти возможного, а то, что имеется - совсем не причесано! Бардак пока в алгоритме коррекции ошибок! Если это вообще можно назвать "коррекцией" ! Но, требуемые на первых порах функции присутствуют. Сечас нужны конкретные пожелания!!! Я тестил только на ftp.nextmail.ru.
Да, плагин работает через стандартный FTP-порт (21-й) Другие порты нужны? С причалами, пароходами...
- А вам какую операционку поставить - экспи, семерку или висту? - Это ты сейчас о чем? - Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный? - Ну, конечно, надежный! - Вот, значит - экспи, без вопросов! Сейчас сделаем...
(Улицы разбитых фонарей, сезон 10, серия 17)
Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!
При модном втюхе модоподдающимся начинает нравиться
Да, кстати, чего-то у меня уже пару недель C-Soft "через раз" с жуткими тормозами открывается. У кого-нибудь есть такое?
тоже замечено такое!
Добавлено (10 Февраль 2009, 20:06) --------------------------------------------- Peter, Отлично! Не скажу за все функции, а только за те которые мне были нужны. все отработалось нормально, т.е. успешно. Ошибка вылетала только когда я нажимаю на кнопку загрузить, и диалоговом окне выбрать файл закрываю окно не выбрав файлы(нажимая на закрыть в верху окна) Тестил всего два раза, т.к. времени пока нет, вдобавок тут к нам виряги в гости заходили))), погром устроили, ворожины. А теперь пожелание, все отлично, покрайне мере для моих первоочередных нужд, но вот при выборе нескольких файлов(включил множественый выбор файлов) загрузка неудалась, и вылетала ошибка об неправильных именах файла, допустим мне надо загрузить несколько файлов, думаю надо теперь делать цикл, но как реализовать не соображу, только приходит что то типа этого:
но будет ли сервер успевать получать команды? Цикл то работать будет быстрее чем загрузка файлов, не ругайте меня если задаю глупый вопрос, просто давно не открывал НВ, и так незнал, да еще и забыл
Да у меня с ним тоже - не очень, а от работы урывками толку никакого. Доведу до ума что есть в ближайшие дни. Там еще работать и работать.
Quote (sp3d)
но вот при выборе нескольких файлов(включил множественый выбор файлов) загрузка неудалась, и вылетала ошибка об неправильных именах файла,
Плагин ориентирован (во всяком случае ПОКА) на единвременную загрузку только одного файла. Я уж думал об этом, но надо ли?... Множественную загрузку файлов очень просто организовать средствами самой NB, например так, как вы и упомянули.
Quote (sp3d)
но будет ли сервер успевать получать команды? Цикл то работать будет быстрее чем загрузка файлов,
Естесственно на загрузку файла требуется время, но... Сервер будет исправно получать команды, т.к. проект и плагин общаются через условные функции, т.е. пока не отработает полностью команда плагина дальнейший ход конкретного скрипта в NB выполнен не будет. Но остальные работать будут, т.к. проект не зависает. Кроме того, в плагине естесственно будет контроль хода выполнения работы, так-что, например, проследить результат загрузки (скажем, в том же цикле) возможность будет. - А вам какую операционку поставить - экспи, семерку или висту? - Это ты сейчас о чем? - Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный? - Ну, конечно, надежный! - Вот, значит - экспи, без вопросов! Сейчас сделаем...
(Улицы разбитых фонарей, сезон 10, серия 17)
Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!
При модном втюхе модоподдающимся начинает нравиться
Вы правы, плагин уже неплох, и множественый загруз файлов это лишние, а делать множественную через НВ еще лучше, можно приделать полосу закрузки . Завтра буду доделовать проект, впринцепе все почти готово
Quote (Peter)
Сервер будет исправно получать команды.....
в общих чертах понятно, я боялся, что могу испортить конект циклом поэтому немного сомневался _______________________________________ Peter, СПАСИБО!
Сообщение отредактировано sp3d - Вт, 10 Февраля 2009, 23:19
Гм... Спасибо, конечно, но пока это - халтура, а не "продукт". Поэтому предлагаю не торопиться сдавать работу, а чуток обождать, если время терпит.
Quote (sp3d)
можно приделать полосу закрузки
Я планирую все эти дела вставить в плагин в будущем, но пока проблема с процентным контролем хода процесса Upload. С download всё ОК, а вот с загрузкой НА сервер - ПРОБЛЕМА. Счетчик доходит до 15-20% и... останавливается ...
Quote (sp3d)
я боялся, что могу испортить конект циклом
Теоретически плагину по-барабану ЧТО там делает проект, если при этом не задействованы команды плагина, например, на принудительную остановку перекачки файлов или отключение от сервера. Но мысль правильная! Надо будет все проверить и добавить (если потребуется) опционально отключаемую/включаемую "защиту от дурака" на процесс передачи файлов. Вот видите - тут ещё работы "выше крыши", а вы говорите:
Quote (sp3d)
все почти готово
- А вам какую операционку поставить - экспи, семерку или висту? - Это ты сейчас о чем? - Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный? - Ну, конечно, надежный! - Вот, значит - экспи, без вопросов! Сейчас сделаем...
(Улицы разбитых фонарей, сезон 10, серия 17)
Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!
При модном втюхе модоподдающимся начинает нравиться
Поэтому предлагаю не торопиться сдавать работу, а чуток обождать, если время терпит.
По поводу времени, пока терпит, ибо мне пришлось временно заблокировать сайт, я поначалу ездил и командором каждый день заливал файлы, но жутко надоело из-за дефицита времени ну первую версию я всетаки сделаю, хотябы чтоб показать руководству процесс работы. А с улучшением плагина, буду улучшать сам прект
Quote (Peter)
опционально отключаемую/включаемую "защиту от дурака" на процесс передачи файлов
непонял, что за защита от дурака?! и еще вопрос такой. При работе программы идет загрузка файлов на сервер, но если вырубили инет(у нас с провам такое бывает) какие могут быть последствия? А Нео может создавать динамически объекты например кнопки, т.е. сначала нам неизвестно сколько будет кнопок, и уже от действия юзера получаем колличество?! или копировать объект (кнопку)?
Сообщение отредактировано sp3d - Ср, 11 Февраля 2009, 01:23
Чего-то кофеЮ я перебрал... То с ног валился, то теперь не заснуть... Забавный вечер сегодня выдался!
Quote (sp3d)
хотябы чтоб показать руководству процесс работы.
Это называется типа "войти в режим ИКД", т.е. - Имитация Кипучей Деятельности.
Quote (sp3d)
непонял, что за защита от дурака?!
Вообще-то (как говорят), от дурака защиты НЕТ! Есть такой вопрос: в чем разница между человеком-ламером и обезьяной, если их посадить за компьютер? Ответ: обезьяна не станет повторять ту комбинацию клавиш, которая приводит компьютер к зависанию! Ну, а если серьезно, то в любой проге нужно стараться предусмотреть максимум неожиданностей от действий пользователя, и как с этими неожиданностями бороться.
Quote (sp3d)
При работе программы идет загрузка файлов на сервер, но если вырубили инет(у нас с провам такое бывает) какие могут быть последствия?
Давайте подумаем... Если прибегнуть к дедуктивному методу, описанному в литературных трудах сэра Артура Конан-Дойля, то можно предположить, что закачка файла оборвется! Остается только надеятся на то, что в связи со столь прискорбным событием третья мировая вонйна не разразится! ОК! Теперь сурьез... Еще не пробовал "обрыв связи"... Сорри... В принципе, есть возможность организовать докачку файлов, но пока я до этого не добрался, и при возобновлении закачки плагин будет начинать все по-новой. А до этого при восстановлении связи с Инетом нужно будет научить плагин автоматически заново логиниться на сервере, и т.д. и т.п. Кстати.... В NeoBook имеется опция, позволяющая проекту самостоятельно определять есть выход в Инет или нет. И тогда все эти дела можно сотворить в самой NB!
Quote (sp3d)
А Нео может создавать динамически объекты например кнопки
Динамически создавать (копировать) и уничтожать объекты в проектах NB нельзя! Во всяком случае, ПОКА нельзя... Правда, объекты можно "выдергивать" с любой страницы, и показать, например, в отдельном окне, но создавать - нет! Если только при помощи плагина, но и тут есть определенные ограничения по количеству для визуальных объектов, т.к. их надо к чему-то "привязывать". В NB для этого обычно служит объект "прямоугольник", который в свою очередь должен быть предварительно создан в проекте. Может-быть, в будущем... В последней версии ММВ предусмотрена опция динамического создания НЕКОТОРЫХ типов объектов, но практическая полезность этого сомнительна. - А вам какую операционку поставить - экспи, семерку или висту? - Это ты сейчас о чем? - Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный? - Ну, конечно, надежный! - Вот, значит - экспи, без вопросов! Сейчас сделаем...
(Улицы разбитых фонарей, сезон 10, серия 17)
Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!
При модном втюхе модоподдающимся начинает нравиться
В NeoBook имеется опция, позволяющая проекту самостоятельно определять есть выход в Инет или нет
это понятно, просто как изловчится и при обрыве инета, после его подключения не качать заново все файлы, а продолжить имено с того файла где обрубился инет, если только записывать данные в файл-лог, а проверку на подключение делать таймером.
Сообщение отредактировано sp3d - Ср, 11 Февраля 2009, 19:44
Да, есть! См. раздел "Библиотека функций" справочного файла NeoBook. Кстати, я уже упоминал об этом....
Quote (sp3d)
после его подключения не качать заново все файлы, а продолжить имено с того файла где обрубился инет,
На самом деле очень просто! Нужно вести лог загрузки. У вас же имеется список загружаемых файлов? Вот и отмечайте (или удаляйте из списка) успешно загруженные, а возобновлять загрузку (в случае обрыва связи) с того файла на котором произошел сбой. Плагин сейчас выводит ошибки в проект беспорядочно (я же сказал - бардак пока). Попробую сегодня-завтра привести все в цивильный вид, и можно будет пользоваться.
Quote (sp3d)
а проверку на подключение делать таймером.
При обрыве Инета плагин сам выдаст сообщение об ошибке загрузки. Останется только лишь обработать его. Таймер в принципе не нужен. Например: 1. Плагин выдал ошибку загрузки, тогда 2. Пингуем Инет из проекта на "подключение", и получаем результат. Затем 3. На анализе результата делаем одно или другое (в общем что душе угодно) Чего тут сложного? Все просто как в бане! Впрочем, если очень хочется задействовать таймер, то почему бы и нет.... - А вам какую операционку поставить - экспи, семерку или висту? - Это ты сейчас о чем? - Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный? - Ну, конечно, надежный! - Вот, значит - экспи, без вопросов! Сейчас сделаем...
(Улицы разбитых фонарей, сезон 10, серия 17)
Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!
При модном втюхе модоподдающимся начинает нравиться
а какая переменная ошибки у плагина, чтоб отследить на true/false?
Добавлено (12 Февраль 2009, 19:06) --------------------------------------------- Упс, Сори перепутал библиотеку функци с подпрограммой то что и надо было!
а какая переменная ошибки у плагина, чтоб отследить на true/false?
В общем, намудрил я там в плагине с обработкой ошибок "Мама! Не горюй!" Это, блин, моя любовь к "Try...except", зараза! Да все в попыхах ещё... Два часа кавырялся и, вроде бы, нашел... Сейчас час перекура (башка гудит), затем - 2-я серия...
Если ничего не путаю, то у компонента "TextEntry" (Memo) нет свойства Caption, и для вывода текста нужно использовать переменную, хранящую содержимое объекта.
Quote (sp3d)
а колличество файлов в папке можно подсчитать?!
Можно. Теоретически ВСЁ можно! НО. НЕ ВСЁ СРАЗУ!!! У меня и так башка уже кругом идет... Всё, ушел курить и кофий пить...
Добавлено (13 Февраль 2009, 04:05) --------------------------------------------- Короче, на сегодня - всё! Не могу правильно обработать одну из exceptions (их две) внезапного отключения Инета при Upload. С download все нормально, с upload - ж... У меня уже полный "затык"! Утро вечера мудренее... Если, конечно, ночь не будет Варфоломеевской!
Добавлено (13 Февраль 2009, 18:36) --------------------------------------------- В общем, большой я чудак на букву "М"... Сейчас пришел с работы нашел все за минуту! Косяк был не в плагине, а дэмке. Достаточно было в необушный отладчик глянуть, чтобы понять! И чего мне это в голову вчера не пришло, зараза? 5 часов работы - коту под хвост! Весь плагин только перелопатил! Сейчас небольшой "сейшн" намечается, потом продолжим... Если сил хватит...
С предыдущими проблемами разобрался, но совершенно неожиданно возникла другая! Для тестов я использовал ftp.nextmail.ru, но с сегодняшего дня по 16-е число файловое хранилище на этом сервере на технических работах, и поэтому через FTP на сервак вообще не попасть! Создал новое хранилище на "Народе". Вроде все нормально, но... Через браузер попадаю на ftp.narod.ru и работаю без проблем, а вот через плагин пока никак! Точнее, коннект с сервером ОК, но при получении списка файлов и каталогов - тишина!... На других FTP-серверах пробовал, все вроде работает, но на ftp.narod.ru - ПРОБЛЕМА! Пока не могу понять в чем дело!
sp3d, если я правильно понял, то вы пробовали плагин на "народе" и все в порядке. Это - так?
- А вам какую операционку поставить - экспи, семерку или висту? - Это ты сейчас о чем? - Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный? - Ну, конечно, надежный! - Вот, значит - экспи, без вопросов! Сейчас сделаем...
(Улицы разбитых фонарей, сезон 10, серия 17)
Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!
При модном втюхе модоподдающимся начинает нравиться
Сначала мне тоже так показалось, но тут дело в другом... Я поупржанялся на паре-тройке FTP-серверов. Если подключаться к серверу (к тому же Народу) в "пассивном" режиме (PASV method), то всё ОК! А вот "PORT method" этот сервак не поддерживает. Некоторые другие поддерживают оба способа. Сделать в плагине "ручное" переключение режимов не проблема! И, скажем, по умолчанию сделать "пассивный" вход. Но (так написано в справке) не все FTP-серверы поддерживают такой режим, а вешать на юзера самостоятельное определение опций подключения к серваку и передачи данных (т.е. методом тыка) не гоже. Нужна "автоматика"! А вот КАК определить ЧТО подерживает сервер? Кавыряюсь в справке и проч. Но пока ничего вразумительного найти не могу... Ну и чума же все эти сокеты... протоколы.., серверы.. Подводные камни на каждом шагу.
P.S А потом окажется, что все, как всегда, просто! Как два пальца...
Добавлено (14 Февраль 2009, 22:11) --------------------------------------------- Вот забавно... Сейчас получил такое письмо:
Повторное нарушение Пользовательского соглашения может привести к удалению Вашего сайта с Народа.
Это письмо сгенерировано автоматически, отвечать на него не нужно.
Это я в FTP-упражнениях (НЕ испражнениях! ) закачал к ним на сервак файл размером всего 8 Мб, а он чуть позже вдруг пропал! Я еще было подумал может сам случайно удалил? А это они.. А ещё кричат мол "!00 Мб!... 100 Мб!"... - А вам какую операционку поставить - экспи, семерку или висту? - Это ты сейчас о чем? - Олег Георгиевич, вам какой компьютер хотелось бы - молодежный или надежный? - Ну, конечно, надежный! - Вот, значит - экспи, без вопросов! Сейчас сделаем...
(Улицы разбитых фонарей, сезон 10, серия 17)
Единственная инновация Windows 8 это - Metro, чтобы дебилы по иконкам не промахивались!
При модном втюхе модоподдающимся начинает нравиться
. 
Счетчик доходит до 15-20% и... останавливается ... 
