9 AND $_SESSION['losen']['ip'] == $_SERVER['REMOTE_ADDR']){//för att säkra att ingen nyttjar annans session
//hämtar in diverse data
$signatur = $_SESSION['losen']['anvnamn'];
$epost = $_SESSION['losen']['epost'];
$fodd = $_SESSION['losen']['fodd'];
$ort = $_SESSION['losen']['ort'];
$lan = $_SESSION['losen']['lan'];
$land = $_SESSION['losen']['land'];
$kon = $_SESSION['losen']['kon'];
//print "ÄÄÄ" . $_SESSION['losen']['sprak'];//20070819
if ($kon =="1"){$kon2=$_SESSION['sprak']['2330'];}//kvinna
if ($kon =="2"){$kon2=$_SESSION['sprak']['2331'];}//man
#include('nisse/koppla.php');//databaskoppling
$tillf = $_SESSION['losen']['medlemsID'];//sätter en tillfällig variabel som går att köra mot databasen
#---avsnitt som raderar profiler över ett visst åldersdatum
#86400 sek=1 dygn. Nu inställt på 60 dagar (518400). 070123 ändrat till 90 dagar
//$sql = "SELECT kontaktID, medlemsID, datum, datumSek, aktiv FROM kontakt WHERE aktiv='on' AND '" . (date('U')-7776000) . "'> datumSek ORDER BY datum LIMIT 10";
$tillf3 = ltrim(substr($_SESSION['admin']['parameter'],30,15));//korrekt inloggningar
eval("\$tillf3 = $tillf3;");
//$sql = "SELECT logginloggID FROM logginlogg WHERE grupp='' AND '" . (date('U')-$tillf4) . "'> datumSek OR grupp!='' AND '" . (date('U')-$tillf3) . "'> datumSek ORDER BY logginloggID LIMIT 10";
$sql = "SELECT kontaktID, medlemsID, datum, datumSek, aktiv FROM kontakt WHERE aktiv='on' AND '" . (date('U')-$tillf3) . "'> datumSek ORDER BY datum LIMIT 10";
#$sql = "SELECT kontaktID, medlemsID, datum, datumSek, aktiv FROM kontakt WHERE aktiv='on' AND '" . (date('U')-5184000) . "'> datumSek ORDER BY datum LIMIT 10";
#$sql = "SELECT kontaktID, medlemsID, datum, datumSek, aktiv FROM kontakt WHERE aktiv='0' AND '" . (date('U')-5184000) . "'> datumSek ORDER BY datum LIMIT 10";
//vad som händer här:
//gå till kontakt, ta fram en profil som ska raderas, radera den, hämta medlemmens totalsiffra, räkna upp den, stoppa tillbaka och gå sedan för att hämta nästa profil vems den nu är
//print $sql;
// Kör fråga
$result = mysql_query($sql, $connectionstring);
while($rad = mysql_fetch_array($result)){
$kontaktID = $rad['kontaktID'];
$medlemsID = $rad['medlemsID'];
$inloggSek = $rad['inloggSek'];
$aktiv = $rad['aktiv'];
//print $aktiv . "*";
//print " ".$medlemsID . "hek";
$sql = "UPDATE kontakt SET aktiv='0' WHERE kontaktID = $kontaktID";//raderar de som inte är över tidsgränsen, sätts till '0' och permanentraderas hos admin
#$sql = "UPDATE kontakt SET aktiv='on' WHERE kontaktID = $kontaktID";//raderar de som inte är över tidsgränsen, sätts till '0' och permanentraderas hos admin
// Kör fråga
mysql_query($sql, $connectionstring);
#----denna del av automatraderingen justerar aktuellt antal profiler
// SQL-fråga
$sql = "SELECT profiler FROM medlem WHERE medlemsID='$medlemsID'";//om inte hittat ngt i raden innan så är det 0
// Kör fråga
$result2 = mysql_query($sql, $connectionstring);
//läs in från posten
while($rad = mysql_fetch_array($result2)){
$profiler = $rad['profiler'];
//print " profilerA: " . $profiler;
}
$profiler = $profiler-1;//räknar NED antal aktiva profiler
#$profiler = $profiler+1;//räknar NED antal aktiva profiler, TEST
//print " profilerB: " . $profiler;
// SQL-fråga
$sql = "UPDATE medlem SET profiler='$profiler' WHERE medlemsID='$medlemsID'";
// Kör fråga
mysql_query($sql, $connectionstring);
}
#--------------
#---avsnitt som DEFINITIVraderar profiler över ett visst åldersdatum
#86400 sek=1 dygn. Nu inställt på 120 dagar (10368000). 070123 ändrat till 150 dagar
$tillf3 = ltrim(substr($_SESSION['admin']['parameter'],45,15));//korrekt inloggningar
eval("\$tillf3 = $tillf3;");
//$sql = "SELECT logginloggID FROM logginlogg WHERE grupp='' AND '" . (date('U')-$tillf4) . "'> datumSek OR grupp!='' AND '" . (date('U')-$tillf3) . "'> datumSek ORDER BY logginloggID LIMIT 10";
$sql = "DELETE FROM kontakt WHERE aktiv='0' AND '" . (date('U')-$tillf3) . "'> datumSek OR aktiv='1' AND '" . (date('U')-$tillf3) . "'> datumSek LIMIT 10";
//print " N " . $sql;
//$sql = "DELETE FROM kontakt WHERE aktiv='0' AND '" . (date('U')-12960000) . "'> datumSek OR aktiv='1' AND '" . (date('U')-10368000) . "'> datumSek LIMIT 10";
//print " G " . $sql;
#$sql = "DELETE FROM kontakt WHERE aktiv='0' AND '" . (date('U')-10368000) . "'> datumSek OR aktiv='1' AND '" . (date('U')-10368000) . "'> datumSek LIMIT 10";
//vad som händer här:
//radera alla som är automat (0) eller manuellt (1) inaktiverade/raderade. Om bild finns, stryk även den
// Kör fråga
$result = mysql_query($sql, $connectionstring);
if ($bild !=""){//om ingen bild finns registrerad i registret ska försök till radering ej ske för då försöker den ta bort biblioteket
If (file_exists("kontaktbilder/".$bild)) {//skickar bara kommandot radera om bilden verkligen finns (om någon lyckats lägga upp bild med samma namn har denna en funktion att fylla
unlink("kontaktbilder/".$bild);
}
If (file_exists("tumnaglar/".$bild)) {//skickar bara kommandot radera om bilden verkligen finns (om någon lyckats lägga upp bild med samma namn har denna en funktion att fylla
unlink("tumnaglar/".$bild);//nytt 20070522 som även raderar tumnagelbilder
}
}
/*
if ($bild !=""){//om ingen bild finns registrerad i registret ska försök till radering ej ske för då försöker den ta bort biblioteket
If (file_exists("kontaktbilder/".$bild)) {//skickar bara kommandot radera om bilden verkligen finns (om någon lyckats lägga upp bild med samma namn har denna en funktion att fylla
unlink("kontaktbilder/".$bild);
}
}
*/
#--------------
// SQL-fråga
$sql = "SELECT profiler FROM medlem WHERE medlemsID='$tillf'";//kollar bara värdet i medlesmregistret, räknar inte
// Kör fråga
$result = mysql_query($sql, $connectionstring);
while($rad = mysql_fetch_array($result)){
$profilerKoll = $rad['profiler'];//kollar hur många profiler som aktuell användare har inlagda
//echo $profilerKoll;
}
?>
Untitled Document
89){
$max_file_size = 500000;//tidigare 400000
}else{
$max_file_size = 100000;//tidigare 50000
}
if(isset($_POST['frm_upload'])){
$datum = date("Y-m-d H:i");
$datumSek = date("U");//sätter sekunder sedan 1/1 1970
$rubrik = $_POST['rubrik'];
//$rubrik = substr($i,0,4)$_POST['rubrik1'] . substr($i,0,4)$_POST['rubrik1']
$rubrik = $_POST['rubrik1'] . $_POST['rubrik2'];
//print "***" . $rubrik . "***";
//$text = $_POST['text'];
//$text = htmlentities($_POST['text'], ENT_COMPAT);
//$text = htmlspecialchars($_POST['text'], ENT_QUOTES);//även enkelfnuttar
#$text = htmlentities(htmlspecialchars($_POST['text'], ENT_NOQUOTES));//även enkelfnuttar
#$text = htmlentities($_POST['text']);//även enkelfnuttar
$text = htmlspecialchars($_POST['text'], ENT_NOQUOTES);//även enkelfnuttar
/*
david at gislaved dot net
13-Sep-2000 07:49
To replace the swedish characters...
$s=ereg_replace(197, "Å",$s);
$s=ereg_replace(196, "Ä",$s);
$s=ereg_replace(214, "Ö",$s);
$s=ereg_replace(229, "å",$s);
$s=ereg_replace(228, "ä",$s);
$s=ereg_replace(246, "ö",$s);
Marcel
*/
$lan = $_POST['lan'];
$land = $_POST['land'];
//$ort = ucwords(strtolower($_POST['ort']));//först görs strängen om till små bokstäver och sedan görs den nya strängen om så att första bokstaven blir stor i varje ord
#$ort = htmlentities(ucwords(strtolower(htmlspecialchars($_POST['text'], ENT_NOQUOTES))));//gör om html till text sedan först görs strängen om till små bokstäver och sedan görs den nya strängen om så att första bokstaven blir stor i varje ord
$ort = ucwords(strtolower(htmlspecialchars($_POST['ort'], ENT_NOQUOTES)));//gör om html till text sedan först görs strängen om till små bokstäver och sedan görs den nya strängen om så att första bokstaven blir stor i varje ord
$kon = $_POST['kon'];
$fodd = $_POST['fodd'];
$status = $_POST['status'];//nytt 20070426 början
$typrel = $_POST['typrel'];
$laggning = htmlspecialchars($_POST['laggning'], ENT_NOQUOTES);
$barn = $_POST['barn'];
$villbarn = $_POST['villbarn'];
$arbete = htmlspecialchars($_POST['arbete'], ENT_NOQUOTES);
$flyttbar = htmlspecialchars($_POST['flyttbar'], ENT_NOQUOTES);
$religion = htmlspecialchars($_POST['religion'], ENT_NOQUOTES);
$roker = $_POST['roker'];
$alkohol = $_POST['alkohol'];
$droger = $_POST['droger'];
$harfarg = htmlspecialchars($_POST['harfarg'], ENT_NOQUOTES);
$vikt = htmlspecialchars($_POST['vikt'], ENT_NOQUOTES);
$langd = htmlspecialchars($_POST['langd'], ENT_NOQUOTES);
$musik = htmlspecialchars($_POST['musik'], ENT_NOQUOTES);
$fritiden = $_POST['fritiden'];
$personlighet = htmlspecialchars($_POST['personlighet'], ENT_NOQUOTES);
$mat = $_POST['mat'];
$annat = htmlspecialchars($_POST['annat'], ENT_NOQUOTES);//nytt 20070426 slut
$epost = $_POST['epost'];
$signatur = $_POST['signatur'];
$aktiv = $_POST['aktiv'];
//$bild = $_FILES['bilddata']['name'];
$bild = $_FILES['frm_file']['name'];
$bildtyp = $_FILES['bilddata']['type'];
$bildstorlek = $_FILES['bilddata']['size'];
$ip = $_SERVER['REMOTE_ADDR'];//sätter ip-adressen
$medlemsID = $_SESSION['losen']['medlemsID'];
$aktiv="on";
echo "";
echo "" . $_SESSION['sprak']['2418'] . " ";//Txt: profilen är inlagd
if (($_FILES['frm_file']['tmp_name'])==""){//om ingen bild är bläddrad efter
echo $_SESSION['sprak']['2419'];//TXT: Ingen bild är upplagd. Bild kan läggas upp senare. I 'Frågor och svar' finns mer info om hur du ska göra.
}
if(is_uploaded_file($_FILES['frm_file']['tmp_name'])) {
if (in_array($_FILES['frm_file']['type'], $allowed_types)) {
$check_filename = "true";
}
else
{
echo " " . $_SESSION['sprak']['2420'] . " ";//Txt: Felmeddelande: Något gick fel vid uppladdning av bild
echo $_SESSION['sprak']['2421'] . " ";//Txt: Endast bilder av formaten GIF, JPEG och PNG kan laddas upp.
$check_filename = "false";
}
if ($_FILES['frm_file']['size'] > $max_file_size) {
if ($check_filename =="true"){
echo " " . $_SESSION['sprak']['2420'] . " ";//Txt: Felmeddelande: Något gick fel vid uppladdning av bild
}
echo $_SESSION['sprak']['2422'] . " " . round($max_file_size / 1024) . " kB. " . $_SESSION['sprak']['2423'] . " "; //Txt1: Filen kan vara max Txt2: Den fil du försökte lägga upp är för stor.
$check_filesize = "false";
}
else
{
$check_filesize = "true"; //om filstorleken inte är för stor är den inte för stor=true
}
if($check_filename == "true" && $check_filesize == "true") {
If (file_exists("kontaktbilder/".$bild)) {//kollar så ingen laddat upp fil med samma namn
echo " " . $_SESSION['sprak']['2420'] . " ";//Txt: Felmeddelande: Något gick fel vid uppladdning av bild
echo $_SESSION['sprak']['2424'] . " " . $bild="";//Txt: En bild finns redan uppladdad med samma namn som den du försökte ladda upp. Döp om bilden och försök igen.
$bildkoll = "false";//tog en parameter i högen för att få fram felmeddelandet nedan.
}else{
move_uploaded_file($_FILES['frm_file']['tmp_name'], $dest_dir.$_FILES['frm_file']['name']);
//här vill jag lägga in en förminskning-------------------------------------
//move_uploaded_file($_FILES['frm_file']['tmp_name'], $dest_dir2.$_FILES['frm_file']['name']);
if (!copy($dest_dir.$_FILES['frm_file']['name'], $dest_dir2.$_FILES['frm_file']['name'])) {//kopierar men om det inte gick så skriver den felmeddelande istället
/*if (!copy($bigdir.$file['file']['name'], $dir.$file['file']['name'])) */
echo " ERROR: Failed to copy $file...\n ";
}else{
//http://www.phpportalen.net/viewtopic.php?t=80886&highlight=thumbnail <---kolla denna annars
//createthumb($dest_dir2.$_FILES['frm_file']['name'], $height, $width, $ext);
//createthumb($dest_dir2, $_FILES['frm_file']['name'], "100", "100", "jpg");
//createthumb($dest_dir2.$_FILES['frm_file']['name'], "arne", "100", "100", "jpg");
//function createthumb($name,$filename,$new_w,$new_h,$type){
//$system=explode('.',$name);
//print "0034" . $_FILES['frm_file']['type'] . "0034";
$name = $dest_dir2.$_FILES['frm_file']['name'];
//print "0032" . $name;
$filename = $dest_dir2.$_FILES['frm_file']['name'];
$new_w = "110";
$new_h = "110";
$type = $_FILES['frm_file']['type'];
//print "0031" . $_FILES['type'] . "0031";
if ($type == "image/jpg" || $type == "image/jpeg"){
//print "0035";
$src_img=imagecreatefromjpeg($name);
}
if ($type == "image/png"){
//print "0036";
$src_img=imagecreatefrompng($name);
}
if ($type == "image/gif"){
//print "0037";
$src_img=imagecreatefromgif($name);
}
$old_x=imageSX($src_img);
$old_y=imageSY($src_img);
if ($old_x > $old_y) {
$thumb_w=$new_w;
$percent = ($new_w * 100) / $old_x;
$thumb_h = ($percent * $old_y) / 100;
}
if ($old_x < $old_y) {
$percent = ($new_h * 100) / $old_y;
$thumb_w = ($percent * $old_x) / 100;
$thumb_h=$new_h;
}
if ($old_x == $old_y) {
$thumb_w=$new_w;
$thumb_h=$new_h;
}
$dst_img=ImageCreateTrueColor($thumb_w,$thumb_h);
imagecopyresampled($dst_img,$src_img,0,0,0,0,$thumb_w,$thumb_h,$old_x,$old_y);
if ($type == "image/png") {
imagepng($dst_img,$filename);
}
if ($type == "image/gif") {
imagegif($dst_img,$filename);
}
if ($type == "image/jpg" || $type == "image/jpeg"){
imagejpeg($dst_img,$filename);
}
imagedestroy($dst_img);
imagedestroy($src_img);
//}//funktionslut
}//slut kopiering av bild och omvandling till tumnagel 20070522
echo $_SESSION['sprak']['2447'] . " ( {$_FILES['frm_file']['name']} ) " . $_SESSION['sprak']['2425'] . " "; //Txt1: Bildfilen Txt2: är uppladdad.
echo $_SESSION['sprak']['2426'] . ": {$_FILES['frm_file']['size']} ";//Txt: Storlek i bytes
echo $_SESSION['sprak']['2427'] . ": " .$_FILES['frm_file']['type'];//Txt: Filtyp
}
}
}
if($check_filename == "false" or $check_filesize == "false" or $bildkoll=="false"){
echo " " . $_SESSION['sprak']['2428'] . " " . $_SESSION['sprak']['2429'] . " ";//Ttxt1: Ingen bild uppladdad. Txt2: I 'Frågor och svar' finns mer info om hur man gör för att i efterhand lägga upp bild.
$bild="";//om bild inte kan laddas upp ska bildfilens namn ej sparas i kontak.
}
//echo $check_filename;
//echo $check_filesize;
//$kod = preg_replace('/[^0-9-a-z]/', '', $ort);//låter bara tillåtna tecken komma med
$text = preg_replace('/[^0-9a-zåäöA-ZÅÄÖ!.,:?-_€$£§ ]/', '', $text);//låter bara tillåtna tecken komma med
$ort = preg_replace('/[^0-9a-zåäöA-ZÅÄÖ!.,:?-_€$£§ ]/', '', $ort);//låter bara tillåtna tecken komma med
//if preg_match^[azåäöAZÅÄÖ09_\\.\,!? ]$i,$_GET[act]$Clean_codeTRUE
//$_GET[act]preg_replace\, ,$_GET[act]
//print $kod . "***";
$kon = $_SESSION['losen']['kon'];
$sprak = $_SESSION['losen']['sprak'];//20070819AJA, sparar språk om språk valt i inställningarna, inte om man är språklös så att säga
//skriver data till filen
$sql = "INSERT INTO kontakt (medlemsID, signatur, kon, sprak, datum, datumSek, uppdaterad, rubrik, typrel, text, lan, land, ort, fodd, status, laggning, barn, villbarn, arbete, flyttbar, religion, roker, alkohol, droger, harfarg, vikt, langd, musik, fritiden, personlighet, mat, annat, bild, aktiv, ip, visad) VALUES ('$medlemsID', '$signatur','$kon', '$sprak', '$datum', '$datumSek', '$uppdaterad', '$rubrik', '$typrel', '$text', '$lan', '$land', '$ort', '$fodd', '$status', '$laggning', '$barn', '$villbarn', '$arbete', '$flyttbar', '$religion', '$roker', '$alkohol', '$droger', '$harfarg', '$vikt', '$langd', '$musik', '$fritiden', '$personlighet', '$mat', '$annat', '$bild', '$aktiv', '$ip', '$visad')";
mysql_query($sql, $connectionstring);
$tillf = mysql_insert_id();//senaste inläst posts id-nummer sätts för att kunna visa inlagd profil
// SQL-fråga
$sql = "SELECT profilertot, profiler FROM medlem WHERE medlemsID='$medlemsID'";
// Kör fråga
$result = mysql_query($sql, $connectionstring);
//läs in från posten
while($rad = mysql_fetch_array($result)){
$profilertot = $rad['profilertot'];
$profiler = $rad['profiler'];
}
$profilertot = $profilertot+1;//räknar upp antal profiler inlagda totalt
$profiler = $profiler+1;//räknar upp antal profiler aktiva
// SQL-fråga
$sql = "UPDATE medlem SET profilertot='$profilertot', profiler='$profiler' WHERE medlemsID='$medlemsID'";
// Kör fråga
mysql_query($sql, $connectionstring);
if ($tillf !=""){
//echo "
< " . $_SESSION['sprak']['2436'] . "";//Tillbaka
}else{
if ($profilerKoll>6 AND $_SESSION['losen']['grupp'] <90 OR $_SESSION['losen']['grupp'] >100){//om man har 7 profiler och inte är admingrupp så blir det stopp här
echo "" . $_SESSION['sprak']['2437'] . "";//txt: Max 7 profiler kan läggas in
echo " " . $_SESSION['sprak']['2438'];//txt: Du kan inte lägga in fler profiler förrän du raderat en tidigare profil.
echo "