Как вытащить из HTM страницы определённый текст

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Ответить
lostos
Новичок
Новичок
 
Сообщения: 36
Зарегистрирован: 04.05.2008 (Вс) 15:22

Как вытащить из HTM страницы определённый текст

Сообщение lostos » 05.05.2008 (Пн) 8:34

Как вытащить из HTML страницы определённые строки? а именно нужно вытащить логин и пароль допустим из письма подтверждения регистрации.
позиция строк одна и таже так как письмо приходит с одного и того же сервиса.
Вернуться к началу
alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 05.05.2008 (Пн) 10:08

Сформулируй решение задачи словами, как ты это делаешь сам.
Lasciate ogni speranza, voi ch'entrate.
Вернуться к началу
lostos
Новичок
Новичок
 
Сообщения: 36
Зарегистрирован: 04.05.2008 (Вс) 15:22

Сообщение lostos » 05.05.2008 (Пн) 11:10

Вот HTML код страницы:
Код: Выделить всё
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
    "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="nl" lang="nl" dir="ltr">
<head>
  <title>NoSpamFor.Us</title>
  <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
  <meta name="description" content="NoSpamFor.Us: Receive free email on any account you'd like" />
  <meta name="keywords" content="throwaway email, free email, throwaway, spam, anonymous, free, receive-only, email, dodgeit" />
  <meta name="robots" content="index, nofollow" />
  <link href="style.css" rel="stylesheet" type="text/css" />
</head>

<body>
<table summary="" class="main" cellpadding="5">
<tr>
  <td>
    <table cellspacing="0" width="100%">
    <tr>
      <td width="35%"><a href="index.php">index</a> &gt; <a href="mailbox.php?mailbox=jkhjkhkhj&amp;sitename=nospamfor.us">mailbox</a></td>
      <th width="30%"><a href="index.php">NoSpamFor.Us</a><br/>Spam sucks!</th>

      <td width="35%">&nbsp;</td>
    </tr>
    </table>
  </td>
</tr>
<tr><td class="spacer"></td></tr>
<tr><td align="center">Please support us by clicking on an ad.</td></tr>
<tr><td class="spacer"></td></tr>
<tr>
<td>
<script language="JavaScript" type="text/javascript">
<!--
function toggleDiv(div)
{
  if(document.getElementById)
    el = document.getElementById(div);
  else if(document.all)
    el = document.all[div];
  if(el)
  {
    off = (el.style.display=='none');
    el.style.display = off?"block":"none";
  }
}
headersLoaded = false;
function loadHeaders()
{
  if(!headersLoaded)
  {
    if(document.getElementById)
      el = document.getElementById("headers");
    else if(document.all)
      el = document.all["headers"];
   
    try { http_request = new ActiveXObject("Msxml2.XMLHTTP"); }
    catch (e) { try { http_request = new ActiveXObject("Microsoft.XMLHTTP"); }
    catch (e) { try { http_request = new XMLHttpRequest(); }
    catch (e) { try { http_request = window.createRequest(); }
    catch (e) { http_request = false; }}}}
    if(http_request!==false)
    {
      http_request.open("GET", "headers.php?mailid=345534");
      functie = function(){
      if (http_request.readyState == 4 || http_request.readyState == "complete") {
        headersLoaded = true;
        if(document.getElementById)
          el = document.getElementById("headers");
        else if(document.all)
          el = document.all["headers"];
        el.innerHTML = http_request.responseText;
      }};
      try {
        http_request.onload             = functie;
      }catch(e) {
        try { http_request.onreadystatechange = functie;}catch(e) {}
      }
      http_request.send('');
    }else
      el.innerHTML = "Failed loading headers";
  }
  toggleDiv("headers");
}
//-->
</script>

<table summary="" cellspacing="0" cellpadding="0" border="0" width="100%">
<tr>
<td valign="top">
<div id='headerDiv'><a href='#' onclick='loadHeaders();return false';><b>Toggle headers on/off</b></a><div id='headers' style='display:none;'>Loading headers...</div></div><div id='bodyDiv'><div class='bodySecDiv' id='div_0'>Я идиот! Убейте меня, кто-нибудь!Я идиот! Убейте меня, кто-нибудь!??!<br />
<br />
??? Я идиот! Убейте меня, кто-нибудь!: jkhjkhkhj@nospamfor.us<br />
??? Я идиот! Убейте меня, кто-нибудь!?: rurondic<br />
??? Я идиот! Убейте меня, кто-нибудь!????: fgdgfdgdf<br />
<br />
??? Я идиот! Убейте меня, кто-нибудь!???? Я идиот! Убейте меня, кто-нибудь!?? Я идиот! Убейте меня, кто-нибудь!? Я идиот! Убейте меня, кто-нибудь!Я идиот! Убейте меня, кто-нибудь! Я идиот! Убейте меня, кто-нибудь!???? ?? Я идиот! Убейте меня, кто-нибудь!?:<br />

<br />
   https://id.cod.ru/auth/?action=activate&amp;activateCode=ku1eFp <br />
<br />
------------------------<br />
ID.COD | http://id.cod.ru | support@netville.ru &lt;mailto:support@netville.ru&gt;</div></div>  </td>
<td valign="top" align="right" width="130"><script type="text/javascript"><!--
    google_ad_client = "pub-2074056743328340";
    google_alternate_color = "FFFFFF";
    google_ad_width = 120;
    google_ad_height = 600;
    google_ad_format = "120x600_as";
    google_ad_type = "text_image";
    //2006-11-22: NoSpamForUs
    google_ad_channel = "4671114380";
    google_color_border = "FFFFFF";
    google_color_bg = "FFFFFF";
    google_color_link = "900000";
    google_color_text = "000000";
    google_color_url = "008000";
    //--></script>
    <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script></td>

</tr>
</table>
  </td>
</tr>
<tr><td class="spacer"></td></tr>
<tr><td align="center"><br/><script type="text/javascript"><!--
    google_ad_client = "pub-2074056743328340";
    google_alternate_color = "FFFFFF";
    google_ad_width = 728;
    google_ad_height = 90;
    google_ad_format = "728x90_as";
    google_ad_type = "text_image";
    //2006-11-22: NoSpamForUs
    google_ad_channel = "4671114380";
    google_color_border = "FFFFFF";
    google_color_bg = "FFFFFF";
    google_color_link = "900000";
    google_color_text = "000000";
    google_color_url = "008000";
    //--></script>
    <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script></td>
</tr>

</table>
<script src="http://www.google-analytics.com/urchin.js" type="text/javascript">
</script>
<script type="text/javascript">
_uacct = "UA-468438-4";
urchinTracker();

</script>
</body>
</html>

Из этого кода нужно вытащить определённый текст и поместить его например в textbox
Вернуться к началу
RayShade
Scarmarked
Scarmarked
Аватара пользователя
 
Сообщения: 5511
Зарегистрирован: 02.12.2002 (Пн) 17:11
Откуда: Russia, Saint-Petersburg

Сообщение RayShade » 05.05.2008 (Пн) 11:29

Используй regexp для формирования шаблона поиска нужной тебе строки.
I don't understand. Sorry.
Вернуться к началу
lostos
Новичок
Новичок
 
Сообщения: 36
Зарегистрирован: 04.05.2008 (Вс) 15:22

Сообщение lostos » 05.05.2008 (Пн) 13:22

НЕ могли бы вы привести конкретный пример, как использовать regexp для формирования шаблона? :roll:
Вернуться к началу
Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Сообщение Хакер » 05.05.2008 (Пн) 13:34

Не смог бы он. И никто бы не смог.

Сначала приведи пример того, что ты собираешься искать.
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.
Вернуться к началу
lostos
Новичок
Новичок
 
Сообщения: 36
Зарегистрирован: 04.05.2008 (Вс) 15:22

Сообщение lostos » 05.05.2008 (Пн) 14:17

Из этого кода то, что выделено жирным шрифтом.

??? Я идиот! Убейте меня, кто-нибудь!: jkhjkhkhj@nospamfor.us<br />
??? Я идиот! Убейте меня, кто-нибудь!?: rurondic<br />
??? Я идиот! Убейте меня, кто-нибудь!????: fgdgfdgdf<br />
<br />
??? Я идиот! Убейте меня, кто-нибудь!???? Я идиот! Убейте меня, кто-нибудь!?? Я идиот! Убейте меня, кто-нибудь!? Я идиот! Убейте меня, кто-нибудь!Я идиот! Убейте меня, кто-нибудь! Я идиот! Убейте меня, кто-нибудь!???? ?? Я идиот! Убейте меня, кто-нибудь!?:<br />

<br />
https://id.cod.ru/auth/?action=activate&amp;activateCode=ku1eFp <br />
Вернуться к началу
Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Сообщение Хакер » 05.05.2008 (Пн) 14:24

lostos
Там что, так и идут вопросы?
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.
Вернуться к началу
ACiD
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 261
Зарегистрирован: 10.12.2005 (Сб) 2:29
Откуда: г. Санкт - Петербург

Сообщение ACiD » 05.05.2008 (Пн) 14:31

Хакер писал(а):Там что, так и идут вопросы?
Ну ты и приколист :lol:
регулярные выражения нужно здеся:
Код: Выделить всё
<div class='bodySecDiv' id='div_0'>Я идиот! Убейте меня, кто-нибудь!Я идиот! Убейте меня, кто-нибудь!??!<br />
<br />
??? Я идиот! Убейте меня, кто-нибудь!: jkhjkhkhj@nospamfor.us<br />
??? Я идиот! Убейте меня, кто-нибудь!?: rurondic<br />
??? Я идиот! Убейте меня, кто-нибудь!????: fgdgfdgdf<br />
<br />
??? Я идиот! Убейте меня, кто-нибудь!???? Я идиот! Убейте меня, кто-нибудь!?? Я идиот! Убейте меня, кто-нибудь!? Я идиот! Убейте меня, кто-нибудь!Я идиот! Убейте меня, кто-нибудь! Я идиот! Убейте меня, кто-нибудь!???? ?? Я идиот! Убейте меня, кто-нибудь!?:<br />

<br />
https://id.cod.ru/auth/?action=activate&amp;activateCode=ku1eFp <br />

всё что кроме вопросов "статическое", остальное - см. регулярные выражения, пример здесь мало поможет ;)
Вернуться к началу
lostos
Новичок
Новичок
 
Сообщения: 36
Зарегистрирован: 04.05.2008 (Вс) 15:22

Сообщение lostos » 05.05.2008 (Пн) 14:36

Хакер писал(а):lostos
Там что, так и идут вопросы?

:lol: Нет, просто сайт не поддерживает русские шрифты))
Вернуться к началу
RayShade
Scarmarked
Scarmarked
Аватара пользователя
 
Сообщения: 5511
Зарегистрирован: 02.12.2002 (Пн) 17:11
Откуда: Russia, Saint-Petersburg

Сообщение RayShade » 05.05.2008 (Пн) 14:41

Че то мне кажется, тупой это авторегистратор на форумах получится.
I don't understand. Sorry.
Вернуться к началу
Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Сообщение Хакер » 05.05.2008 (Пн) 14:41

пример здесь мало поможет :wink:

Дурацкий смайл подмигивания :x

Дурацкое выделения фразы "регулярные выражения нужно здеся" курсивом. Какова его цель? По твоему мнению я чего-то непонял? Твое мнение - хреновое, я понял всё.

Что стоит вместо вопросов спрашивалось для того, чтобы привести автору пример подходящего регулярного выражения.

Терпеть не могу, когда какой-нибудь особо инициативный увидит какую-нибудь ошибку, которой у меня, или подумает, что я ничего не понял, когда я всё прекрасно понял, и начнёт исправлять или разъяснять.
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.
Вернуться к началу
lostos
Новичок
Новичок
 
Сообщения: 36
Зарегистрирован: 04.05.2008 (Вс) 15:22

Сообщение lostos » 05.05.2008 (Пн) 14:54

RayShade писал(а):Че то мне кажется, тупой это авторегистратор на форумах получится.

нет, не правда...
Вернуться к началу
ACiD
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 261
Зарегистрирован: 10.12.2005 (Сб) 2:29
Откуда: г. Санкт - Петербург

Сообщение ACiD » 05.05.2008 (Пн) 15:22

Всё что после этого смайла: :lol: я говорил не тебеХакер! Я понял что ты понял.
Вернуться к началу
Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Сообщение Хакер » 05.05.2008 (Пн) 15:25

ACiDXX
Тогда извиняюсь, претензии снимаются.
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.
Вернуться к началу
RayShade
Scarmarked
Scarmarked
Аватара пользователя
 
Сообщения: 5511
Зарегистрирован: 02.12.2002 (Пн) 17:11
Откуда: Russia, Saint-Petersburg

Сообщение RayShade » 05.05.2008 (Пн) 16:53

Хакер, вопрос не в тему - когда шапку с аватара снимешь? Уже лето на носу :)
I don't understand. Sorry.
Вернуться к началу
Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Сообщение Хакер » 05.05.2008 (Пн) 16:59

Как только придумаю, что поставить но новую аватару :) Или старую вернуть?
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.
Вернуться к началу
Sur
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 91
Зарегистрирован: 14.07.2003 (Пн) 20:54
Откуда: C2H5OH

Сообщение Sur » 05.05.2008 (Пн) 17:12

Не меняй. Эта аватара правильно характеризует твой внутренний мир )
Пить или не пить? - да не вопрос!
Вернуться к началу
ALX_2002
Мега гуру
Мега гуру
 
Сообщения: 2054
Зарегистрирован: 25.11.2002 (Пн) 20:03

Сообщение ALX_2002 » 07.05.2008 (Ср) 20:40

OFFTOP:

Изображение

Переходим на летний стиль одежды ? :roll:
Вернуться к началу
Andrey Fedorov
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
 
Сообщения: 3287
Зарегистрирован: 21.05.2004 (Пт) 9:28
Откуда: Москва

Сообщение Andrey Fedorov » 08.05.2008 (Чт) 8:40

Вообще-то тут нужно работать с текстовым форматом письма, а не HTML - письмо с подтверждением от клиента может быть отправлено в тексте...
Фиг Вам! - Сказал Чебурашка, обгладывая Крокодила Гену...
Вернуться к началу
Williams
Гуру
Гуру
Аватара пользователя
 
Сообщения: 1280
Зарегистрирован: 06.05.2008 (Вт) 18:35
Откуда: System.Reflection.Williams (увидел себя в зеркале :))

Сообщение Williams » 10.05.2008 (Сб) 0:20

Есть такая вещь - "регулярные выражения" называется, об этом тебе пытаются сказать.

Служит для различных операций поиска и замены в тексте.

Попробуй поискать в Google - там полно примеров.

В .NET регулярные выражения использовать несколько проще.
Вернуться к началу
Ответить

Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot, Google-бот и гости: 82

Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Time : 0.121s | 16 Queries | GZIP : On
   TopList  
cron