Lang switch, hir-hir

3. september 2002

Når switchene blir lange...tralala... og kulda setter inn.. tamdidam.. da sier vesle dorianfar til... æh.... scriptprogrammet sitt:

<?PHP

$adr = "index.php?hir=hirhir";

if ($boom_hash == $cpile && $boom_hash != "" && $cpile != "") {

echo "

<span class="categoryHead">publicator : </span><span class="categorySub_red">".$bename."</span>   <span class="lgrey_10px">$servLevel</span><br><img src="onepx.gif" width="1" height="4"><br>";

//echo "<span class="utilitariantext6">System-beskjed:</span>  <span class="help">Jeg jobber med brukeradmin. Ikke bruk den før denne er borte :-)</span><br>";

echo "

<br>";

$pub_user = $bename;

$prefGet = new DB_hir_hir_hir("select pref1, pref3 from user_prefs where username='$pub_user'");

$prefGet -> next_record();

$pref0 = $prefGet -> f("pref1");

$pref3 = $prefGet -> f("pref3");

echo "

";

11

11switch ($hir_control) {

//***********************************************************

//***** file treatment *****

//***********************************************************

11case "adminfilemng":

11$tool = 7;

11include("./includes_publicator/tools_n_links_admin.inc");

11include("./includes_publicator/msg.inc");

11//include("./includes_publicator/showFiles.inc");

11break;

//***********************************************************

//***** picturedumps treatment *****

//***********************************************************

11case "slett dump":

1111$sqlDelDump = new DB_hir_hir_hir("delete from picturedump where chapter_id = $chapter_id");

1111showArt($adr, $article_id, 1, $adminuser);

11break;

11case "startpicturedump":

11$check_dublett = new DB_hir_hir_hir("select pdid from picturedump where chapter_id = $chapter_id");

11$check_dublett -> next_record();

11if ($check_dublett -> f("pdid") != "") $feil = $feil . "Du kan bare ha en dump pr. kapittel";

11if (empty($feil)) {

1111$sqlRegDump = new DB_hir_hir_hir("insert into picturedump (article_id, chapter_id) values ('$article_id', '$chapter_id')");

1111$sok_id = $sqlRegDump -> link_id();

1111$pdid = mysql_insert_id($sok_id);

1111showArt($adr, $article_id, 1, $adminuser);

1111} else {

1111echo "<ul>".$feil."</ul>";

1111showArt($adr, $article_id, 1, $adminuser);

11}

11

11break;

11case "Registrer dump":

1111//testing

1111$feil = ""; //initializing error flag

1111//testing for mandatory fields

1111if (empty($pduser)) $feil = $feil . "<li>Du må fylle inn brukerkatalogen";

1111if (empty($pddirectory)) $feil = $feil . "<li>Du må fylle inn bildekatalogen";

1111//$handle=opendir("$path$pduser/$pddirectory");

1111$path = "picturedumps/";

1111if (opendir("$path$pduser/$pddirectory") == false) {

111111$errordir = $pddirectory;

111111} else {

111111$errordir = "";

1111}

1111if ($errordir != "") $feil = $feil . "<li>Katalogen $errordir finnes ikke på serveren, sjekk path";

1111if (empty($feil)) {

111111//Making the text database-safe

111111$pduser = dbIn($pduser);

111111$pddirectory = dbIn($pddirectory);

111111$pdpath = "picturedumps/";

111111updatePdump($chapter_id, path, "'".$pdpath."'");

111111updatePdump($chapter_id, directory, "'".$pddirectory."'");

111111updatePdump($chapter_id, user, "'".$pduser."'");

111111//$updateDump = new DB_hir_hir_hir("update picturedump set path = '$pdpath' and directory = '$pddirectory' and user = '$pduser' where chapter_id = $chapter_id");

111111showArt($adr, $article_id, 1, $adminuser);

111111//unset($hir_control);

1111} else {

111111//$dumpmsg = "<ul>".$feil."</ul>";

111111echo "<ul>".$feil."</ul>";

111111showArt($adr, $article_id, 1, $adminuser); //there are errors - we return to the form

1111}

11break;

//***********************************************************

//***** User treatment *****

//***********************************************************

11case "setprefrences4":

11$upd_prf = new DB_hir_hir_hir("UPDATE user_prefs SET pref4='$pref4' WHERE username='$username'");

11$username = $bename;

11$memid = "";

11$it_memid = "";

11$tool = 3;

11$msg = "Preferansene er oppdatert";

11include("./includes_publicator/tools_n_links_admin.inc");

11include("./includes_publicator/msg.inc");

11showUser($username, $memid, $it_memid);

11break;

11case "setprefrences3":

11$upd_prf = new DB_hir_hir_hir("UPDATE user_prefs SET pref3='$toolpref' WHERE username='$username'");

11$username = $bename;

11$memid = "";

11$it_memid = "";

11$tool = 3;

11$msg = "Preferansene er oppdatert";

11include("./includes_publicator/tools_n_links_admin.inc");

11include("./includes_publicator/msg.inc");

11showUser($username, $memid, $it_memid);

11break;

11case "setprefrences2":

11if ($mousepref == "y") $pref1 = "y";else $pref1 = "n";

11$upd_prf = new DB_hir_hir_hir("UPDATE user_prefs SET pref1='$pref1' WHERE username='$username'");

11$username = $bename;

11$memid = "";

11$it_memid = "";

11$tool = 3;

11$msg = "Preferansene er oppdatert";

11include("./includes_publicator/tools_n_links_admin.inc");

11include("./includes_publicator/msg.inc");

11showUser($username, $memid, $it_memid);

11break;

11case "setprefrences":

11$upd_prf = new DB_hir_hir_hir("UPDATE user_prefs SET pref2='$startpref' WHERE username='$username'");

11$username = $bename;

11$memid = "";

11$it_memid = "";

11$tool = 3;

11$msg = "Preferansene er oppdatert";

11include("./includes_publicator/tools_n_links_admin.inc");

11include("./includes_publicator/msg.inc");

11showUser($username, $memid, $it_memid);

11break;

11case "searchcall":

11$calladmin = $bename;

11$msg = "Følgende calls finnes på $searchString";

11$tool = 6;

11$rule = "where status <> 'Stengt' and (subject like '%$searchString%' or requester like '%$searchString%' or callid like '%$searchString%') order by changetime DESC";

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

1111include("./includes_publicator/buttons_callist.inc");

11}

11callist($adr, $msg, $rule, $tool, $selectedcallid);

11break;

11case "callsort":

11$calladmin = $bename;

11if ($call_filter == "1") {

1111$msg = "Alle calls i databasen, sist oppdaterte øverst";

1111$tool = 6;

1111$rule = "order by changetime DESC";

1111include("./includes_publicator/tools_n_links_admin.inc");

1111if ($pref0 == "n") {

111111include("./includes_publicator/buttons_callist.inc");

1111}

1111callist($adr, $msg, $rule, $tool, $selectedcallid);

1111} else if ($call_filter == "2") {

1111$msg = "Alle calls med status Akseptert, sist oppdaterte øverst";

1111$tool = 6;

1111$rule = "where status = 'Akseptert' order by changetime DESC";

1111include("./includes_publicator/tools_n_links_admin.inc");

1111if ($pref0 == "n") {

111111include("./includes_publicator/buttons_callist.inc");

1111}

1111callist($adr, $msg, $rule, $tool, $selectedcallid);

1111} else if ($call_filter == "3") {

1111$msg = "Alle calls med status Fikset, sist oppdaterte øverst";

1111$tool = 6;

1111$rule = "where status = 'Fikset' order by changetime DESC";

1111include("./includes_publicator/tools_n_links_admin.inc");

1111if ($pref0 == "n") {

111111include("./includes_publicator/buttons_callist.inc");

1111}

1111callist($adr, $msg, $rule, $tool, $selectedcallid);

1111} else if ($call_filter == "4") {

1111$msg = "Alle calls med status KIR (Kan Ikke Reproduseres), sist oppdaterte øverst";

1111$tool = 6;

1111$rule = "where status = 'KIR' order by changetime DESC";

1111include("./includes_publicator/tools_n_links_admin.inc");

1111if ($pref0 == "n") {

111111include("./includes_publicator/buttons_callist.inc");

1111}

1111callist($adr, $msg, $rule, $tool, $selectedcallid);

1111} else if ($call_filter == "5") {

1111$msg = "Alle stengte calls, sist oppdaterte øverst";

1111$tool = 6;

1111$rule = "where status = 'Stengt' order by changetime DESC";

1111include("./includes_publicator/tools_n_links_admin.inc");

1111if ($pref0 == "n") {

111111include("./includes_publicator/buttons_callist.inc");

1111}

1111callist($adr, $msg, $rule, $tool, $selectedcallid);

1111} else {

1111$msg = "Alle calls eid av $calladmin";

1111$tool = 6;

1111$rule = "where owner = '$calladmin' order by changetime DESC";

1111include("./includes_publicator/tools_n_links_admin.inc");

1111if ($pref0 == "n") {

111111include("./includes_publicator/buttons_callist.inc");

1111}

1111callist($adr, $msg, $rule, $tool, $selectedcallid);

11}

11break;

11case "Oppdater call":

11$calladmin = $bename;

11updateCall($callid, owner, "'".$calladmin."'");

11if ($currentstatus == "Ny") {

1111$stat_change = "Akseptert";

1111updateCall($callid, status, "'".$stat_change."'");

11}

11if ($change_status != "0") {

11updateCall($callid, status, "'".$change_status."'");

11$statuscoda = " Ny status: $change_status";

11}

11if (!empty($new_message)) {

1111$new_message = dbIn_rem($new_message);

1111$sqlRegcallmsg = new DB_hir_hir_hir("INSERT INTO pmcallmsg (callid, subject, message, author, msgtime) VALUES ('$callid', '$subject', '$new_message', '$calladmin', now())") or die(mysql_error());

1111$sok_id = $sqlRegcallmsg -> link_id();

1111$msgcallid = mysql_insert_id($sok_id);

1111$query = new DB_hir_hir_hir("UPDATE pmcall SET replies=replies+1 WHERE callid='$callid'") or die(mysql_error());

1111if ($pm_dbl == "y") {

111111$query = new DB_hir_hir_hir("SELECT * FROM pbox WHERE uname='$requester' AND pboxtype= '1'") or die(mysql_error());

111111$replybox = mysql_fetch_array($query -> query_id());

111111$theinbox = $replybox[pboxid];

111111$msgtime = time();

111111$query = new DB_hir_hir_hir("INSERT INTO pboxmessage VALUES ('', '$theinbox', '$requester', '$calladmin', 'Support-ID: $callid', '$new_message', '$msgtime', 'n')") or die(mysql_error());

1111}

11}

11

11$msg = "Call nr $callid er oppdatert.$statuscoda";

11$tool = 6;

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_callist.inc");

1111}

