Falha minha ou da UOL? Alguém sabe?

Tenho um programa de e-mail com stp autenticado instalado na UOL há mais de 01 ano. Ao receber o formulário ele dispara o e-mail para o destinatário e o remetente. Agora passou a dar este erro, sem que eu tenha alterado nada! HP Warning: fsockopen() [<a href='function.fsockopen'>function.fsockopen</a>]: unable to connect to mail.portaldapermuta.com:587 (A connection attempt failed because the connected party did not properly respond after a period of time, or established connection failed because connected host has failed to respond. Onde pode estar o erro?

<?php
session_start(). /*apenas dispara o envio da mensagem caso houver/existir $_POST['enviar']*/
if (isset($_POST['enviar']))

{ /digite os destinatarios separados por virgula/

$paraquemvai=$_POST["email"].",atendimento@portaldapermuta.com". $destinatarios = $paraquemvai. 

/usuario ou nome completo da conta criada em sua hospedagem, como por exemplo teste@seudominio/
$usuario = 'xxxxx@xxxxxxxxxxx.com'. /senha da conta de email acima/
$senha = 'xxxxxxx'. /nome do destinatario no qual receberá a mensagem/
$nomeDestinatario = 'mensagem enviada através do site portal da permuta'. /abaixo as veriaveis principais, que devem conter em seu formulario/

$nomeRemetente = $_POST["seu_nome"]. $resposta = $_POST['seu_email']. $assunto = "Mensagem de -".$resposta."- através do site Portal da Permuta". //$mensagem = ' $paraquemvai te contactou'. 

/*********************************A PARTIR DAQUI NAO ALTERAR**********************************/
foreach ($_POST as $dados['me1'] => $dados['me2']) {

$dados['me3'][] = '<b>'.$dados['me1'].'</b>: '.$dados['me2']. } $dados['me3'] = '<hr><h4>Mensagem do site Portal da Permuta. Entre em contato com o colega abaixo. Ele tem interesse em permutar.</h4>'.implode('<br>', $dados['me3']).'<hr>'. $dados['email'] = array('usuario' => $usuario, 'senha' => $senha, 'servidor' => 'mail.'.substr(strstr($usuario, '@'), 1), 'nomeRemetente' => $nomeRemetente, 'nomeDestinatario' => $nomeDestinatario, 'resposta' => $resposta, 'assunto' => $assunto, 'mensagem' => $dados['me3']). ini_set('php_flag mail_filter', 0). $conexao = fsockopen($dados['email']['servidor'], 587, $errno, $errstr, 10). fgets($conexao, 512). $dados['destinatarios'] = explode(',', $destinatarios). foreach ($dados['destinatarios'] as $dados['1'])

{

$dados['destinatarios']['RCPTTO'][] = '< '.$dados['1'].' >'. $dados['destinatarios']['TO'][] = $dados['1']. } $dados['cabecalho'] = array('EHLO ' => $dados['email']['servidor'], 'AUTH LOGIN', base64_encode($dados['email']['usuario']), base64_encode($dados['email']['senha']), 'MAIL FROM: ' => '< '.$dados['email']['usuario'].' >', 'RCPT TO:' => $dados['destinatarios']['RCPTTO'], 'DATA', 'MIME-Version: ' => '1.0', 'Content-Type: text/html. charset=iso-8859-1', 'Date: ' => date('r',time()), 'From: ' => array($dados['email']['nomeRemetente'].' ' => '< '.$dados['email']['usuario'].' >'), 'To:' => array($dados['email']['nomeDestinatario'].' ' => $dados['destinatarios']['TO']), 'Reply-To: ' => $dados['email']['resposta'],'Subject: ' => $dados['email']['assunto'], 'mensagem' => $dados['email']['mensagem'], 'QUIT'). foreach ($dados['cabecalho'] as $dados['2'] => $dados['3'])

{ if (is_array($dados['3'])) { foreach ($dados['3'] as $dados['4'] => $dados['5']) {

$dados['4'] = empty($dados['4'])? '': $dados['4']. $dados['5'] = empty($dados['5'])? '': $dados['5']. $dados['4'] = is_numeric($dados['4'])? '': $dados['4']. 

if (is_array($dados['5'])) {

$dados['5'] = "< ".implode(', ', $dados['5'])." >". }

fwrite($conexao, $dados['2'].$dados['4'].$dados['5']."

", 512).'<br>'. fgets($conexao, 512). } }

else {

$dados['2'] = empty($dados['2'])? '': $dados['2']. $dados['3'] = empty($dados['3'])? '': $dados['3']. $dados['2'] = is_numeric($dados['2'])? '': $dados['2']. if ($dados['2'] == 'Subject: ')

{ fwrite($conexao, $dados['2'].$dados['3']."
", 512).'<br>'. fwrite($conexao, "

", 512).'<br>'. fgets($conexao, 512). }

elseif ($dados['2'] == 'mensagem'){ fwrite($conexao, $dados['3'].".

").'<br>'. fgets($conexao). }

else { fwrite($conexao, $dados['2'].$dados['3']."

", 512).'<br>'. fgets($conexao, 512). } } }
}
//fclose($conexao). echo "Aguarde o redirecionamento, email sendo enviado"."<br>". $paraquemvai.$nomeRemetente. echo "<meta http-equiv='refresh' content='2. URL=[url=[http://www.portaldapermuta.com/adm_interessado/detalhes_participante.php](http://www.portaldapermuta.com/adm_interessado/detalhes_participante.php)][http://www.portaldapermuta.com/adm_interessado/detalhes_participante.php](http://www.portaldapermuta.com/adm_interessado/detalhes_participante.php) [/url]'>".?>