
25.01.2011, 21:43
|
Прохожий
|
|
Регистрация: 14.12.2010
Сообщения: 31
Репутация: 11
|
|
Delphi & php
суть етого кода: авторизуется на сайте, нажимает на клавишу дальше высвечивается время через сколько следущее нажатие (на сайте при нажатии на кнопку включается таймер через скока кнопка о5 доступна)
PHP код:
function get_money($login,$pass)
{
$ch = curl_init('http://srv2.murclub.ru/xmls/xml_proxy.ph...');
curl_setopt($ch, CURLOPT_USERAGENT, 'Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.0.7) Gecko/2009021910 Firefox/3.0.7 (.NET CLR 3.5.30729)');
curl_setopt($ch, CURLOPT_COOKIE, 'mur_mail='.$login.'; mur_pass='.md5($pass));
curl_setopt($ch, CURLOPT_REFERER, 'http://murclub.ru/flash/MXMLSocketProxy....');
curl_setopt($ch, CURLOPT_POST, 1);
curl_setopt($ch, CURLOPT_POSTFIELDS, 'query=SALARY');
curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 0);
curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
$res = curl_exec($ch);
if(preg_match('#salarytime=\"(.*?)\"#',$res,$matches))
{
$time = $matches[1] / 60;
echo '<p><font>До следующей зарплаты:</font> '.intval($time).' минут(ы).</p>';
echo '<p><font>Ссылка для CRON:</font> </p>';
echo '<p><font>Последнее открытие этой страницы:</font>'.date("d.m.Y H:i").' GMT +3';
} else {
echo '<p><font>Не удалось авторизоваться! Возможно неверный логин или пароль! Либо сервер мурклуба завис!</font></p>';
Form();
}
}
помогите ето перевести на delphi
|