11callist($adr, $msg, $rule, $tool, $selectedcallid);

11break;

11case "editcall":

11$calladmin = $bename;

11//updateCall($callid, owner, "'".$calladmin."'");

11//updateCall($callid, status, "'".$callstat."'");

11$msg = "Rediger call nr: $selectedcallid";

11$tool = 6;

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_callist.inc");

1111}

11callist($adr, $msg, $rule, $tool, $selectedcallid);

11break;

11case "acceptcall":

11$calladmin = $bename;

11$callstat = "Akseptert";

11updateCall($callid, owner, "'".$calladmin."'");

11updateCall($callid, status, "'".$callstat."'");

11$msg = "Du har akseptert Call-ID: $callid. Ny status: $callstat";

11$tool = 6;

11$selectedcallid = "";

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_callist.inc");

1111}

11callist($adr, $msg, $rule, $tool, $selectedcallid);

11break;

11case "pmadm":

11$msg = "De siste 20 åpne callene i køen";

11$tool = 6;

11$rule = "where status <> 'Stengt' order by changetime DESC limit 20";

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_callist.inc");

1111}

11callist($adr, $msg, $rule, $tool, $selectedcallid);

11break;

11case "updateforumuser":

11$update_member = new DB_hir_hir_hir("update member set status='$ch_forumuserlevel' where username = '$username'");

11$msg = "Brukeren ' $username ' er oppdatert";

11$tool = 4;

11$adminuser = $bename;

11userlist_anonymous($adr, $msg, $rule, $tool);

11break;

11case "gradeuserlevel":

11if ($new_userlevel == "1") {

1111$extlevel = "Boomdesign";

1111$prms = "viewer,user";

1111} else if ($new_userlevel == "2") {

1111$extlevel = "Boomdesign +";

1111$prms = "viewer,user,author";

1111$update_prefs = new DB_hir_hir_hir("update member_data set upgrade='n' where username = '$the_user'");

1111} else if ($new_userlevel == "3") {

1111$extlevel = "Boomdesign ++";

1111$prms = "viewer,user,author,editor";

1111} else {

1111$extlevel = "Boomdesign +++";

1111$prms = "viewer,user,author,editor,admin";

11}

11$update_auth = new DB_hir_hir_hir("update member set userlevel='$extlevel' where username = '$the_user'");

11$update_ext = new DB_hir_hir_hir("update member_data set userlevel='$extlevel' where username = '$the_user'");

11//updateUser($memid, userlevel, "'".$extlevel."'");

11$msg = "Brukeren ' $the_user ' har fått nytt Publicator-nivå: $extlevel";

11$tool = 4;

11$adminuser = $bename;

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_userlist.inc");

11}

11userlist($adr, $msg, $rule, $tool, $adminuser);

11break;

11case "levelusersort":

11$tool = 4;

11if ($user_filter == "Alle") {

11$msg = "Alle brukerne på boomdesign.no, alfabetisk på etternavn";

11$rule = "order by lastname";

11$adminuser = $bename;

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_userlist.inc");

11}

11userlist($adr, $msg, $rule, $tool, $adminuser);

11} else if ($user_filter == "24h") {

11$now = time();

11$then = time() - 86400;

11$msg = "Brukere registrert siste 24 timer, nyeste øverst";

11$rule = "where regtime > '$then' order by regtime desc";

11$adminuser = $bename;

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_userlist.inc");

11}

11userlist($adr, $msg, $rule, $tool, $adminuser);

11} else if ($user_filter == "1w") {

11$now = time();

11$then = time() - (86400*7);

11$msg = "Brukere registrert siste 7 dager, nyeste øverst";

11$rule = "where regtime > '$then' order by regtime desc";

11$adminuser = $bename;

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_userlist.inc");

11}

11userlist($adr, $msg, $rule, $tool, $adminuser);

11} else if ($user_filter == "Boomdesign") {

11$msg = "Alle brukerne på boomdesign.no med brukernivå Boomdesign, alfabetisk på etternavn";

11$rule = "where userlevel = 'Boomdesign' order by lastname";

11$adminuser = $bename;

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_userlist.inc");

11}

11userlist($adr, $msg, $rule, $tool, $adminuser);

11} else if ($user_filter == "Boomdesign +") {

11$msg = "Alle brukerne på boomdesign.no med brukernivå Boomdesign +, alfabetisk på etternavn";

11$rule = "where userlevel = 'Boomdesign +' order by lastname";

11$adminuser = $bename;

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_userlist.inc");

11}

11userlist($adr, $msg, $rule, $tool, $adminuser);

11} else if ($user_filter == "Boomdesign ++") {

11$msg = "Alle brukerne på boomdesign.no med brukernivå Boomdesign ++, alfabetisk på etternavn";

11$rule = "where userlevel = 'Boomdesign ++' order by lastname";

11$adminuser = $bename;

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_userlist.inc");

11}

11userlist($adr, $msg, $rule, $tool, $adminuser);

