Returnerer en integer numeric = Indikerer om data er numerisk => Returnerer en string (f.eks. "string" eller "int") not_null = Indikerer om data må være NULL => NULL betyder at feltet må være tomt */ global $aryDatabase_Result; global $aryField_Properties; clsDatabase::fnkDatabase_Open("SELECT ".$strField." FROM ".$strTable); $aryField_Properties=array("max_length"=>mysql_field_len($aryDatabase_Result,0),"numeric"=>mysql_field_type($aryDatabase_Result,0),"not_null"=>mysql_field_flags($aryDatabase_Result,0)); clsDatabase::fnkDatabase_Close(); return $aryField_Properties; } } class clsNewsletter extends clsDatabase { function fnkNewsletter_Add() { global $aryDatabase_Result; $strEmail=trim($_POST['Email']); $strName=trim($_POST['Name']); if ($_POST["Oil"]) { $intOil=1; } else { $intOil=0; } if ($_POST["Welding"]) { $intWelding=1; } else { $intWelding=0; } if ($strEmail) { parent::fnkDatabase_Open("SELECT ID FROM newsletter WHERE Name='".$strName."' AND Email='".$strEmail."' AND voided='0'"); if (mysql_num_rows($aryDatabase_Result) == 0) { $intID=null; } else { $intID=mysql_result($aryDatabase_Result,0); } parent::fnkDatabase_Close(); if ($intID>0) { parent::fnkDatabase_Open("UPDATE newsletter SET Name='".$strName."',Company='".$_POST["Company"]."',Email='".$strEmail."',Oil='".$intOil."',Welding='".$intWelding."' WHERE ID='".$intID."'"); echo ''; } else { parent::fnkDatabase_Open("INSERT INTO newsletter (Name,Company,Email,Contactperson,Oil,Welding,created_on) VALUES ('".$strName."','".$_POST["Company"]."','".$strEmail."','".$_POST['Contact']."','".$intOil."','".$intWelding."','".date("Y-m-d H:i:s")."')"); echo ''; } } } function fnkNewsletter_Remove() { $strEmail=trim($_GET["unsubscribe"]); if ($strEmail) { parent::fnkDatabase_Open("UPDATE newsletter SET voided=1,voided_on=now() WHERE email='".$strEmail."'"); echo ''; } } function fnkNewsletter_Send($strFromName,$strFromEmail,$strSubject,$strMessage) { if($strSubject) $dbSubject = str_replace("'","'",$strSubject); if($strMessage) $dbMessage = str_replace("'","'",$strMessage); if ($_POST["Send"] && $strMessage) { global $aryDatabase_Result; if ($_POST["Oil"]) { $intOil=1; } else { $intOil=-1; } if ($_POST["Welding"]) { $intWelding=1; } else { $intWelding=-1; } /* insert copy to mysql */ $mysql_db = "web10134"; $mysql_ho = "sql10134.web.wwi.dk"; $mysql_ur = "web10134"; $mysql_pw = "Ahf84jf4"; mysql_connect($mysql_ho,$mysql_ur, $mysql_pw); mysql_select_db("web10134") or die("\n\n\n".mysql_error()."\n\n\n"); /* insert newsletter to db */ $query_i = "insert into sent"; $query_i .= " set fromname='".$_POST['FromName']."',"; $query_i .= " email='".$_POST['FromEmail']."',"; $query_i .= " subject='".$dbSubject."',"; $query_i .= " url='".$_POST['Url']."',"; $query_i .= " message='".$dbMessage."',"; $query_i .= " oil='".$_POST['Oil']."',"; $query_i .= " welding='".$_POST['Welding']."',"; $query_i .= " send_simple='".$_POST['send_simple']."',"; $query_i .= " send_simple_email='".$_POST['special']."',"; $query_i .= " sent_on=now()"; mysql_query($query_i) or die(""); /* get latest id for backtracking*/ $query_l = "select id from sent order by id desc limit 0, 1"; $sql_l = mysql_query($query_l) or die(""); $data_l = mysql_fetch_row($sql_l); if($_POST["send_simple"]==1) { /* url for backtracking - singleplayer */ $urlprefix = "###URL###"; $backtrackurl = "http://ahi.arcadomain.dk/redirect.php?id=".$data_l[0]; $strMessage = str_replace($urlprefix,$backtrackurl,$strMessage); $objMail = new PHPMailer(); $objMail->From = $strFromEmail; $objMail->FromName = $strFromName; $objMail->Subject = $strSubject; $objMail->Body = ''.$strMessage.'

---

Klik her for at afmelde dig AH International A/S nyhedsbrevet'; $objMail->CharSet = "iso-8859-1"; $objMail->AddAddress($_POST["special"],$_POST["special"]); $objMail->IsHTML(true); $objMail->Send(); $objMail->ClearAddresses(); $objMail->null; } else { parent::fnkDatabase_Open("SELECT ID,Name,Email FROM newsletter WHERE (Oil='".$intOil."' OR Welding='".$intWelding."') AND voided=0"); $query = "SELECT ID,Name,Email FROM newsletter WHERE (Oil='".$intOil."' OR Welding='".$intWelding."') AND voided=0"; $aryDatabase_Result = mysql_query($query); while ($aryDatabase_Row=mysql_fetch_array($aryDatabase_Result)) { $tmpMessage = $strMessage; /* url for backtracking - multiplayer */ $urlprefix = "###URL###"; $backtrackurl = "http://ahi.arcadomain.dk/redirect.php?id=".$data_l[0]."&userid=".$aryDatabase_Row['ID']; $tmpMessage = str_replace($urlprefix,$backtrackurl,$tmpMessage); $objMail = new PHPMailer(); $objMail->From = $strFromEmail; $objMail->FromName = $strFromName; $objMail->Subject = $strSubject; $objMail->Body = ''.$tmpMessage.'

---

Klik her for at afmelde dig AH International A/S nyhedsbrevet'; $objMail->CharSet = "iso-8859-1"; $objMail->AddAddress($aryDatabase_Row['Email'],$aryDatabase_Row['Name']); $objMail->IsHTML(true); $objMail->Send(); $objMail->ClearAddresses(); $objMail->null; } parent::fnkDatabase_Close(); } echo ''; } } function fnkNewsletter_Delete($intID) { parent::fnkDatabase_Open("UPDATE newsletter SET voided=1,voided_on=now() WHERE ID='".$intID."'"); } function fnkNewsletter_Show_Subscribers() { global $aryDatabase_Result; $strNewsletter_Show_Subscribers = ''; /* order by method */ switch ($_GET['orderby']) { case 1: $orderBy="Company";break; case 2: $orderBy="Email";break; case 3: $orderBy="Contactperson";break; case 4: $orderBy="Oil desc";break; case 5: $orderBy="Welding desc";break; case 6: $orderBy="created_on desc";break; case 7: $orderBy="backtracking_on desc";break; default: $orderBy="Name";break; } $query = "SELECT ID,Name,Company,Email,Contactperson,Oil,Welding,date_format(created_on,'%d.%m.%y %H:%i') as created_date FROM newsletter WHERE voided=0 ORDER BY ".$orderBy; parent::fnkDatabase_Open($query); while ($aryDatabase_Row=mysql_fetch_array($aryDatabase_Result)) { /* sidst besøgte nyhedsbrev's "subject" ud fra brugerens klikkede id .. eller noget i den stil ;-) */ $query_l = "select backtracking.newsletterid,sent.subject"; $query_l .= " from backtracking"; $query_l .= " left join sent on backtracking.newsletterid=sent.id"; $query_l .= " where backtracking.userid='".$aryDatabase_Row[ID]."'"; $query_l .= " order by backtracking.newsletterid desc"; $query_l .= " limit 0,1"; $sql_l = mysql_query($query_l) or die("Error: ".mysql_error()); $data_l = mysql_fetch_row($sql_l); /* antal klik */ $query_c = "select count(*) as antal from backtracking where userid='".$aryDatabase_Row[ID]."' and newsletterid='".$data_l[0]."'"; $sql_c = mysql_query($query_c) or die("Error: ".mysql_error()); $data_c = mysql_fetch_row($sql_c); if ($aryDatabase_Row[Oil] == 0) { $strOil=null; } else { $strOil='x'; } if ($aryDatabase_Row[Welding] == 0) { $strWelding=null; } else { $strWelding='x'; } $strNewsletter_Show_Subscribers.=''; } parent::fnkDatabase_Close(); return $strNewsletter_Show_Subscribers.'

Navn	Firma	Email	Kontaktperson hos AHI	Olie	Svejsning	Oprettet	Antal Klik	Sidst Klikkede nyhedsbrev
'.$aryDatabase_Row[Name].'	'.$aryDatabase_Row[Company].'	'.$aryDatabase_Row[Email].'	'.$aryDatabase_Row[Contactperson].'	'.$strOil.'	'.$strWelding.'	'.$aryDatabase_Row[created_date].'	'.$data_c[0].'	'.$data_l[1].'	[Slet]

'; } } ?>