Afsendelse af nyhedsbrev i php.

Hej Eksperter.
Jeg har et problem. Jeg har forsøgt at tilpasse en side så den passede til min. Det er en jeg har lånt med accept.
Mit problem er at jeg ikke ved om det er her i scriptet at der går lort i den eller det er serveren  (der før har forvoldt problemer med korrekt afsendelse.) Ihvertfald kommer mails aldrig frem.
Håber at jeg kan få en til at chekke det igennem.
Ved godt at det er skrevet i php3. Men det skal ikke rettes da serveren har probs med php4.
Her følger en alt for lang side.
Håber i har tid til at hjælpe.
----------------
<?

include "../include/header.inc";
include "../include/database.inc";
include "../include/html.inc";
include "../include/forms.inc";
include "../include/dato.inc";

// Define variables
// **************************

$ll_ret_tekst = "Ret nyhedsbrev";
$ll_opret_tekst = "Opret nyt nyhedsbrev";

$ll_farve1 = "#EEEEEE";
$ll_farve2 = "#FFFFFF";

$ll_tabel = "newsletters";
$ll_titel = "Nyhedsbreve";

// **************************
function fejl($tekst) {
print "<SCRIPT>alert('$tekst');</SCRIPT>";
exit;
}

$db = new DB_mysql;

overskrift($ll_titel);

// -------------------------------------------
// Opdater
// -------------------------------------------

if ($update) {
                 
    $sql = "update $ll_tabel set status=$status,content = '$content',title='$title' where id = $update";
    $db->query($sql);
    go_back();
}


// -------------------------------------------
// Delete
// -------------------------------------------
else if ($delete) {
    $db->query("delete from $ll_tabel where id = $delete");
    go_back();
}

// -------------------------------------------
// Insert
// -------------------------------------------

else if ($insert) {
  $date = date("Y-m-d");
  $sql = "insert into $ll_tabel (content,title,date) values ('$content','$title','$date')";
  $db->query($sql);
  go_back();
}

// -------------------------------------------
// New or Edit
// -------------------------------------------

else if ($new || $edit) {

if ($edit) {
  $title2 = $ll_ret_tekst;
  $submit_url = "$PHP_SELF?update=$edit";
  $sql = "select * from $ll_tabel where id = $edit";
  $db->query($sql);
  $db->next_record();
 
  // Get the stuff
  $id          = $edit;
  $content        = stripslashes($db->Record["content"]);
  $title        = stripslashes($db->Record["title"]);
  $status = $db->Record["status"];
   
}
else {
  $title2 = $ll_opret_tekst;
  $submit_url = "$PHP_SELF?insert=1"; 
}

?>

<FORM  action="<? print $submit_url; ?>" method="post">
  <TABLE width=90% align=center cellspacing=0 cellpadding=0 border=1 bordercolor="#000000">
  <TR><TD>
  <TABLE width="100%"  align=center cellspacing=0 cellpadding=2 border=0 bgcolor="#EEEEEE">

    <TR>
      <TD colspan=2><IMG src="../ill/dot.gif" width=2 height=8></TD>
  </TR>

  <?
  textfield("Titel :","title",$title,50); 
 
  // Status
  print "<TR><TD>Status :</td>";
  print "<TD><SELECT name=\"status\">";
 
  if ($status==0) {
      print "<OPTION value=\"0\" SELECTED>Oprettet</OPTION>";
      print "<OPTION value=\"1\">Afsend</OPTION>";
  }
  else if ($status==1) {
      print "<OPTION value=\"1\" SELECTED>Afventer afsendelse</OPTION>";
      print "<OPTION value=\"0\">Stands afsendelse</OPTION>"; 
  }
  else {
  print "<OPTION value=\"2\" SELECTED>Afsendt</OPTION>";
  }
  print "</td></TR>";
  textarea("Indhold","content",$content,50,20);
  ?>
  <TR>
    <TD colspan=2><IMG src="../ill/dot.gif" width=2 height=4></TD>
  <TR>
    <TR><TD>&nbsp;</TD>
              <TD><INPUT type="submit" value="<? print $title2; ?>" Name="Insert"></TD>
          </TR>
         
            <TR>
      <TD colspan=2><IMG src="../ill/dot.gif" width=2 height=20></TD>
  </TR>
  </TABLE>
      </tD></TR></TABLE>
</FORM>
<?
}

// -------------------------------------------
// Liste
// -------------------------------------------


else {

?>

<BR>
<TABLE cellpadding=2 cellspacing=0 border=0 align=center width=90% align=center>

<TR>
  <TD class="redtitlelnk" colspan=2><A HREF="<? print $PHP_SELF;?>?order=date">Dato</A></TD>
  <TD class="redtitlelnk" colspan=7><A HREF="<? print $PHP_SELF;?>?order=title">Overskrift</A></TD>

</TR>

<TR bgcolor="#000000">
  <!-- Navn -->
  <TD align=left><IMG src="../ill/dot.gif" width="110" height=1></TD>
  <TD align=left><IMG src="../ill/dot.gif" width="5" height=1></TD>

  <TD align=left><IMG src="../ill/dot.gif" width="100%" height=1></TD>

   
  <TD align=left><IMG src="../ill/dot.gif" width="5" height=1></TD>
 
  <TD align=left><IMG src="../ill/dot.gif" width="30" height=1></TD>
  <TD align=left><IMG src="../ill/dot.gif" width="30" height=1></TD>
  <TD align=left><IMG src="../ill/dot.gif" width="30" height=1></TD>   
</TR>

<?

if (!$order) $order = "date";

$sql = "select id,date,title,status from $ll_tabel order by $order";
$db->query($sql);

while ($db->next_record()) {

switch ($db->Record["status"])  {

case 0  : $status = "Oprettet"; break;
case 1  : $status = "Afventer"; break;
case 2  : $status = "Afsendt"; break;

}

  // Beregn baggrundsfarve
      if ($farvetaeller%2==0) {
          $farve = $ll_farve1;
      }
      else {
          $farve= $ll_farve2;
      }
      $farvetaeller++;

  print "<TR bgcolor=$farve>";

  print "<TD colspan=2>" . format_dato($db->Record["date"]) . "</td>";
  print "<TD width=100%>". stripslashes($db->Record["title"]). "&nbsp;</TD>";
  print "<TD>&nbsp;</TD>";
   
  print "<TD>$status</TD>";
  print "<TD><A HREF=\"$PHP_SELF?edit=". $db->Record["id"]. "\"><IMG src=\"../ill/ret.gif\" border=0></A></TD>";
  print "<TD><A HREF=\"$PHP_SELF?delete=". $db->Record["id"]. "\"><IMG src=\"../ill/slet.gif\" border=0></A></TD>";
  print "</TR>";
}

print "<TR><TD colspan=10 class=redtitlelnk><BR><BR>[ <A HREF=\"$PHP_SELF?new=1\">Opret  nyhedsbrev</A> ]</TD></TR>";
print "</TABLE>";

}
include "../include/footer.inc";
?>