11} else if ($user_filter == "Boomdesign +++") {

11$msg = "Alle brukerne på boomdesign.no med brukernivå Boomdesign +++, alfabetisk på etternavn";

11$rule = "where userlevel = 'Boomdesign +++' order by lastname";

11$adminuser = $bename;

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_userlist.inc");

11}

11userlist($adr, $msg, $rule, $tool, $adminuser);

11} else if ($user_filter == "Vil oppgraderes") {

11$msg = "Alle brukerne på boomdesign.no som vil oppgraderes, alfabetisk på etternavn";

11$rule = "where upgrade = 'y' order by lastname";

11$adminuser = $bename;

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_userlist.inc");

11}

11userlist($adr, $msg, $rule, $tool, $adminuser);

11} else {

11$msg = "Alle anonyme brukere, alfabetisk på etternavn";

11$rule = "where userlevel = 'Anonymous' order by username";

11userlist_anonymous($adr, $msg, $rule, $tool);

11}

11break;

11case "adminsearchuser":

11$msg = "Følgende brukere ble funnet på ' $searchString ', sortert alfabetisk på etternavn";

11$tool = 4;

11$rule = "where (username like '%$searchString%' or firstname like '%$searchString%' or lastname like '%$searchString%' or email like '%$searchString%' or company like '%$searchString%') order by lastname";

11$adminuser = $bename;

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_userlist.inc");

11}

11userlist($adr, $msg, $rule, $tool, $adminuser);

11break;

11case "adminuserlist":

11$msg = "De 20 siste registrerte brukerne, nyeste øverst";

11$tool = 4;

11$rule = "order by regtime DESC limit 20";

11$adminuser = $bename;

11include("./includes_publicator/tools_n_links_admin.inc");

11if ($pref0 == "n") {

111111include("./includes_publicator/buttons_userlist.inc");

11}

11userlist($adr, $msg, $rule, $tool, $adminuser);

11break;

11case "adminedituserdata":

11$thisuser = $bename;

11$listUserdata = new DB_hir_hir_hir("select * from member_data where memid = '$memid'");

11$listUserdata -> next_record();

11if ($listUserdata == "") {

1111echo "";

1111} else {

11$memid = $listUserdata -> f("memid");

11$username = $listUserdata -> f("username");

11$userlevel = $listUserdata -> f("userlevel");

11$firstname = $listUserdata -> f("firstname");

11$lastname = $listUserdata -> f("lastname");

11$address = $listUserdata -> f("address");

11$zip = $listUserdata -> f("zip");

11$city = $listUserdata -> f("city");

11$email = $listUserdata -> f("email");

11$phone = $listUserdata -> f("phone");

11$company = $listUserdata -> f("company");

11$mobile = $listUserdata -> f("mobile");

11$regtime = $listUserdata -> f("regtime");

11$regtime = date("d.m - Y G:i:s", $regtime);

11$picture_id = $listUserdata -> f("picture_id");

11$member_id = $listUserdata -> f("member_id");

11$listforumUserdata = new DB_hir_hir_hir("select status from member where username = '$username'");

11$listforumUserdata -> next_record();

11$status = $listforumUserdata -> f("status");

11//$regtime = time_fix($regtime);

11$tool = 4;

11$msg = "Rediger brukerdata for $username";

11include("./includes_publicator/tools_n_links_admin.inc");

11include("./includes_publicator/msg.inc");

11include("./includes_publicator/frmEditUser_admin.inc");

1111//echo "<br>Brukerinfo<br>$username<br>$userlevel<br>$firstname<br>$lastname";

11}

11break;

11case "Oppdater brukeren":

11$feil = "";

1111if ($pic != "none") {

11111111$imagehw = GetImageSize($pic);

11111111$imagewidth = $imagehw[0];

11111111$imageheight = $imagehw[1];

11111111$imgorig = $imagewidth;

11111111if ($imagewidth > "200") {

11111111

1111111111$feil = $feil . "<li>Bildet er for bredt. Bildet bør ikke være over 200 pixler bredt - ditt er $imagewidth px. Størrelse på brukerbildene er 75 x 100 px. Resize og prøv på nytt";

11111111}

111111} else {

1111$feil = "";

1111}

1111if (empty($email)) {

111111$feil = $feil. "<li>Email må fylles inn";

1111} else {

111111if (!eregi ("^([a-z0-9_]|-|.)+@(([a-z0-9_]|-)+.)+[a-z]{2,4}$" , $email)) $feil = "<li>Emailadressen er ikke gyldig";

1111}

1111if (empty($firstname)) $feil = $feil. "<li>Fornavn må fylles inn";

1111if (empty($lastname)) $feil = $feil. "<li>Etternavn må fylles inn";

1111if (empty($company)) $feil = $feil. "<li>Arbeidssted må fylles inn";

1111if (empty($address)) $feil = $feil. "<li>Arbeidsadresse må fylles inn";

1111if (empty($zip)) $feil = $feil. "<li>Postnummer må fylles inn";

1111if (empty($city)) $feil = $feil. "<li>Poststed må fylles inn";

1111if (empty($phone)) $feil = $feil. "<li>Telefon arbeid må fylles inn";

1111

1111if ($feil == "") {

111111//Text is made clean for the database

111111$firstname = dbInsans($firstname);

111111$lastname = dbInsans($lastname);

111111$address = dbInsans($address);

111111$zip = dbInsans($zip);

111111$city = dbInsans($city);

111111$email = dbInsans($email);

111111$phone = dbInsans($phone);

111111$company = dbInsans($company);

111111$mobile = dbInsans($mobile);

111111if ($pic != "none") {

11111111//echo $pic;

11111111$owner = $username;

11111111$virtual_cat = 5;

11111111$imagehw = GetImageSize($pic);

11111111$imagewidth = $imagehw[0];

11111111$imageheight = $imagehw[1];

11111111$imgorig = $imagewidth;

11111111if ($imagewidth > "75") {

11111111 11$imageprop=(75*100)/$imagewidth;

1111111111$imagevsize=($imageheight*$imageprop)/100 ;

1111111111$imagewidth=75;

1111111111$imageheight=ceil($imagevsize);

1111111111$rezmsg = "<br>Bildet var for stort, og har blitt resizet til 75x100px.";

11111111}

11111111$data = addslashes(fread(fopen($pic, "rb"), filesize($pic)));

11111111if ($org_picture_id == 0) {

1111111111$sqlRegPic = new DB_hir_hir_hir ("insert into picture (file, picture_name, file_type, width, height, virtual_cat, owner) values ('$data', '$pic_name', '$pic_type', '$imagewidth', '$imageheight', '$virtual_cat', '$owner')");

1111111111$sok_id = $sqlRegPic -> link_id();

1111111111$picture_id = mysql_insert_id($sok_id);

1111111111updateUser($memid, picture_id, "'".$picture_id."'");

1111111111} else {

1111111111updatePicture($picture_id, file, "'".$data."'");

1111111111updatePicture($picture_id, picture_name, "'".$pic_name."'");

1111111111updatePicture($picture_id, file_type, "'".$pic_type."'");

11111111}

111111} else if ($pic != "none" && $org_picture_id == 0) {

11111111$picture_id = 0;

111111} else {

11111111$picture_id = $org_picture_id;

111111}

1111if ($rempic == "y") {

11111111$picture_id = 0;

11111111updateUser($memid, picture_id, "'".$picture_id."'");

11111111}

1111if ($firstname != $org_firstname) {

11111111updateUser($memid, firstname, "'".$firstname."'");

11111111}

1111if ($lastname != $org_lastname) {

11111111updateUser($memid, lastname, "'".$lastname."'");

11111111}

1111if ($address != $org_address) {

11111111updateUser($memid, address, "'".$address."'");

11111111}

1111if ($zip != $org_zip) {

11111111updateUser($memid, zip, "'".$zip."'");

11111111}

1111if ($city != $org_city) {

11111111updateUser($memid, city, "'".$city."'");

11111111}

1111if ($email != $org_email) {

11111111updateUser($memid, email, "'".$email."'");

11111111}

1111if ($phone != $org_phone) {

11111111updateUser($memid, phone, "'".$phone."'");

11111111}

1111if ($company != $org_company) {

11111111updateUser($memid, company, "'".$company."'");

11111111}

1111if ($mobile != $org_mobile) {

11111111updateUser($memid, mobile, "'".$mobile."'");

11111111}

1111//$rule = "order by regtime DESC limit 20";

1111if ($ch_forumuserlevel != "none") {

111111$update_forumlevel = new DB_hir_hir_hir("update member set status='$ch_forumuserlevel' where username = '$username'");

1111}

1111$tool = 4;

1111$msg = $msg . "Brukerinformasjonen er oppdatert!$rezmsg";

1111$adminuser = $bename;

1111include("./includes_publicator/tools_n_links_admin.inc");

1111if ($pref0 == "n") {

111111include("./includes_publicator/buttons_userlist.inc");

1111}

1111userlist($adr, $msg, $rule, $tool, $adminuser);

1111} else {

1111$msg = "<ul class="msg"><li>Feil:".$feil."</ul>";

1111$tool = 4;

1111//$msg = "Rediger brukerdata";

1111include("./includes_publicator/tools_n_links_admin.inc");

1111include("./includes_publicator/msg.inc");

1111include("./includes_publicator/frmEditUser_admin.inc");

1111//echo "<br>Brukerinfo<br>$username<br>$userlevel<br>$firstname<br>$lastname";

11}

