VBScript & Сохранение контента

@shatalinalex · Регистрация: 20.06.2006

Студворк — интернет-сервис помощи студентам

Как сохранить контент страницы сайта?

На пыхе делается просто , функцией file, она сохраняет контент в массив.

Есть ли в VBScript побобная функция, или как тут быть?!?!

@bazile · 15.01.2007, 16:17

Используй объект http://msdn.microsoft.com/library/default.asp?url=/library/en-us/xmlsdk/html/97884cf6-5fdf-4b1f-8273-73c0e098b8f3.asp?frame=true ServerXmlHttp.

@bazile · 16.01.2007, 20:16

В синтаксисе регулярных выражений есть различия которые и могут приводить к их непереносимости. Ведь даже в ОС *nix есть минимум два синтаксиса.
В твоем регулярном выражении мне непонятно назначение символа # в начале и конце. У тебя все ссылки заключены в них?
Далее внутри блока [^] у тебя указан символ . без . По моему это указывает исключить все символы в чем нет смысла с учетом того что там же перечислены другие символы. Видимо ты имел в виду символ точки, а значит забыл добавить символ . Также надо бы поставить перед символами ) и ? внутри того же блока. И неясно зачем указан " - ведь он будет воспринят посимвольно, а не как целое. Так и должно быть или в php это по воспринималось как целое?
По-моему данное выражение ошибочно и надо использовать какое-то другое. Например, в MSDN приводится такое выражение для URL: "(w+)://([^/:]+)(:d*)?([^# ]*)"

@shatalinalex · 17.01.2007, 13:15 **[ТС]**

с помощбю такого

Code
1
2
<FONT size=2>
(w+)://([^/:]+)(:d*)?([^# ]*)

выражения мы выдерним все ссылки и это правильно, я в MSDN не увидел символ отделяющий спец символ для VBScript! Например как отделить " (кавычку) !???

Code
1
2
<FONT size=2></P><FONT size=2><FONT size=2>
regEx.Pattern = "<a href="(w+)://([^/:]+)(:d*)?([^# ]*) "

так бы разделил в пыхе...

@bazile · 17.01.2007, 13:21

Чтобы вставить кавычку в строку ее надо удвоить. Слеш перед ней ставить не нужно так это не спец. символ регулярного выражения.
regEx.Pattern = "<a href=""(w+)://([^/:]+)(:d*)?([^# ]*)" "

@shatalinalex · 17.01.2007, 14:36 **[ТС]**

ОК спасибо понял!

@bazile · 17.01.2007, 20:18

"Отсюда" это откуда? И код весь покажи.

@shatalinalex · 18.01.2007, 15:02 **[ТС]**

VB.NET
1
2
3
regEx.Pattern = "<table(.*)><tbody><tr>(.*)</tr></tbody></table>"
regEx.IgnoreCase = True
regEx.Global = True

