VBScript и Необук
DEMBEL Дата: Пн, 28 Сентября 2009, 23:37 | Сообщение # 31
В данном конкретном случае ты выбрал не самый простой вариант, конечно... НБ не нравится структура переменной, а передавать через переменную исходник вебстраницы это кошмар. Вот рабочий exe, но принцип другой. Код страницы получается и кладется в переменную внутри самого скрипта, а передается только валюта и ссылка. Сделай также, да и работать быстрее будет. В другом случае, сохраняй на диск и в скрипте читай из файла как текстовый поток.
Как задавать вопросы Win7x64 SP1 Neobook v5.70 (Trial) WinXP SP3 Neobook v5.62
Сообщение отредактировано DEMBEL - Вт, 29 Сентября 2009, 00:06
Сообщение В данном конкретном случае ты выбрал не самый простой вариант, конечно... НБ не нравится структура переменной, а передавать через переменную исходник вебстраницы это кошмар. Вот рабочий exe, но принцип другой. Код страницы получается и кладется в переменную внутри самого скрипта, а передается только валюта и ссылка. Сделай также, да и работать быстрее будет. В другом случае, сохраняй на диск и в скрипте читай из файла как текстовый поток. Автор - DEMBEL Дата добавления - 28 Сентября 2009 в 23:37
Сергей Дата: Вт, 29 Сентября 2009, 01:13 | Сообщение # 32
Quote (DEMBEL )
но принцип другой
да такой принцеп есть, так не инересно я вообще хотел в вбс тока парсер реализовать
Сообщение отредактировано sp3d - Вт, 29 Сентября 2009, 02:34
Сообщение Quote (DEMBEL )
но принцип другой
да такой принцеп есть, так не инересно я вообще хотел в вбс тока парсер реализоватьАвтор - Сергей Дата добавления - 29 Сентября 2009 в 01:13
DEMBEL Дата: Вт, 29 Сентября 2009, 02:33 | Сообщение # 33
Тогда имей в виду, что таким способом в скрипт передаются только однострочные переменные, все спецсимволы, скобки, переводы строк и другие должны быть заменены чтобы их адекватно восприняли скрипт и НБ. В твоем случае в скрипте либо получение кода через GET запрос, либо чтение из файла текстовым потоком.
Как задавать вопросы Win7x64 SP1 Neobook v5.70 (Trial) WinXP SP3 Neobook v5.62
Сообщение Тогда имей в виду, что таким способом в скрипт передаются только однострочные переменные, все спецсимволы, скобки, переводы строк и другие должны быть заменены чтобы их адекватно восприняли скрипт и НБ. В твоем случае в скрипте либо получение кода через GET запрос, либо чтение из файла текстовым потоком. Автор - DEMBEL Дата добавления - 29 Сентября 2009 в 02:33
Сергей Дата: Вт, 29 Сентября 2009, 02:35 | Сообщение # 34
Как можно выличить это
Сообщение Как можно выличить это Автор - Сергей Дата добавления - 29 Сентября 2009 в 02:35
DEMBEL Дата: Вт, 29 Сентября 2009, 02:36 | Сообщение # 35
Скрипт застрял и не отвечает, видимо он просто безуспешно долбится в интернет.
Как задавать вопросы Win7x64 SP1 Neobook v5.70 (Trial) WinXP SP3 Neobook v5.62
Сообщение Скрипт застрял и не отвечает, видимо он просто безуспешно долбится в интернет. Автор - DEMBEL Дата добавления - 29 Сентября 2009 в 02:36
Сергей Дата: Вт, 29 Сентября 2009, 02:42 | Сообщение # 36
Quote (DEMBEL )
Скрипт застрял и не отвечает, видимо он просто безуспешно долбится в интернет.
я в курсе, это нет инета, как вылечить?, если не трудно напиши строчку, чтоб он не долбился, когда дома никого нету Добавлено (29 Сентябрь 2009, 02:42) --------------------------------------------- такая фишка работает или нет в НБ?!
Сообщение Quote (DEMBEL )
Скрипт застрял и не отвечает, видимо он просто безуспешно долбится в интернет.
я в курсе, это нет инета, как вылечить?, если не трудно напиши строчку, чтоб он не долбился, когда дома никого нету Добавлено (29 Сентябрь 2009, 02:42) --------------------------------------------- такая фишка работает или нет в НБ?!
Автор - Сергей Дата добавления - 29 Сентября 2009 в 02:42
DEMBEL Дата: Вт, 29 Сентября 2009, 03:06 | Сообщение # 37
Quote (sp3d )
такая фишка работает или нет в НБ?!
Все обьекты WScript не работают Quote (sp3d )
если не трудно напиши строчку
Блин, тут функцию лепить придется, а голова не варит, пойду спать. Завтра.Добавлено (29 Сентябрь 2009, 03:06) --------------------------------------------- да и зачем оно тебе, вроде в НБ можно проверить
Как задавать вопросы Win7x64 SP1 Neobook v5.70 (Trial) WinXP SP3 Neobook v5.62
Сообщение Quote (sp3d )
такая фишка работает или нет в НБ?!
Все обьекты WScript не работают Quote (sp3d )
если не трудно напиши строчку
Блин, тут функцию лепить придется, а голова не варит, пойду спать. Завтра.Добавлено (29 Сентябрь 2009, 03:06) --------------------------------------------- да и зачем оно тебе, вроде в НБ можно проверить
Автор - DEMBEL Дата добавления - 29 Сентября 2009 в 03:06
Сергей Дата: Вт, 29 Сентября 2009, 09:18 | Сообщение # 38
Quote (DEMBEL )
НБ можно проверить
может, только ее встроенаая функция по проверке инета плохая, ну ладно если там дофига писать, тогда ненадо. А отключить вывод ошибки в вбс мона, чтоб такие месаги не вылетали?!
Сообщение Quote (DEMBEL )
НБ можно проверить
может, только ее встроенаая функция по проверке инета плохая, ну ладно если там дофига писать, тогда ненадо. А отключить вывод ошибки в вбс мона, чтоб такие месаги не вылетали?!Автор - Сергей Дата добавления - 29 Сентября 2009 в 09:18
DEMBEL Дата: Вт, 29 Сентября 2009, 10:58 | Сообщение # 39
Quote (sp3d )
А отключить вывод ошибки в вбс мона, чтоб такие месаги не вылетали?!
Разумеется можно, только эту ошибку показывает не скрипт, а необук, и это не ошибка а предупреждение: "Скрипт который вы запускаете, выполняется дольше чем ожидалось. Нажмите End для завершения или Continue для продолжения работы скрипта"
Как задавать вопросы Win7x64 SP1 Neobook v5.70 (Trial) WinXP SP3 Neobook v5.62
Сообщение Quote (sp3d )
А отключить вывод ошибки в вбс мона, чтоб такие месаги не вылетали?!
Разумеется можно, только эту ошибку показывает не скрипт, а необук, и это не ошибка а предупреждение: "Скрипт который вы запускаете, выполняется дольше чем ожидалось. Нажмите End для завершения или Continue для продолжения работы скрипта"Автор - DEMBEL Дата добавления - 29 Сентября 2009 в 10:58
Alex3A Дата: Вт, 29 Сентября 2009, 11:46 | Сообщение # 40
Quote (DEMBEL )
Скрипт который вы запускаете, выполняется дольше чем ожидалось
Это типа защиты от зависания, должно быть описание, после скольких проходов оно срабатывает. В первую очередь, это сигнал что у тебя действительно неправильно организован скрипт, что то зациклилось, при том в одном скрипте.
Сообщение Quote (DEMBEL )
Скрипт который вы запускаете, выполняется дольше чем ожидалось
Это типа защиты от зависания, должно быть описание, после скольких проходов оно срабатывает. В первую очередь, это сигнал что у тебя действительно неправильно организован скрипт, что то зациклилось, при том в одном скрипте.Автор - Alex3A Дата добавления - 29 Сентября 2009 в 11:46
Сергей Дата: Вт, 29 Сентября 2009, 13:19 | Сообщение # 41
Quote (Alex3A )
это сигнал что у тебя действительно неправильно организован скрипт, что то зациклилось, при том в одном скрипте.
Сообщение отредактировано sp3d - Вт, 29 Сентября 2009, 13:20
Сообщение Quote (Alex3A )
это сигнал что у тебя действительно неправильно организован скрипт, что то зациклилось, при том в одном скрипте.
Автор - Сергей Дата добавления - 29 Сентября 2009 в 13:19
Сергей Дата: Вс, 11 Октября 2009, 16:27 | Сообщение # 42
DEMBEL , вопрос по вбс есть: При использовании скрипта, выдает ошибку-"Неизвестный числовой показатель". не подскажешь в чем проблема
Сообщение DEMBEL , вопрос по вбс есть: При использовании скрипта, выдает ошибку-"Неизвестный числовой показатель". не подскажешь в чем проблемаАвтор - Сергей Дата добавления - 11 Октября 2009 в 16:27
DEMBEL Дата: Вс, 11 Октября 2009, 17:58 | Сообщение # 43
ошибка в маске запроса objRegExp.Pattern
Как задавать вопросы Win7x64 SP1 Neobook v5.70 (Trial) WinXP SP3 Neobook v5.62
Сообщение отредактировано DEMBEL - Вс, 11 Октября 2009, 18:25
Сообщение ошибка в маске запроса objRegExp.Pattern Автор - DEMBEL Дата добавления - 11 Октября 2009 в 17:58
Сергей Дата: Вс, 11 Октября 2009, 18:28 | Сообщение # 44
Quote (DEMBEL )
ошибка в маске запроса objRegExp.Pattern
ясно
Сообщение Quote (DEMBEL )
ошибка в маске запроса objRegExp.Pattern
ясноАвтор - Сергей Дата добавления - 11 Октября 2009 в 18:28
DEMBEL Дата: Вс, 11 Октября 2009, 19:17 | Сообщение # 45
msdn в помощь Добавлено (11 Октябрь 2009, 19:17) ---------------------------------------------
Quote (DEMBEL )
ошибка в маске запроса objRegExp.Pattern
поэкспериментируй с маской и запросами, в принципе она не содержит явных ошибок, просто может при некоторых условиях или запросе становится "невалидной". Сам скрипт написан верно.
Как задавать вопросы Win7x64 SP1 Neobook v5.70 (Trial) WinXP SP3 Neobook v5.62
Сообщение msdn в помощь Добавлено (11 Октябрь 2009, 19:17) ---------------------------------------------
Quote (DEMBEL )
ошибка в маске запроса objRegExp.Pattern
поэкспериментируй с маской и запросами, в принципе она не содержит явных ошибок, просто может при некоторых условиях или запросе становится "невалидной". Сам скрипт написан верно.Автор - DEMBEL Дата добавления - 11 Октября 2009 в 19:17
Сергей Дата: Вс, 11 Октября 2009, 21:28 | Сообщение # 46
Quote (DEMBEL )
в принципе она не содержит явных ошибок
вот и я голову сломал, проверяю на онлайн валидатора, все верно, а так ошибка Добавлено (11 Октябрь 2009, 21:12) --------------------------------------------- DEMBEL , а как передать результат
Code
rezult= objMatches.Item(i)
в масив в НБ, так как в таком виде передается только последние значение Делал так: Set rezult = Array(objMatches.Item(i)) выдает ошибкуДобавлено (11 Октябрь 2009, 21:28) --------------------------------------------- в НБ допустим можно так
Code
SetVar "[param[i]]" "[value]"
, а в вбс как
Сообщение отредактировано sp3d - Вс, 11 Октября 2009, 21:24
Сообщение Quote (DEMBEL )
в принципе она не содержит явных ошибок
вот и я голову сломал, проверяю на онлайн валидатора, все верно, а так ошибка Добавлено (11 Октябрь 2009, 21:12) --------------------------------------------- DEMBEL , а как передать результат
Code
rezult= objMatches.Item(i)
в масив в НБ, так как в таком виде передается только последние значение Делал так: Set rezult = Array(objMatches.Item(i)) выдает ошибкуДобавлено (11 Октябрь 2009, 21:28) --------------------------------------------- в НБ допустим можно так
Code
SetVar "[param[i]]" "[value]"
, а в вбс какАвтор - Сергей Дата добавления - 11 Октября 2009 в 21:28
DEMBEL Дата: Пн, 12 Октября 2009, 00:01 | Сообщение # 47
Quote (sp3d )
Set rezult = Array(objMatches.Item(i))
ты что с ума сошел Я как раз недавно занимался этим вопросом, тоже уже давно требуется передавать в проект не одну переменную а сразу массивы. Для этого потребуется тебе подробнее изучить формирование массивов внутри скрипта. Если уже есть готовый массив, потребуется в отдельном цикле присваивать значения каждого из элементов массива в nbSetVar, например вроде: nbSetVar [Result[i]], Massive(i) Другой вариант, если при формировании массива сразу задавать значение его элемента в nbSetVar. Подробнее об этом расскажу уже не здесь
Как задавать вопросы Win7x64 SP1 Neobook v5.70 (Trial) WinXP SP3 Neobook v5.62
Сообщение Quote (sp3d )
Set rezult = Array(objMatches.Item(i))
ты что с ума сошел Я как раз недавно занимался этим вопросом, тоже уже давно требуется передавать в проект не одну переменную а сразу массивы. Для этого потребуется тебе подробнее изучить формирование массивов внутри скрипта. Если уже есть готовый массив, потребуется в отдельном цикле присваивать значения каждого из элементов массива в nbSetVar, например вроде: nbSetVar [Result[i]], Massive(i) Другой вариант, если при формировании массива сразу задавать значение его элемента в nbSetVar. Подробнее об этом расскажу уже не здесь Автор - DEMBEL Дата добавления - 12 Октября 2009 в 00:01
Сергей Дата: Пн, 12 Октября 2009, 00:35 | Сообщение # 48
Quote (DEMBEL )
ты что с ума сошел
ну как понял из мануала, там так: Set myArray = Array(1,2,3), ну я так и накарябал , а про соответствие типов не знал, о он и ругатся. Quote
nbSetVar [Result[i]], Massive(i)
т.е. в мое примере так?! Quote
nbSetVar [Result[i] ], objMatches.Item(i)
, я тут выделил, он поймет, что i счетчик в квадратных скобках Quote (DEMBEL )
Подробнее об этом расскажу уже не здесь
ок
Сообщение отредактировано sp3d - Пн, 12 Октября 2009, 00:35
Сообщение Quote (DEMBEL )
ты что с ума сошел
ну как понял из мануала, там так: Set myArray = Array(1,2,3), ну я так и накарябал , а про соответствие типов не знал, о он и ругатся. Quote
nbSetVar [Result[i]], Massive(i)
т.е. в мое примере так?! Quote
nbSetVar [Result[i] ], objMatches.Item(i)
, я тут выделил, он поймет, что i счетчик в квадратных скобках Quote (DEMBEL )
Подробнее об этом расскажу уже не здесь
ок Автор - Сергей Дата добавления - 12 Октября 2009 в 00:35
DEMBEL Дата: Пн, 12 Октября 2009, 00:53 | Сообщение # 49
Quote (sp3d )
т.е. в мое примере так?! nbSetVar [Result[i]], objMatches.Item(i)
Да, верно. Интересно, необук поймет конструкцию массива [Result[i]] при передаче ее из функции?
Как задавать вопросы Win7x64 SP1 Neobook v5.70 (Trial) WinXP SP3 Neobook v5.62
Сообщение Quote (sp3d )
т.е. в мое примере так?! nbSetVar [Result[i]], objMatches.Item(i)
Да, верно. Интересно, необук поймет конструкцию массива [Result[i]] при передаче ее из функции?Автор - DEMBEL Дата добавления - 12 Октября 2009 в 00:53
Сергей Дата: Пн, 12 Октября 2009, 01:56 | Сообщение # 50
Quote (DEMBEL )
Интересно, необук поймет конструкцию массива [Result[i]] при передаче ее из функции?
так я и спрашивал у тебя об этом Самому интересно, ладно, завтра как будет время проверю
Сообщение отредактировано sp3d - Пн, 12 Октября 2009, 01:57
Сообщение Quote (DEMBEL )
Интересно, необук поймет конструкцию массива [Result[i]] при передаче ее из функции?
так я и спрашивал у тебя об этом Самому интересно, ладно, завтра как будет время проверюАвтор - Сергей Дата добавления - 12 Октября 2009 в 01:56
DEMBEL Дата: Пн, 12 Октября 2009, 05:03 | Сообщение # 51
Quote (sp3d )
так я и спрашивал у тебя об этом
так я бросил пока свои эксперименты, т.к. уже месяц очень занят вашим новым сайтом блин... Поэтому пока говорю теоретически.
Как задавать вопросы Win7x64 SP1 Neobook v5.70 (Trial) WinXP SP3 Neobook v5.62
Сообщение Quote (sp3d )
так я и спрашивал у тебя об этом
так я бросил пока свои эксперименты, т.к. уже месяц очень занят вашим новым сайтом блин... Поэтому пока говорю теоретически.Автор - DEMBEL Дата добавления - 12 Октября 2009 в 05:03
Alien Дата: Пн, 12 Октября 2009, 12:34 | Сообщение # 52
Quote (sp3d )
Прикрепления: valutaEXE.rar(633Kb)
Са хранить?
Сообщение Quote (sp3d )
Прикрепления: valutaEXE.rar(633Kb)
Са хранить? Автор - Alien Дата добавления - 12 Октября 2009 в 12:34
DEMBEL Дата: Чт, 15 Октября 2009, 20:20 | Сообщение # 53
sp3d , ну разобрался с массивами? я тут решил немного раскрыть тему массивов, нужен конкретный тематический пример, который кому-то может пригодиться, а выдумывать мне неохота. можешь подкинуть свой вбскрипт для разбора? ну или тему предложите кто-нибудь где может пригодиться работа с массивом.
Как задавать вопросы Win7x64 SP1 Neobook v5.70 (Trial) WinXP SP3 Neobook v5.62
Сообщение sp3d , ну разобрался с массивами? я тут решил немного раскрыть тему массивов, нужен конкретный тематический пример, который кому-то может пригодиться, а выдумывать мне неохота. можешь подкинуть свой вбскрипт для разбора? ну или тему предложите кто-нибудь где может пригодиться работа с массивом.Автор - DEMBEL Дата добавления - 15 Октября 2009 в 20:20
Сергей Дата: Пт, 16 Октября 2009, 07:32 | Сообщение # 54
Quote (DEMBEL )
можешь подкинуть свой вбскрипт для разбора?
не вопрос . вот материал, а функция у тебя уже есть
Сообщение отредактировано sp3d - Пт, 16 Октября 2009, 09:52
Сообщение Quote (DEMBEL )
можешь подкинуть свой вбскрипт для разбора?
не вопрос . вот материал, а функция у тебя уже естьАвтор - Сергей Дата добавления - 16 Октября 2009 в 07:32
DEMBEL Дата: Пт, 16 Октября 2009, 13:31 | Сообщение # 55
Quote (sp3d )
а функция у тебя уже есть
Ну там нету работы с массивами Хотя черт побери, надо еще раз разобраться с парсингом и откусыванием хтмл-тегов, это пригодится... Есть парочка мыслей как это покрасивее организовать...
Как задавать вопросы Win7x64 SP1 Neobook v5.70 (Trial) WinXP SP3 Neobook v5.62
Сообщение Quote (sp3d )
а функция у тебя уже есть
Ну там нету работы с массивами Хотя черт побери, надо еще раз разобраться с парсингом и откусыванием хтмл-тегов, это пригодится... Есть парочка мыслей как это покрасивее организовать...Автор - DEMBEL Дата добавления - 16 Октября 2009 в 13:31
Сергей Дата: Пт, 16 Октября 2009, 13:42 | Сообщение # 56
Quote (DEMBEL )
Ну там нету работы с массивами
емое как нету, а результат регулярки?! он же в массив идет, если его нет в примере, то сделаю ты тока скажи как Quote (DEMBEL )
Есть парочка мыслей как это покрасивее организовать...
кроме как регулярки у меня вообще нет мыслейДобавлено (16 Октябрь 2009, 13:42) --------------------------------------------- я както искал примерчег для работы с тегами для вбс, но ничего ненарыл
Сообщение Quote (DEMBEL )
Ну там нету работы с массивами
емое как нету, а результат регулярки?! он же в массив идет, если его нет в примере, то сделаю ты тока скажи как Quote (DEMBEL )
Есть парочка мыслей как это покрасивее организовать...
кроме как регулярки у меня вообще нет мыслейДобавлено (16 Октябрь 2009, 13:42) --------------------------------------------- я както искал примерчег для работы с тегами для вбс, но ничего ненарыл
Автор - Сергей Дата добавления - 16 Октября 2009 в 13:42
DEMBEL Дата: Пт, 16 Октября 2009, 13:49 | Сообщение # 57
Quote (sp3d )
емое как нету, а результат регулярки?! он же в массив идет, если его нет в примере, то сделаю ты тока скажи как
ааа, понятно че ты хочешь сделать...
Как задавать вопросы Win7x64 SP1 Neobook v5.70 (Trial) WinXP SP3 Neobook v5.62
Сообщение Quote (sp3d )
емое как нету, а результат регулярки?! он же в массив идет, если его нет в примере, то сделаю ты тока скажи как
ааа, понятно че ты хочешь сделать...Автор - DEMBEL Дата добавления - 16 Октября 2009 в 13:49
Сергей Дата: Пт, 16 Октября 2009, 15:48 | Сообщение # 58
Quote (DEMBEL )
ааа, понятно че ты хочешь сделать...
нуда если так не получается запихать в переменую результат, то значить замутить массив, хм идея то твоя была на счет массивовДобавлено (16 Октябрь 2009, 15:48) --------------------------------------------- а у тебя уже решен вопрос с массивами?!
Сообщение отредактировано sp3d - Пт, 16 Октября 2009, 15:11
Сообщение Quote (DEMBEL )
ааа, понятно че ты хочешь сделать...
нуда если так не получается запихать в переменую результат, то значить замутить массив, хм идея то твоя была на счет массивовДобавлено (16 Октябрь 2009, 15:48) --------------------------------------------- а у тебя уже решен вопрос с массивами?!
Автор - Сергей Дата добавления - 16 Октября 2009 в 15:48
DEMBEL Дата: Пт, 16 Октября 2009, 15:59 | Сообщение # 59
Quote (sp3d )
а у тебя уже решен вопрос с массивами?!
да собсно, там и решать нечего. также решен вопрос о выкусывании тегов HTML, CSS (остается чистый текст) а также ссылок.
Как задавать вопросы Win7x64 SP1 Neobook v5.70 (Trial) WinXP SP3 Neobook v5.62
Сообщение Quote (sp3d )
а у тебя уже решен вопрос с массивами?!
да собсно, там и решать нечего. также решен вопрос о выкусывании тегов HTML, CSS (остается чистый текст) а также ссылок.Автор - DEMBEL Дата добавления - 16 Октября 2009 в 15:59
Сергей Дата: Пт, 16 Октября 2009, 16:29 | Сообщение # 60
Quote (DEMBEL )
о выкусывании тегов HTML, CSS (остается чистый текст)
ну больше всегда приходится не все подряд выкусывать, а именно по определеному тегу и по его имени вопрос на засыпку, что то я в сети не найду как на вбс переименовать папку?!Добавлено (16 Октябрь 2009, 16:27) --------------------------------------------- понял что надо как то так
Code
Set fs = CreateObject("ScriptCodingInfo.FileSystem") fs.RenameFolder("папка1")
Добавлено (16 Октябрь 2009, 16:29) --------------------------------------------- да с учетом того, что папка не пуста
Сообщение Quote (DEMBEL )
о выкусывании тегов HTML, CSS (остается чистый текст)
ну больше всегда приходится не все подряд выкусывать, а именно по определеному тегу и по его имени вопрос на засыпку, что то я в сети не найду как на вбс переименовать папку?!Добавлено (16 Октябрь 2009, 16:27) --------------------------------------------- понял что надо как то так
Code
Set fs = CreateObject("ScriptCodingInfo.FileSystem") fs.RenameFolder("папка1")
Добавлено (16 Октябрь 2009, 16:29) --------------------------------------------- да с учетом того, что папка не пуста
Автор - Сергей Дата добавления - 16 Октября 2009 в 16:29