11//}

111111

11break;

11case "admineditpublicuser":

11$thisuser = $bename;

11$listPubUserdata = new DB_hir_hir_hir("select * from member where username = '$username'");

11$listPubUserdata -> next_record();

11if ($listPubUserdata == "") {

1111echo "";

1111} else {

11$it_uid = $listPubUserdata -> f("uid");

11$username = $listPubUserdata -> f("username");

11$status = $listPubUserdata -> f("status");

11$email = $listPubUserdata -> f("email");

11$company = $listPubUserdata -> f("company");

11$it_memid = $listPubUserdata -> f("it_memid");

11$phone = $listPubUserdata -> f("phone");

11$location = $listPubUserdata -> f("location");

11$sig = $listPubUserdata -> f("sig");

11$regdate = $listPubUserdata -> f("regdate");

11$regdate = date("d.m - Y", $regdate);

11$picture_id = $listPubUserdata -> f("picture_id");

11$tool = 4;

11$msg = "Rediger brukerdata for anonym bruker: $username";

11include("./includes_publicator/tools_n_links_admin.inc");

11include("./includes_publicator/msg.inc");

11include("./includes_publicator/frmEditPubUser_admin.inc");

1111//echo "<br>Brukerinfo<br>$username<br>$userlevel<br>$firstname<br>$lastname";

11}

11break;

11case "Oppdater anonym bruker":

111111//Text is made clean for the database

1111$phone = dbInsans($phone);

1111$email = dbInsans($email);

1111$company = dbInsans($company);

1111$location = dbInsans($location);

1111$sig = dbInsans($sig);

1111if ($nopic == "y") {

11111111$picture_id = 0;

11111111updateForumUser($it_uid, picture_id, "'".$picture_id."'");

11111111}

1111if ($email != $org_email) {

11111111updateForumUser($it_uid, email, "'".$email."'");

11111111}

1111if ($company != $org_company) {

11111111updateForumUser($it_uid, company, "'".$company."'");

11111111}

1111if ($phone != $org_phone) {

11111111updateForumUser($it_uid, phone, "'".$phone."'");

11111111}

1111if ($location != $org_location) {

11111111updateForumUser($it_uid, location, "'".$location."'");

11111111}

1111if ($sig != $org_sig) {

11111111updateForumUser($it_uid, sig, "'".$sig."'");

11111111}

1111$tool = 4;

1111$msg = $msg . "Brukerinformasjonen er oppdatert!";

1111$adminuser = $bename;

1111userlist_anonymous($adr, $msg, $rule, $tool);;

1111

11break;

11case "adminmailer":

11$adressee = $email;

11$msg = $msg . "Mail til bruker: $username. For å legge til flere brukere, velg alfabetisk på email på siden. Brukerne skal være kommaseparert i Til-feltet.";

11//include("./includes_publicator/tools_n_links_admin.inc");

11//include("./includes_publicator/msg.inc");

11include("./includes_publicator/frmMail_admin.inc");

11break;

11case "Send mail":

11$feil = "";

11$thisuser = $bename;

11if ($adressee == "") $feil = $feil ."<li>Du må ha med en adressat";

11if ($subject == "") $feil = $feil ."<li>Du må ha en overskrift";

11if ($bodylang == "") $feil = $feil ."<li>Du skal vel ha en tekst??";

11if (empty($feil)) {

1111$admindata = new DB_hir_hir_hir("select firstname, lastname, email from member_data where username = '$thisuser'");

1111$admindata -> next_record();

1111$adminfirstname = $admindata -> f("firstname");

1111$adminlastname = $admindata -> f("lastname");

1111$adminemail = $admindata -> f("email");

1111$adressee = dbIn($adressee);

1111$subject = dbIn($subject);

1111$bodylang = dbIn($bodylang);

1111$message = $bodylang;

1111$to = $adressee;

1111$from = "$adminemail";

1111$from_name = "$adminfirstname $adminlastname";

1111mail($to, $subject, $message, "From: ".$from_name." <".$from.">");

1111$tool = 4;

1111$msg = $msg . "Mailen til brukerne er sendt";

1111include("./includes_publicator/tools_n_links_admin.inc");

1111if ($pref0 == "n") {

111111include("./includes_publicator/buttons_userlist.inc");

1111}

1111userlist($adr, $msg, $rule, $tool, $adminuser);

1111} else {

1111$tool = 4;

1111$msg = "<ul class="msg"><li>Feil:".$feil."</ul>";

1111include("./includes_publicator/frmMail_admin.inc");

11}

11break;

11case "autopass":

1111$thisuser = $bename;

1111$admindata = new DB_hir_hir_hir("select firstname, lastname, email from member_data where username = '$thisuser'");

1111$admindata -> next_record();

1111$adminfirstname = $admindata -> f("firstname");

1111$adminlastname = $admindata -> f("lastname");

1111$adminemail = $admindata -> f("email");

1111// update member_data

1111srand((double)microtime()*1000000);

1111$gen_pass = substr(md5(rand(0,9999999)), 0, 8);

1111$mail_pass = $gen_pass;

1111$autopasswd = md5($gen_pass);

1111$username = $formuser;

1111updateUserbyname ($username, password, "'".$autopasswd."'");

1111$to = $email;

1111$subject = "Nytt passord på boomdesign.no";

1111$message = "$firstname $lastname:nDu har fått nytt passord på boomdesign.nonnDet nye passordet er: $mail_passnDu kan bytte passord neste gang du logger inn, dette gjøres i skjemaet der du oppdaterer den private info'en (i Publicator).nnVennligst gi beskjed til meg eller en annen administrator hvis du fremdeles har problemer med login.nnVennlig hilsen:n$adminfirstname $adminlastnamenAdministrator, boomdesign.no (Boomdesign +++)nnn________________________________________________nAutomail: Publicator v.2.7c boomdesign.no";

11

1111$from = "[email protected]";

1111$from_name = "$adminfirstname $adminlastname";

1111mail($to, $subject, $message, "From: ".$from_name." <".$from.">");

1111$tool = 4;

1111$msg = $msg . "Passordet for $username er byttet og email er sendt med beskjed til brukeren på $email";

1111include("./includes_publicator/tools_n_links_admin.inc");

1111if ($pref0 == "n") {

111111include("./includes_publicator/buttons_userlist.inc");

1111}

1111userlist($adr, $msg, $rule, $tool, $adminuser);

11break;

11case "newpass":

11$hashpass1 = $HTTP_POST_VARS['hashpass1'];