сбился с ног!!! блин должно выдернуться все что между <table><tbody><tr> и вот этим </tr></tbody></table>
Возвращает ноль ((((

@bazile · 18.01.2007, 16:02

Проверил твой пример. На странице http://stores.ebay.com/_W0QQfeZ1QQtZlw все ссылки идут внутри кавычек и там вообще нет html кода с текстом "href=stores.ebay." Я попробовал на локальном файле этот же код, со специально добавленной ссылкой без кавычек и регулярное выражение его пропустило. И ссылок на странице 27, а не 25. В общем, я не смог воспроизвести твою ошибку.
В регулярном выражении длдя таблицы попробуй добавить вопросительный знак после звездочки, чтобы оно не пыталось по максимуму текст охватить.
regEx.Pattern = "<table(.*?)><tbody><tr>(.*?)</tr></tbody></table>"

@shatalinalex · 19.01.2007, 13:46 **[ТС]**

Все разобрался!
А в VBScript случаем нету функции которая отсекает html код? или нужно делать с помощью регулярок??

@bazile · 19.01.2007, 14:07

Такой функции в VBScript нет.

@shatalinalex · 26.01.2007, 15:11 **[ТС]**

Спасиб за помосчь, разобрался с помощью регулярок!

Новые блоги и статьи Все статьи Все блоги /
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Символьное дифференцирование igorrr37 13.02.2026 / * Программа принимает математическое выражение в виде строки и выдаёт его производную в виде строки и вычисляет значение производной при заданном х Логарифм записывается как: (x-2)log(x^2+2) -. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .	И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»	SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image 8Observer8 10.02.2026 Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .

@shatalinalex 0 / 0 / 0 Регистрация: 20.06.2006 Сообщений: 71

	VBScript & Сохранение контента 15.01.2007, 15:44. Показов 3091. Ответов 11 Метки нет (Все метки) Как сохранить контент страницы сайта? На пыхе делается просто , функцией file, она сохраняет контент в массив. Есть ли в VBScript побобная функция, или как тут быть?!?! 0

@bazile 86 / 62 / 69 Регистрация: 15.03.2007 Сообщений: 6,903
	15.01.2007, 16:17
	Используй объект http://msdn.microsoft.com/library/default.asp?url=/library/en-us/xmlsdk/html/97884cf6-5fdf-4b1f-8273-73c0e098b8f3.asp?frame=true ServerXmlHttp. 0

@bazile 86 / 62 / 69 Регистрация: 15.03.2007 Сообщений: 6,903
	16.01.2007, 20:16
	В синтаксисе регулярных выражений есть различия которые и могут приводить к их непереносимости. Ведь даже в ОС nix есть минимум два синтаксиса. В твоем регулярном выражении мне непонятно назначение символа # в начале и конце. У тебя все ссылки заключены в них? Далее внутри блока [^] у тебя указан символ . без . По моему это указывает исключить все символы в чем нет смысла с учетом того что там же перечислены другие символы. Видимо ты имел в виду символ точки, а значит забыл добавить символ . Также надо бы поставить перед символами ) и ? внутри того же блока. И неясно зачем указан " - ведь он будет воспринят посимвольно, а не как целое. Так и должно быть или в php это по воспринималось как целое? По-моему данное выражение ошибочно и надо использовать какое-то другое. Например, в MSDN приводится такое выражение для URL: "(w+)://([^/:]+)(:d)?([^# ]*)" 0

@bazile 86 / 62 / 69 Регистрация: 15.03.2007 Сообщений: 6,903
	17.01.2007, 13:21
	Чтобы вставить кавычку в строку ее надо удвоить. Слеш перед ней ставить не нужно так это не спец. символ регулярного выражения. regEx.Pattern = "<a href=""(w+)://([^/:]+)(:d)?([^# ])" " 0

@shatalinalex 0 / 0 / 0 Регистрация: 20.06.2006 Сообщений: 71
	17.01.2007, 14:36 [ТС]
	ОК спасибо понял! 0

@bazile 86 / 62 / 69 Регистрация: 15.03.2007 Сообщений: 6,903
	17.01.2007, 20:18
	"Отсюда" это откуда? И код весь покажи. 0

@bazile 86 / 62 / 69 Регистрация: 15.03.2007 Сообщений: 6,903
	18.01.2007, 16:02
	Проверил твой пример. На странице http://stores.ebay.com/_W0QQfeZ1QQtZlw все ссылки идут внутри кавычек и там вообще нет html кода с текстом "href=stores.ebay." Я попробовал на локальном файле этот же код, со специально добавленной ссылкой без кавычек и регулярное выражение его пропустило. И ссылок на странице 27, а не 25. В общем, я не смог воспроизвести твою ошибку. В регулярном выражении длдя таблицы попробуй добавить вопросительный знак после звездочки, чтобы оно не пыталось по максимуму текст охватить. regEx.Pattern = "<table(.?)><tbody><tr>(.?)</tr></tbody></table>" 0

@shatalinalex 0 / 0 / 0 Регистрация: 20.06.2006 Сообщений: 71
	19.01.2007, 13:46 [ТС]
	Все разобрался! А в VBScript случаем нету функции которая отсекает html код? или нужно делать с помощью регулярок?? 0

@bazile 86 / 62 / 69 Регистрация: 15.03.2007 Сообщений: 6,903
	19.01.2007, 14:07
	Такой функции в VBScript нет. 0

@shatalinalex 0 / 0 / 0 Регистрация: 20.06.2006 Сообщений: 71
	26.01.2007, 15:11 [ТС]
	Спасиб за помосчь, разобрался с помощью регулярок! 0