Пинг скрипт
(3 оценок, среднее: 4.00 из 5)Имхо полезный пинг-скриптик, может кому и пригодиться.
На авторство не претендую — взял скрипт на умакс форуме «Пинг-Сервисы»
<code><span style="color: #000000"><span style="color: #0000bb"><?</span></span>set_time_limit(0);
$pingi_urli=array(
'http://pingoat.com/goat/RPC2',
'http://blogsearch.google.com/ping/RPC2'
'http://ping.blogg.de'
);
function MYBlog_ping ($url_ping="«, $name = »BlogName", $url = "http://name.blogger.com")
{$url_ping=str_replace("http://","«,$url_ping);
if ($firstslash = strpos($url_ping, »/"))
{
$p_host = substr($url_ping, 0, $firstslash);
$p_file =substr($url_ping, $firstslash, strlen($url_ping) — $firstslash);
}if($ping = @fsockopen($p_host, 80, $errno, $errstr, 15)) {
$p="<?xml version=\"1.0\"?><methodCall>
<methodName>weblogUpdates.ping</methodName>
<params><param><value>".$name."</value></param>
<param><value>".$url."</value></param></params></methodCall>";$pl=strlen($p);
fputs ($ping, "POST «.$p_file.» HTTP/1.0\r\n" .
"User-Agent: MYBlogPing\r\n".
"Host: «.$p_host.»\r\n".
"Content-Type: text/xml\r\n".
"Content-length: $pl\r\n\r\n");fputs ($ping, $p);
/* $page='';
while(!feof($ping))
{
$page.=fgets($ping);
}
print «<br><font color=green>$page</font><br>»;flush();print «endddd!!!!<br><br>»;flush();
*/
fclose ($ping);
return true;
} else {
return false;
}
}
for($i=0;$i<count($pingi_urli);$i++)
{$url_ping=$pingi_urli[$i];
// print «<br><font color=red>/// i=».$i." url_ping=".$url_ping."
MYBlog_ping ($url_ping,"Blog name", "http://user.blogger.net/");
}
?>Немного подправил и отладил скриптик — забираем: Пинг скрипт