11$hashpass2 = $HTTP_POST_VARS['hashpass2'];

11$username = $HTTP_POST_VARS['username'];

11$thisname = $bename;

11//if ($username != $thisname) $feil = $feil . "<li>Du har ikke rettigheter til dette!";

11if ($hashpass1 != $hashpass2) $feil = $feil ."<li>Du skrev to forskjellige passord";

11if ($feil == "") {

1111//$navaddon = "<span class="categoryHead">:</span> <span class="categorySub">profil</span>";

1111$msg = "Bekreft passordbytte";

1111$tool = 3;

1111//page_header(strtolower($navaddon), $themsg, $memcount, $postcount, $onlinecount, $userstatus, $logonlinecount, $lastreg);

1111include("./includes_publicator/tools_n_links_admin.inc");

1111include("./includes_publicator/msg.inc");

1111verfiypass($hashpass1, $hashpass2, $username, $thisname, $feil);

1111} else {

1111$msg = "<ul><li>Feil:".$feil."</ul>";

1111$tool = 3;

1111include("./includes_publicator/tools_n_links_admin.inc");

1111include("./includes_publicator/msg.inc");

1111verfiypass($hashpass1, $hashpass2, $username, $thisname, $feil);

11}

11break;

11case "Bekreft":

11$hashpass1 = $HTTP_POST_VARS['hashpass1'];

11$query = new DB_hir_hir_hir("UPDATE member SET password='$hashpass1' WHERE username='$username'") or die(mysql_error());

11echo "<br><br><br><br><br><br><br>          <span class="tdHead">Oppdaterer passord for $username...</span>  <img src="includes_forum/images/user_insider.gif" width="16" height="16" border="0" alt="Boomdesign" align="center">";

11slowjump("index.boom?user_control=publogin");

11break;

11case "editpublicuserdata":

11$username = $bename;

11

11$listPublicdata = new DB_hir_hir_hir("select * from member where username = '$username'");

11$listPublicdata -> next_record();

11if ($listPublicdata == "") {

1111echo "";

1111} else {

11$it_memid = $listPublicdata -> f("it_memid");

11$it_uid = $listPublicdata -> f("uid");

11$username = $listPublicdata -> f("username");

11$status = $listPublicdata -> f("status");

11$femail = $listPublicdata -> f("email");

11$firma = $listPublicdata -> f("company");

11$pphone = $listPublicdata -> f("phone");

11$location = $listPublicdata -> f("location");

11$sig = $listPublicdata -> f("sig");

11$regdate = $listPublicdata -> f("regdate");

11$regdate = date("d.m - Y G:i:s", $regdate);

11$ppicture_id = $listPublicdata -> f("picture_id");

11//$regtime = time_fix($regtime);

11$tool = 3;

11$msg = "Rediger offentlige brukerdata";

11include("./includes_publicator/tools_n_links_admin.inc");

11include("./includes_publicator/msg.inc");

11include("./includes_publicator/frmEditPublicUser_author.inc");

1111//echo "<br>Brukerinfo<br>$username<br>$userlevel<br>$firstname<br>$lastname";

11}

11break;

11case "listdata":

11$username = $bename;

11$memid = "";

11$it_memid = "";

11$tool = 3;

11$msg = "Alle data registrert på deg i databasen";

11include("./includes_publicator/tools_n_links_admin.inc");

11include("./includes_publicator/msg.inc");

11showUser($username, $memid, $it_memid);

11

11break;

11case "edituserdata":

11$thisuser = $bename;

11$listUserdata = new DB_hir_hir_hir("select * from member_data where username = '$thisuser'");

11$listUserdata -> next_record();

11if ($listUserdata == "") {

1111echo "";

1111} else {

11$memid = $listUserdata -> f("memid");

11$username = $listUserdata -> f("username");

11$userlevel = $listUserdata -> f("userlevel");

11$firstname = $listUserdata -> f("firstname");

11$lastname = $listUserdata -> f("lastname");

11$address = $listUserdata -> f("address");

11$zip = $listUserdata -> f("zip");

11$city = $listUserdata -> f("city");

11$email = $listUserdata -> f("email");

11$phone = $listUserdata -> f("phone");

11$company = $listUserdata -> f("company");

11$mobile = $listUserdata -> f("mobile");

11$regtime = $listUserdata -> f("regtime");

11$regtime = date("d.m - Y G:i:s", $regtime);

11$picture_id = $listUserdata -> f("picture_id");

11//$regtime = time_fix($regtime);

11$tool = 3;

11$msg = "Rediger brukerdata";

11include("./includes_publicator/tools_n_links_admin.inc");

11include("./includes_publicator/msg.inc");

11include("./includes_publicator/frmEditUser_author.inc");

1111//echo "<br>Brukerinfo<br>$username<br>$userlevel<br>$firstname<br>$lastname";

11}

11break;

11case "Oppdater bruker":

11$feil = "";

1111if ($pic != "none") {

11111111$imagehw = GetImageSize($pic);

11111111$imagewidth = $imagehw[0];

11111111$imageheight = $imagehw[1];

11111111$imgorig = $imagewidth;

11111111if ($imagewidth > "200") {

11111111

1111111111$feil = $feil . "<li>Bildet er for bredt. Bildet bør ikke være over 200 pixler bredt - ditt er $imagewidth px. Størrelse på brukerbildene er 75 x 100 px. Resize og prøv på nytt";

11111111}

111111} else {

111111$feil = "";

1111}

1111if (empty($email)) {

111111$feil = $feil. "<li>Email må fylles inn";

1111} else {

111111if (!eregi ("^([a-z0-9_]|-|.)+@(([a-z0-9_]|-)+.)+[a-z]{2,4}$" , $email)) $feil = "<li>Emailadressen er ikke gyldig";

1111}

1111if (empty($firstname)) $feil = $feil. "<li>Fornavn må fylles inn";

1111if (empty($lastname)) $feil = $feil. "<li>Etternavn må fylles inn";

1111if (empty($address)) $feil = $feil. "<li>Postadresse må fylles inn";

1111if (empty($zip)) $feil = $feil. "<li>Postnummer må fylles inn";

1111if (empty($city)) $feil = $feil. "<li>Poststed må fylles inn";

1111if (empty($phone)) $feil = $feil. "<li>Telefon må fylles inn";

1111

1111if ($feil == "") {

111111//Text is made clean for the database

111111$firstname = dbInsans($firstname);

111111$lastname = dbInsans($lastname);

111111$address = dbInsans($address);

111111$zip = dbInsans($zip);

111111$city = dbInsans($city);

111111$email = dbInsans($email);

111111$phone = dbInsans($phone);

111111$company = dbInsans($company);

111111$mobile = dbInsans($mobile);

111111if ($pic != "none") {

11111111//echo $pic;

11111111$owner = $bename;

11111111$virtual_cat = 5;

11111111$imagehw = GetImageSize($pic);

11111111$imagewidth = $imagehw[0];

11111111$imageheight = $imagehw[1];

11111111$imgorig = $imagewidth;

11111111if ($imagewidth > "75") {

11111111 11$imageprop=(75*100)/$imagewidth;

1111111111$imagevsize=($imageheight*$imageprop)/100 ;

1111111111$imagewidth=75;

1111111111$imageheight=ceil($imagevsize);

1111111111$rezmsg = "<br>Bildet var for stort, og har blitt resizet til 75x100px.";

11111111}

11111111$data = addslashes(fread(fopen($pic, "rb"), filesize($pic)));

11111111if ($org_picture_id == 0) {

1111111111$sqlRegPic = new DB_hir_hir_hir ("insert into picture (file, picture_name, file_type, width, height, virtual_cat, owner) values ('$data', '$pic_name', '$pic_type', '$imagewidth', '$imageheight', '$virtual_cat', '$owner')");

1111111111$sok_id = $sqlRegPic -> link_id();

1111111111$picture_id = mysql_insert_id($sok_id);

1111111111updateUser($memid, picture_id, "'".$picture_id."'");

1111111111} else {

1111111111updatePicture($picture_id, file, "'".$data."'");

1111111111updatePicture($picture_id, picture_name, "'".$pic_name."'");

1111111111updatePicture($picture_id, file_type, "'".$pic_type."'");

11111111}

111111} else if ($pic != "none" && $org_picture_id == 0) {

11111111$picture_id = 0;

111111} else {

11111111$picture_id = $org_picture_id;

111111}

1111if ($rempic == "y") {

11111111$picture_id = 0;

11111111updateUser($memid, picture_id, "'".$picture_id."'");

11111111}

1111if ($firstname != $org_firstname) {

11111111updateUser($memid, firstname, "'".$firstname."'");

11111111}

1111if ($lastname != $org_lastname) {

11111111updateUser($memid, lastname, "'".$lastname."'");

11111111}

1111if ($address != $org_address) {

11111111updateUser($memid, address, "'".$address."'");

11111111}

1111if ($zip != $org_zip) {

11111111updateUser($memid, zip, "'".$zip."'");

11111111}

1111if ($city != $org_city) {

11111111updateUser($memid, city, "'".$city."'");

11111111}

1111if ($email != $org_email) {

11111111updateUser($memid, email, "'".$email."'");

11111111}

1111if ($phone != $org_phone) {

11111111updateUser($memid, phone, "'".$phone."'");

11111111}

1111if ($company != $org_company) {

11111111updateUser($memid, company, "'".$company."'");

11111111}

1111if ($mobile != $org_mobile) {

11111111updateUser($memid, mobile, "'".$mobile."'");

11111111}

1111$tool = 3;

1111$msg = "Informasjonen om deg er oppdatert!$rezmsg";

1111include("./includes_publicator/tools_n_links_admin.inc");

1111include("./includes_publicator/msg.inc");

1111showUser($username, $memid, $it_memid);

1111} else {

1111$msg = "<ul><li>Feil:".$feil."</ul>";

1111$tool = 3;

1111//$msg = "Rediger brukerdata";

1111include("./includes_publicator/tools_n_links_admin.inc");

1111include("./includes_publicator/msg.inc");

1111include("./includes_publicator/frmEditUser_author.inc");

1111//echo "<br>Brukerinfo<br>$username<br>$userlevel<br>$firstname<br>$lastname";

11}

11//}

111111

11break;

11case "Oppdater bruker!":

11$feil = "";

1111if (!eregi ("^([a-z0-9_]|-|.)+@(([a-z0-9_]|-)+.)+[a-z]{2,4}$" , $femail)) $feil = "<li>Emailadressen er ikke gyldig";

1111if ($feil == "") {

111111//Text is made clean for the database

111111$femail = dbInsans($femail);

111111$location = dbInsans($location);

111111$firma = dbInsans($firma);

111111$pphone = dbInsans($pphone);

111111$sig = $sig;

111111if ($pubpic == "y") {

11111111//echo $pic;

11111111updateForumUser($it_uid, picture_id, "'".$picture_id."'");

111111}

111111if ($nopic == "y") {

11111111//echo $pic;

11111111updateForumUser($it_uid, picture_id, 0);

111111}

1111if ($femail != $org_femail) {

11111111updateForumUser($it_uid, email, "'".$femail."'");

11111111}

1111if ($location != $org_location) {

11111111updateForumUser($it_uid, location, "'".$location."'");

11111111}

1111if ($firma != $org_firma) {

11111111updateForumUser($it_uid, company, "'".$firma."'");

11111111}

1111if ($pphone != $org_pphone) {

11111111updateForumUser($it_uid, phone, "'".$pphone."'");

11111111}

1111if ($sig != $org_sig) {

11111111updateForumUser($it_uid, sig, "'".$sig."'");

11111111}

111111$tool = 3;

111111$msg = "Den offentlige informasjonen om deg er oppdatert!$rezmsg";

111111include("./includes_publicator/tools_n_links_admin.inc");

111111include("./includes_publicator/msg.inc");

111111showUser($username, $memid, $it_memid);

1111} else {

1111$msg = "<ul><li>Feil:".$feil."</ul>";

1111$tool = 3;

1111include("./includes_publicator/tools_n_links_admin.inc");

1111include("./includes_publicator/msg.inc");

1111include("./includes_publicator/frmEditPublicUser_author.inc");

1111

11}

11break;

11case "adminforumlist":

11$tool = 5;

11$msg = "Alle forum på boomdesign.no";

11include("./includes_publicator/tools_n_links_admin.inc");

11include("./includes_publicator/msg.inc");

11adminforumlist_header();

11$query = new DB_hir_hir_hir("SELECT * FROM forum ORDER BY dorder") or die(mysql_error());

111111while($forum = mysql_fetch_array($query -> query_id())) {

11111111if ($forum[forum_type] == 1) {

11111111$forum[checked] = " checked";

11111111} else {

11111111$forum[checked] = "";

111111}

111111adminforumlist_row($forum);

1111}

11adminforumlist_footer();

11break;

11case "Start forum":

11if ($name == "") $feil = "Forumet må ha et navn<br>";

11if ($dorder == "") $feil = $feil . "Du må fylle inn et nummer for sortering. Bruk det høyeste og pluss på 1<br>";

11if ($feil == "") {

111111if ($insiderforum == "y") {

11111111$insider = 1;

11111111} else {

11111111$insider = 0;

111111}

111111$query = new DB_hir_hir_hir("INSERT INTO forum VALUES ('', '$name', '$description', '$dorder', '', '', '$insider')") or die(mysql_error());

111111$tool = 5;

111111$msg = "Forumet $name er opprettet!";

111111include("./includes_publicator/tools_n_links_admin.inc");

111111include("./includes_publicator/msg.inc");

111111adminforumlist_header();

111111$query = new DB_hir_hir_hir("SELECT * FROM forum ORDER BY dorder") or die(mysql_error());

11111111while($forum = mysql_fetch_array($query -> query_id())) {

11111111adminforumlist_row($forum);

111111}

1111adminforumlist_footer();

1111} else {

1111$tool = 5;

1111$msg = $feil;

1111include("./includes_publicator/tools_n_links_admin.inc");

111111include("./includes_publicator/msg.inc");

111111adminforumlist_header();

111111$query = new DB_hir_hir_hir("SELECT * FROM forum ORDER BY dorder") or die(mysql_error());

11111111while($forum = mysql_fetch_array($query -> query_id())) {

11111111adminforumlist_row($forum);

111111}

1111adminforumlist_footer();

11}

11break;

11case "Oppdater forum":

11

11/*if ($deleteforum == "y") {

111111$query = new DB_hir_hir_hir("DELETE FROM forum WHERE fid='$fid'") or die(mysql_error());

111111

111111adminforumlist_header();

111111$query = new DB_hir_hir_hir("SELECT * FROM forum ORDER BY dorder") or die(mysql_error());

111111while($forum = mysql_fetch_array($query -> query_id())) {

111111if ($forum[forum_type] == 1) {

11111111$forum[checked] = " checked";

11111111} else {

11111111$forum[checked] = "";

111111}

11111111adminforumlist_row($forum);

111111}

1111adminforumlist_footer();

1111admin_footer();

1111} else {*/

1111

1111if ($insiderforum == "y") {

111111$insider = 1;

111111} else {

111111$insider = 0;

1111}

1111$query = new DB_hir_hir_hir("UPDATE forum SET name='$name', description='$description', forum_type='$insider' WHERE fid='$fid'") or die(mysql_error());

1111$tool = 5;

1111$msg = "Forumet $name er oppdatert!";

1111include("./includes_publicator/tools_n_links_admin.inc");

1111include("./includes_publicator/msg.inc");

1111adminforumlist_header();

1111$query = new DB_hir_hir_hir("SELECT * FROM forum ORDER BY dorder") or die(mysql_error());

111111while($forum = mysql_fetch_array($query -> query_id())) {

111111if ($forum[forum_type] == 1) {

11111111$forum[checked] = " checked";

11111111} else {

11111111$forum[checked] = "";

111111}

111111adminforumlist_row($forum);

111111}

1111adminforumlist_footer();

11break;

//***********************************************************

//***** Photochapter *****

//***********************************************************

11

11case "Flytt foto opp":

1111//Find the phid to to swap with

1111$newNr = $photo_nr - 1;

1111$photoSwap = new DB_hir_hir_hir("select phid from photo where photo_nr = $newNr and chapter_id = $chapter_id");

1111$photoSwap -> next_record();

1111$swapId = $photoSwap -> f("phid");

1111//move down

1111$movePhotoDown = new DB_hir_hir_hir("update photo set photo_nr = $photo_nr where phid = $swapId");

1111//move up

1111$movePhotoUp = new DB_hir_hir_hir("update photo set photo_nr = $newNr where phid = $phid");

1111regChangeTime($article_id);

1111$adminuser = $bename;

1111showArt($adr, $article_id, 1, $adminuser);

11break;

11case "deletephototable":

111111$tool = 1;

111111$msg = "Jeg vil slette fotovisning i kapittel:<br><span class="tdHead">'".$heading."'</span><br>Artikkel: <span class="tdHead">".$title."</span>";

111111include ("./includes_publicator/tools_n_links_admin.inc");

111111include ("./includes_publicator/msg.inc");

111111echo "

111111<table width="300" border="0" cellpadding="0" cellspacing="0">

111111<tr>

111111<td align="left" valign="top">";

111111echo "</td></tr></table><br><br>";

111111echo "<table width="435" border="0"><tr><td>";

111111echo "<form action="$adr" method="post">

111111<input name="hir_control" type="submit" value=" OK ">

111111<input name="hir_control" type="submit" value="Avbryt">

111111<input type="hidden" name="chapter_id" value="$chapter_id">

111111<input type="hidden" name="article_id" value="$article_id">

111111<input type="hidden" name="type" value="phototable">

111111<input type="hidden" name="descend" value="phototable">

111111</form></td></tr></table>";

11break;

11case "Slett foto":

1111$sPhotoNr = new DB_hir_hir_hir("select photo_nr from photo where phid = $phid");

11111111$sPhotoNr -> next_record();

11111111$photoNr = $sPhotoNr -> f("photo_nr");

11111111$delPhoto = new DB_hir_hir_hir("delete from photo where phid = $phid");

11111111//find chapters with higher numbers and reduse them by one

11111111$sPhotCh = new DB_hir_hir_hir("select phid, photo_nr from photo where chapter_id = $chapter_id and photo_nr > $photoNr");

11111111while ($sPhotCh -> next_record()) {

1111111111$sPhId = $sPhotCh -> f("phid");

1111111111$sPhotNr = $sPhotCh -> f("photo_nr");

1111111111//reduce number

1111111111$sPhotNr--;

1111111111$sJustify = new DB_hir_hir_hir("update photo set photo_nr = $sPhotNr where phid = $sPhId");

11111111}

111111regChangeTime($article_id);

111111$adminuser = $bename;

111111showArt($adr, $article_id, 1, $adminuser);

11break;

11case "Rediger foto":

1111$chkArti = new DB_hir_hir_hir("select chapter_id, article_id from photo where phid = $phid");

1111$chkArti -> next_record();

1111$article_id = $chkArti -> f("article_id");

1111$chapter_id = $chkArti -> f("chapter_id");

1111$cPhoto = new DB_hir_hir_hir("select photo_text, picture_id from photo where phid = $phid");

1111$cPhoto -> next_record();

1111$photo_text = dbEdit($cPhoto -> f("photo_text"));

1111$picture_id = $cPhoto -> f("picture_id");

1111$tool = 1;

1111include ("./includes_publicator/tools_n_links_admin.inc");

1111include ("./includes_publicator/msg.inc");

1111include ("./includes_publicator/frmEdPhotoChapter.inc");

11//}

11break;

11case "Oppdater foto";

11regChangeTime($article_id);

11if ($photo_text != $org_photo_text) {

1111//Making the text database-safe

1111$photo_text = dbIn($photo_text);

1111updatePhoto($phid, photo_text, "'".$photo_text."'");

11}

1111$adminuser = $bename;

11 showArt($adr, $article_id, 1, $adminuser);

1111

11break;

11case "startphoto":

11$newcheck = new DB_hir_hir_hir("select phid from photo where chapter_id=$chapter_id");

11$newcheck -> next_record();

11$phid = $newcheck -> f("phid");

11if ($phid != "") $feil = $feil . "<li>Du kan bare ha en fotovisning pr. kapittel";

11if (empty($feil)) {

1111$sqlRegPhoto = new DB_hir_hir_hir("insert into photo (chapter_id, article_id, photo_nr, photo_text, picture_id) values ('$chapter_id', '$article_id', '0', '', '0')");

1111$sok_id = $sqlRegPhoto -> link_id();

1111$phid = mysql_insert_id($sok_id);

1111$adminuser = $bename;

1111showArt($adr, $article_id, 1, $adminuser);

1111} else {

111111echo "<ul class="msg">".$feil."</ul>";

111111$adminuser = $bename;

111111showArt($adr, $article_id, 1, $adminuser); //there are errors - we return to the form

11}

11break;

11case "Registrer foto":

1111//testing

1111$feil = ""; //initializing error flag

1111$noPic = new DB_hir_hir_hir("select picture_name, width, height from picture where picture_id=$new_picture_id");

1111$noPic -> next_record();

1111$pname = $noPic -> f("picture_name");

1111if ($pname == "") $feil = $feil . "<li>Dette bildet finnes ikke i databasen";

1111$width = $noPic -> f("width");

1111$height = $noPic -> f("height");

1111if ($width > "130") $feil = $feil . "<li>Bildet er for bredt! Skal være max 130 px, er $width px";

1111$usedPhoto = new DB_hir_hir_hir("select phid from photo where picture_id=$new_picture_id and chapter_id=$chapter_id");

1111$usedPhoto -> next_record();

1111$phidd = $usedPhoto -> f("phid");

1111if ($phidd != "") $feil = $feil . "<li>Dette bildet er allerede i visningen.<br>Et bilde kan bare legges inn en gang pr. visning";

1111

1111//testing for mandatory fields

1111if (empty($new_picture_id)) $feil = $feil . "<li>Du må legge ved et bilde";

1111//if (empty($new_photo_text)) $feil = $feil . "<li>Fototekst må fylles inn";

1111if (empty($feil)) {

1111$picture_id = $new_picture_id;

1111$photo_text = $new_photo_text;

1111$firstPhoto = new DB_hir_hir_hir("select max(photo_nr) as max from photo where chapter_id=$chapter_id");

1111$firstPhoto -> next_record();

1111$photo_no = $firstPhoto -> f("max");

1111if ($photo_no == 0) {

111111$phid = $org_phid;

111111regChangeTime($article_id);

111111updatePhoto($phid, photo_nr, 1);

111111updatePhoto($phid, picture_id, $picture_id);

111111//Making the text database-safe

111111$photo_text = dbIn($photo_text);

111111updatePhoto($phid, photo_text, "'".$photo_text."'");

111111$adminuser = $bename;

111111showArt($adr, $article_id, 1, $adminuser);

111111} else {

111111$fPhotoNr = new DB_hir_hir_hir("select max(photo_nr) as max from photo where chapter_id=$chapter_id");

111111$fPhotoNr -> next_record();

111111$photo_nr = $fPhotoNr -> f("max");

111111if ($photo_nr == 0) $photo_nr = 1; else $photo_nr++;

111111//Making the text database-safe

111111$photo_text = dbIn($photo_text);

111111$sqlRegPhoto = new DB_hir_hir_hir("insert into photo (chapter_id, article_id, photo_nr, photo_text, picture_id) values ('$chapter_id', '$article_id', '$photo_nr', '$photo_text', '$picture_id')");

111111$sok_id = $sqlRegPhoto -> link_id();

111111$phid = mysql_insert_id($sok_id);

111111regChangeTime($article_id);

111111$adminuser = $bename;

111111showArt($adr, $article_id, 1, $adminuser);

111111//unset($hir_control);

1111}

1111} else {

111111echo "<ul class="msg">".$feil."</ul>";

111111$adminuser = $bename;

111111showArt($adr, $article_id, 1, $adminuser); //there are errors - we return to the form

1111}

