Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Текст Добавлено: 27.03.06 09:48  

Автор вопроса:  Billi Gates | ICQ: 242-026-281 
Наверно всех достал уже со своими вопросами? Но тем не менее задам ещё один. Допустим есть хтмл код, из которого мне нужно вытащить все ссылки(это я к примеру)любой абсолютно, но это нухно сделать не апи функцией а др. способом(если код хтмл в текстовом виде и там a href="" вот всё начиная от <a href=""> до </a> (в хтмл коде ссылок может быть бесконечно! Если что-то не понятно по вопросу пишите! Потому, что лучше изяснить суть проблемы не мог!

Ответить

  Ответы Всего ответов: 4  

Номер ответа: 1
Автор ответа:
 zulus



Вопросов: 2
Ответов: 23
 Профиль | | #1 Добавлено: 27.03.06 10:03
Все просто. html_text - это твой код.

dim clinks()as string
 
 cindex=0: cpos=1
for i=1 to len(html_text)
 cstart=instr(cpos,html_text,"<a href";)
  if cstart=0 then exit for
 cend=instr(cstart+8,html_text,"</a>";)
  redim preserve clinks(cindex)
   clinks(cindex)=mid$(html_text,cstart,cend-cstart+4)
   cindex=cindex+1: cpos=cend+4
next i

Все. У тебя в массиве будет вся строчка с "<a href" до "</a>".

Ответить

Номер ответа: 2
Автор ответа:
 Billi Gates



ICQ: 242-026-281 

Вопросов: 25
Ответов: 57
 Профиль | | #2 Добавлено: 27.03.06 10:27
спасибо!!!!!!! работает :)))))))))))))))))))))))))))))))))

Ответить

Номер ответа: 3
Автор ответа:
 Neco



ICQ: 247906854 

Вопросов: 133
Ответов: 882
 Web-сайт: neco.pisem.net
 Профиль | | #3
Добавлено: 28.03.06 04:29
имхо, это не сработает в коде <a href="www.ms.com </a> etc.">some text</a>

Ответить

Номер ответа: 4
Автор ответа:
 zulus



Вопросов: 2
Ответов: 23
 Профиль | | #4 Добавлено: 29.03.06 10:43
ну ежели так, то все еще проще - делаешь парсер хтмл и вперед к светлому будущему :)

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам