Что нового

[Сеть, интернет] Скопировать динамическую ссылку из документа

Logf

Новичок
Сообщения
1
Репутация
0
Есть HTML страница, сохраненная в файл test.txt выглядит так:

Код:
<html>

<head>
<meta http-equiv='content-type' content='text/html; charset=UTF-8' />
<title>www.ya.ru</title>
<META HTTP-EQUIV="Refresh" CONTENT="2; URL=http://M123321.site.ru/">
</head>
<body>
<font size="6"><a href="http://M123321.site.ru/">Мы находимся здесь</a>
</font>


<font size="2"><a href="http://ya.ru">Яндекс</a></font>
</body></html>

Как скопировать в буфер обмена или показать окно с сообщением (MsgBox) меняющегося адреса "http://M123321.site.ru"?
Заранее спасибо.
 

Dm666

Осваивающий
Сообщения
221
Репутация
48
Код:
$sString = FileRead("c:\temp\test.txt")
$sUrl= StringRegExp($sString,"URL=(.+/)",1)
MsgBox(0,"", $sUrl[0])


Наверное можно и изящнее, но это вроде работает.
 
Верх