11break;

//***********************************************************

//***** Userlist in article treatment *****

//***********************************************************

11case "Slett brukerlisten":

11$tool = 1;

11$listUserupdate = new DB_hir_hir_hir("delete from userlist WHERE chapter_id='$chapter_id'");

11$adminuser = $bename;

11regChangeTime($article_id);

11showArt($adr, $article_id, 1, $adminuser);

11break;

11case "deleteuserlist":

11$tool = 1;

11include("./includes_publicator/tools_n_links_admin.inc");

11include("./includes_publicator/msg.inc");

11echo "<span class="tdHead">Slett brukerliste i kapittel:</span>  <span class="help">$heading</span><br><span class="utilitariantext6">Dette sletter ikke brukerne fra databasen - kun fra denne artikkelen.</span>";

11echo "<table width="414" border="0" cellspacing="0" cellpadding="0"><tr><td><form action="$adr" method="post"><br><br>

111111<input name="hir_control" type="submit" value="Slett brukerlisten">

111111  <input name="hir_control" type="submit" value="Avbryt">

111111<input type="hidden" name="article_id" value="$article_id">

111111<input type="hidden" name="chapter_id" value="$chapter_id">

111111<input type="hidden" name="descend" value="userlist">

111111

111111</form></td></tr></table>";

11break;

11case "deletelistuser":

11$sUlistNr = new DB_hir_hir_hir("select ulist_nr from userlist where ulist_id = $ulist_id");

11$sUlistNr -> next_record();

11$ulist_nr = $sUlistNr -> f("ulist_nr");

11$listUserupdate = new DB_hir_hir_hir("delete from userlist WHERE ulist_id='$ulist_id'");

11$sUserCh = new DB_hir_hir_hir("select ulist_id, ulist_nr from userlist where chapter_id = $chapter_id and ulist_nr > $ulist_nr");

11while ($sUserCh -> next_record()) {

1111$sUsId = $sUserCh -> f("ulist_id");

1111$sUsNr = $sUserCh -> f("ulist_nr");

1111//reduce number

1111$sUsNr--;

1111$sUseMove = new DB_hir_hir_hir("update userlist set ulist_nr = $sUsNr where ulist_id = $sUsId");

11}

11regChangeTime($article_id);

11$adminuser = $bename;

11showArt($adr, $article_id, 1, $adminuser);

11break;

11case "Oppdater brukerID":

11$tittel = dbIn($tittel);

11$comment = dbIn($comment);

11$listUserupdate = new DB_hir_hir_hir("UPDATE userlist SET tittel='$tittel' WHERE ulist_id='$ulist_id'");

11$listUserupdate2 = new DB_hir_hir_hir("UPDATE userlist SET comment='$comment' WHERE ulist_id='$ulist_id'");

11$adminuser = $bename;

11showArt($adr, $article_id, 1, $adminuser);

11break;

11case "editlistuser":

11$ulistdata = new DB_hir_hir_hir("select ulist_id, article_id, ulist_nr, memid, username, comment, tittel from userlist where ulist_id=$ulist_id");

11$ulistdata -> next_record();

11$ulist_id = $ulistdata -> f("ulist_id");

11$article_id = $ulistdata -> f("article_id");

11$ulist_nr = $ulistdata -> f("ulist_nr");

11$memid = $ulistdata -> f("memid");

11$username = $ulistdata -> f("username");

11$comment = $ulistdata -> f("comment");

11$tittel = $ulistdata -> f("tittel");

11$tool = 1;

11$msg = "Rediger brukers listedata. For å redigere brukerdataene må du gå til brukeradm.";

11include("./includes_publicator/tools_n_links_admin.inc");

11include("./includes_publicator/msg.inc");

11include ("./includes_publicator/frmEditListUser_admin.inc");

11break;

11case "startuserlist":

11$checkuser = new DB_hir_hir_hir("select ulist_id from userlist where chapter_id=$chapter_id");

11$checkuser -> next_record();

11$ulist_id = $checkuser -> f("ulist_id");

11if ($ulist_id != "") $feil = $feil . "Du kan bare ha en brukerliste pr. kapittel";

11if (empty($feil)) {

1111$sqlRegUlist = new DB_hir_hir_hir("insert into userlist (chapter_id, article_id, ulist_nr, memid, username, comment, tittel) values ('$chapter_id', '$article_id', '', '', '', '', '')");

1111$sok_id = $sqlRegUlist -> link_id();

1111$ulist_id = mysql_insert_id($sok_id);

1111$adminuser = $bename;

1111showArt($adr, $article_id, 1, $adminuser);

1111} else {

1111echo "<ul class="msg">".$feil."</ul>";

1111$adminuser = $bename;

1111showArt($adr, $article_id, 1, $adminuser); //there are errors - we return to the form

11}

11break;

11case "Registrer brukerID":

1111//testing

1111$feil = ""; //initializing error flag

1111//testing for mandatory fields

1111if (empty($fetch_id)) $feil = $feil . "<li>Du må fylle inn brukerID på den som skal listes.<br>Bruk Verktøy-vinduet for å finne brukerID";

1111//if (empty($url_text)) $feil = $feil . "<li>Linktekst må inneholde tekst";

1111if (empty($feil)) {

111111$checkfirstuser = new DB_hir_hir_hir("se

3. september 2002

Æh....postet jeg på feil forum? :ler: :ler:

Nja, vi trenger ikke ha noen generell debatt om dette hvis dere ikke vil, assa! :ler:

dorian :roll: :roll: :roll:

3. september 2002

Åh Guri meg! Ikke skrem meg sånn da!!! Har nettopp begynt med dataprogrammering og dette ser dritvanskelig ut!

3. september 2002

Åneida! :ler:

Ihvertfall ikke hvis du velger php.

Er ganske lett når man kommer inn i det, men det blir jo mange linjer kode etterhvert, da.

Men som sagt: skjønner ikke helt åssen denne havnet her :roll:

Æh.. :ler: :ler:

dorian

4. september 2002

Og for oss som bare bruker ferdiglagede sider og programmer... Hva i h...... betyr dette her? Og hve bruker du det egentlig til?

Skjønner meg ikke på slikt, jeg! :oops:

4. september 2002

Hei!

Ja, nei, jeg er ikke sikker på om jeg skjønner det selv, jeg :ler:

I hvertfall ikke når det listes slik som det gjøres ovenfor...

Det var bare en test for å se om dette forumet kunne ta i mot lange innlegg - hvis je skulle fortsette med php-kurset :blunke:

Det er en del av et php-script som putter ting inn i en database, slik at man ikke trenger å kunne noe html for å lage websider.

Php er egentlig ganske enkelt, er bare mengden her ovenfor som får det til å se vanskelig ut.

Det finnes flere php-tråder her på dette forumet som beskriver dette, bare se etter tråder som begynner med php.

nerdian :briller:

Logg inn

Lang switch, hir-hir

Anbefalte innlegg

Gjest doriansen

Lenke til kommentar

Del på andre sider

Gjest doriansen

Lenke til kommentar

Del på andre sider

Majken

Lenke til kommentar

Del på andre sider

Gjest doriansen

Lenke til kommentar

Del på andre sider

Jellyfish

Lenke til kommentar

Del på andre sider

Gjest doriansen

Lenke til kommentar

Del på andre sider

Opprett en konto eller logg inn for å kommentere

Opprett konto

Logg inn

Meny

Mine aktivitetsstrømmer