Wikireporter:Datbot~plwikinews/Logowanie

Z Wikinews, wolnego źródła informacji.

This script is released under the public domain. Created by Dariusz Siedlecki.

<?
require_once('http.inc');
header('Content-Type: text/plain');

$http_client = new http(HTTP_V11, true);

$http_client->host = "pl.wikinews.org";

$form = array(
	"wpName"		=> "Datbot",
	"wpPassword"		=> /*CLEARED*/,
	"wpRemember"		=> "1"
);

$status = $http_client->post("/w/index.php?title=Specjalna:Userlogin&action=submitlogin",
$form, "http://pl.wikinews.org/w/index.php?title=Specjalna:Userlogin&action=submitlogin");

if ($status == HTTP_STATUS_OK)
{
	print "Logging in... OK\n\n";
}
else
{
	print("An error occured while requesting your file!\n");
	print_r($http_client);
}
?>