Четверг, 09.01.2025, 06:42
Приветствую Вас Гость | RSS
Главная | Регистрация | Вход
MYZIC.3DN.RU
Меню сайта
друзья сайта
Категории раздела
шансон [5]
АЛЬБОМЫ [2]
КЛУБНАЯ [2]
РАЗНОЕ [6]
ДЛЯ МОБИЛ [172]
ДИСКОТЕКА 80 [0]
Статистика

Онлайн всего: 1
Гостей: 1
Пользователей: 0
Форма входа
Главная » 2011 » Январь » 9 » знакомства
15:49
знакомства
$shapka="Админпанель - $mtname
";}}// Блок УДАЛЕНИЯ выбранного фото и сообщенияif (isset($_GET['id'])) { $id=$_GET['id']; $page=$_GET['page'];$lines=file($datafile); $maxi=count($lines);if ($maxi<3) {print"$back. Нужно оставить хотябы одну анкету!"; exit;}for($i=0; $i<$maxi;) {$dt=explode("|",$lines[$i]); if ($dt[0]==$id) {$id=$i;} $i++;}$dt=explode("|",$lines[$id]);if (is_file("$datadir/$dt[5]")) unlink ("$datadir/$dt[5]");  // УДАЛЯЕМ малое изображениеif (is_file("$datadir/$dt[6]")) unlink ("$datadir/$dt[6]");  // УДАЛЯЕМ большое изображениеif (is_file("$datadir/$dt[10].dat")) unlink ("$datadir/$dt[10].dat"); // УДАЛЯЕМ файл с комментариями$fp=fopen($datafile,"w");flock ($fp,LOCK_EX);for ($i=0;$i<$maxi;) {$dt=explode("|",$lines[$i]); if ($dt[0]==$move1) {$move1=$i;} $i++;}$move2=$move1-$where;$file=file($datafile); $imax=sizeof($file);if (($move2>=$imax) or ($move2<1)) {exit(" НИЗЯ туда двигать!");}$data1=$file[$move1]; $data2=$file[$move2];$fp=fopen($datafile,"a+");flock ($fp,LOCK_EX);ftruncate ($fp,0);//УДАЛЯЕМ СОДЕРЖИМОЕ ФАЙЛА// меняем местами два соседних разделаfor ($i=0; $i<$imax; $i++) {if ($move1==$i) {fputs($fp,$data2);} else  {if ($move2==$i) {fputs($fp,$data1);} else {fputs($fp,$file[$i]);}}}fflush ($fp);flock ($fp,LOCK_UN);fclose($fp);Header("Location: admin.php?pswrd=$password&page=$page"); exit; }}// Блок УДАЛЕНИЯ КОМЕНТАРИЯ к объявлениюif (isset($_GET['remxd']))  {$msnum=$_GET['msnum']; $remxd=$_GET['remxd']; $page=$_GET['page'];$file=file("$datadir/$msnum.dat");// удаляем строку с коментарием$fp=fopen("$datadir/$msnum.dat","w");flock ($fp,LOCK_EX);for ($i=0; $i< sizeof($file); $i++) { if ($i==$remxd) {unset($file[$i]);} }fputs($fp, implode("",$file));flock ($fp,LOCK_UN);fclose($fp);@chmod("$datadir/$msnum.dat", 0644);if (count($file)==0) {unlink ("$datadir/$msnum.dat");}Header("Location: admin.php?pswrd=$password&page=$page"); exit;}if (isset($_GET['event'])) { if ($_GET['event']=="add") { // если выбрано - редактированиеif (isset($_GET['page'])) {$page=$_GET['page'];} else {$page=0;}if (isset($_GET['rd'])) { $rd=$_GET['rd'];$id=str_replace("|","I",$_POST['id']);$login=str_replace("|","I",$_POST['login']);$pass=str_replace("|","I",$_POST['pass']);$name=str_replace("|","I",$_POST['name']);$email=str_replace("|","I",$_POST['email']);$dayx=str_replace("|","I",$_POST['dayx']);$regdate=str_replace("|","I",$_POST['regdate']);$pol=str_replace("|","I",$_POST['pol']);$rost=str_replace("|","I",$_POST['rost']);$ves=str_replace("|","I",$_POST['ves']);$city=str_replace("|","I",$_POST['city']);$why=str_replace("|","I",$_POST['why']);$spirt=str_replace("|","I",$_POST['spirt']);$kurivo=str_replace("|","I",$_POST['kurivo']);$deti=str_replace("|","I",$_POST['deti']);$work=str_replace("|","I",$_POST['work']);$url=str_replace("|","I",$_POST['url']);$icq=str_replace("|","I",$_POST['icq']);$telefon=str_replace("|","I",$_POST['telefon']);$msg=str_replace("|","I",$_POST['msg']);$smallfoto=str_replace("|","I",$_POST['smallfoto']);$fotoname=str_replace("|","I",$_POST['fotoname']);$fotoksize=str_replace("|","I",$_POST['fotoksize']);$size0=str_replace("|","I",$_POST['size0']);$size1=str_replace("|","I",$_POST['size1']);$want=str_replace("|","I",$_POST['want']);$ip=str_replace("|","I",$_POST['ip']);// обрезаем лишние символы в емайле и сообщении$email=substr($email,0,30);$msg=stripslashes($msg);$msg=htmlspecialchars($msg);$msg=str_replace("|","I",$msg);$msg=str_replace("\r\n","
",$msg);$text="$id|$login|$pass|$name|$email|$dayx|$regdate|$pol|$rost|$ves|$city|$why|$spirt|$kurivo|$deti|$work|$url|$icq|$telefon|$msg|$smallfoto|$fotoname|$fotoksize|$size0|$size1|$want|$ip|$id||";/*$id -  $dt[0]$login - Логин  $dt[1]$pass  - Пароль $dt[2]$name  - Имя $dt[3]$email - e-mail $dt[4]$dayx - Дата рождения в UNIX-формате $dt[5]$regdate - дата время регистрации анкеты UNIX $dt[6]$pol - Пол: Мальчик/Девочка / Мужчина/Женщина  $dt[7]$rost - Рост: $dt[8]$ves - Вес: $dt[9]$city - Этаж: $dt[10]$why - Цель: серьёзные отношения / флирт / друг по переписке / просто секс $dt[11]$spirt - Отношение к спиртому: Терпеть не могу/часто/редко $dt[12]$kurivo - Отношение к курению: Терпеть не могу/часто/редко $dt[13]$deti - Дети:  да/нет $dt[14]$work - Род деятельности: поле ввода $dt[15]$url - Сайт $dt[16]$icq - ICQ $dt[17]$telefon - $dt[18]$msg - кратенько О себе $dt[19]$file - Фото  - $smallfoto - $dt[20] $fotoname - $dt[21] $fotoksize - $dt[22] $size0 - $dt[23] $size1 - $dt[24]$want - Ищу: Его/Её/Его + Её - $dt[25]$ip - $dt[26]*/$file=file($datafile);$fp=fopen($datafile,"a+");flock ($fp,LOCK_EX);ftruncate ($fp,0);//УДАЛЯЕМ СОДЕРЖИМОЕ ФАЙЛАfor ($i=0;$i< sizeof($file);$i++) {if ($rd!=$i) {fputs($fp,$file[$i]);} else {fputs($fp,"$text\r\n");}}fflush ($fp);//очищение файлового буфераflock ($fp,LOCK_UN);fclose($fp);@chmod("$datafile", 0644);}Header("Location: admin.php?pswrd=$password&page=$page"); exit; }if ($_GET['event']=="coment")  {$msnum=$_GET['msnum']; // просмотр КОММЕНТАРИЕВ к фото$lines=file($datafile); $maxi=count($lines); $i="0";do {$dt=explode("|", $lines[$i]); $i++;if ($dt[10]===$msnum) { print"$shapka
Главная админки :: Конфигурирование :: Форма поиска :: Добавить анкету :: Выход
";$shapkasmall="";if (!isset($_GET['pswrd'])) // Авторизация{echo "$shapkasmall



Введите пароль:




";}else {if ($_GET['pswrd']==="$password")  { // Авторизация пройдена успешно// Блок выдаёт код для формы ПОИСКаif (isset($_GET['event'])) { if ($_GET['event'] == "makeformfinder") {print"$shapka

Код для поиска с городом, выбирающимся из списка (около 5 Кб.) Инклюдинг на php-страницы

Код для поиска попроще (около 1 Кб.) - можно включать на php страницы.



Код для поиска попроще (около 1 Кб.) - можно включать на html страницы.

Фото № $i
$dt[0]
$dt[0]
Разрешение: $dt[8] х $dt[9]
Размер: $dt[7] Кб.
"; }} while($i < $maxi);if (is_file("$datadir/$msnum.dat")) {$rlines=file("$datadir/$msnum.dat"); $ri=count($rlines); $bals=0; $all=0;print"
";do {$ri--; $edt=explode("|",$rlines[$ri]);$edt[3]=date("d.m.Y H:i:s",$edt[3]);if ($edt[4]!=0) {$bals=$bals+$edt[4]; $all++;} else {$edt[4]="-";}print"";} while($ri>0);if ($bals==0) {$itogobals="-";} else {$itogobals=round($bals*10/$all)/10;}print "
Коментарии посетителей:
Имя, Емайл, ДатаТекст коментарияОценка.X.
$edt[0]
$edt[1]
$edt[3]
$edt[2]$edt[4].X.
Средняя оценка фото: $itogobals / 10
Добавить комментарий

";}} // $event=="coment"if ($_GET['event']=="skin")  {if ($sendmailadmin=="1") {$a1="checked"; $a2="";} else {$a2="checked"; $a1="";}if ($sendmail=="1") {$m1="checked"; $m2="";} else {$m2="checked"; $m1="";}print "$shapka
Конфигурирование

ПараметрЗначение
Имя скрипта отображается в заголовке *
Текст приветствия
Разрешить мылить сообщения через скрипт да   нет
Емайл админа / мылить сообщения     да   нет
Пароль админа
Ширина / Высота мини-изображения    .:.   
Ссылка на главную страницу сайта *
Цвет бордюра рамки с анкетой
Макс. размер фотофайла в байтах Рекомендуется менее ОДНОГО мегабайта!
Выбор для поля ЦЕЛЬ знакомства
Кол-во столбцов с анкетами   Допускается значение от 1 до 10
Анкет на страницу
Относительный путь до папки с данными скрипта     По умолчанию: "./data&quot.
Имя файла БД
Введите имя папки со скином
Макс. длина
имени / сообщения / комментария
   .:.       .:.   
Cледование анкет

* - Будьте аккуратны при вводе спецсимволов: \$ \" ' - Вы можете \"уронить\" файл конфигурации!";}if ($_GET['event']=="config")  {$configdata="Вернитесь назад\"; // Удобная строка\r\n"."$"."date=date(\"d.m.y\"); // число.месяц.год\r\n"."$"."time=date(\"H:i\"); // часы:минуты \r\n?>";$file=file("config.php");$fp=fopen("config.php","a+");flock ($fp,LOCK_EX);ftruncate ($fp,0);//УДАЛЯЕМ СОДЕРЖИМОЕ ФАЙЛАfputs($fp,$configdata);fflush ($fp);//очищение файлового буфераflock ($fp,LOCK_UN);fclose($fp);@chmod("config.php", 0644);Header("Location: admin.php?pswrd=$_POST[password]"); exit; }}   else   {  // if isset($event)if (isset($_GET['page'])) {$page=$_GET['page'];} else {$page="1";}print "$shapka";if ((!isset($_GET['event'])) or (isset($_GET['event'])) & ($_GET['event']!="add"))  {$lines=file($datafile);$itogo=count($lines);$maxi=$itogo-1;if ($maxi>=0) {// Выводим qq сообщений на текущей страницеif ($page=="0") {$page="1";} else {$page=abs($page);}$maxpage=ceil(($maxi)/$qq); if ($page>$maxpage) {$page=$maxpage;}if ($msginout=="1") { $fm=$qq*($page-1); if ($fm>$maxi) {$fm=$maxi-$qq;}  $lm=$fm+$qq; if ($lm>$maxi) {$lm=$maxi+1;} }else { $fm=$maxi-$qq*($page-1); if ($fm<"0") {$fm=$qq;}  $lm=$fm-$qq; if ($lm<"0") {$lm="0";} }print"";do { $dt = explode("|", $lines[$fm]);if ($msginout=="1") {$fm++;} else {$fm--;}$num=$itogo-$fm;$tp=$fm; $teknum=$maxi-$tp;// заменяем текстовые смайлики на графические$msnum=$dt[0]; $addrem="";if (is_file("$datadir/$msnum.dat"))  {$rlines=file("$datadir/$msnum.dat"); $ri=count($rlines);$addrem="Коментарии [ $ri ]";}if (!is_file("$datadir/$dt[20]")) {if ($dt[7]=="1") {$dt[20]="m_no.gif";} else {$dt[20]="g_no.gif";}}if (!is_file("$datadir/$dt[21]")) {if ($dt[7]=="1") {$dt[21]="m_no.gif";} else {$dt[21]="g_no.gif";}}// Обработка поля ПОЛ Мужчина/Женщина 1/2 0 - хакерif ($dt[7]=="0") {$dt[7]="#008800>не скажу";}if ($dt[7]=="1") {$dt[7]="blue>Мужчина";}if ($dt[7]=="2") {$dt[7]="red>Женщина";}// обработка полей РОСТ и ВЕСif ($dt[8]=="1") {$dt[8]="менее 140";}if ($dt[8]=="2") {$dt[8]="более 200";}if ($dt[9]=="1") {$dt[9]="менее 40";}if ($dt[9]=="2") {$dt[9]="более 120";}// Обработка поля ЦЕЛЬ знакомстваif ($dt[11]=="1") {$dt[11]="серьёзные отношения";}if ($dt[11]=="2") {$dt[11]="флирт";}if ($dt[11]=="3") {$dt[11]="друг по переписке";}if ($dt[11]=="4") {$dt[11]="просто секс";}// Обработка поля отношение к СПИРТНОМУif ($dt[12]=="1") {$dt[12]="Терпеть не могу";}if ($dt[12]=="2") {$dt[12]="Часто";}if ($dt[12]=="3") {$dt[12]="Редко";}// Обработка поля отношение к КУРЕНИЮif ($dt[13]=="1") {$dt[13]="Терпеть не могу";}if ($dt[13]=="2") {$dt[13]="Часто";}if ($dt[13]=="3") {$dt[13]="Редко";}if ($dt[9]=="1") {$dt[9]="blue>Мужчина";}if ($dt[9]=="2") {$dt[9]="red>Женщина";}// обработка полей РОСТ и ВЕСif ($dt[10]=="1") {$dt[10]="менее 140";}if ($dt[10]=="2") {$dt[10]="более 200";}if ($dt[11]=="1") {$dt[11]="менее 40";}if ($dt[11]=="2") {$dt[11]="более 120";}// Обработка поля ЦЕЛЬ знакомстваif ($dt[13]=="1") {$dt[13]="серьёзные отношения";}if ($dt[13]=="2") {$dt[13]="флирт";}if ($dt[13]=="3") {$dt[13]="друг по переписке";}if ($dt[13]=="4") {$dt[13]="просто секс";}// расчёт возраста и преобразование к нужному типу$vozrast=intval((mktime()-$dt[5])/31536000);$dater=date("d.m.Y",$dt[6]);$dney="лет";if ($vozrast>20) {$ddays=substr($vozrast,-1);} else {$ddays=$vozrast;}if ($ddays=="1") {$dney="год";}if ($ddays=="2" or $ddays=="3" or $ddays=="4") {$dney="года";}print"";}if ($msginout=="1") {$whm=$fm; $whe=$lm;} else {$whm=$lm; $whe=$fm;}} while($whm < $whe);print "

";if (is_file("$datadir/$dt[0].dat")) { print"
Анкета $teknum
$dt[0]

Разрешение: $dt[23] х $dt[24]
Размер: $dt[22] Кб.
.P..X.ВвНз
Ник: $dt[1]
Имя: $dt[3]
Пол:
Город: $dt[10]
Возраст: $vozrast $dney
Рост: $dt[8] см.
Вес: $dt[9] кг.
Цель: $dt[11]
Размещено: $dater г.


";$klines = file("$datadir/$dt[0].dat"); $ik=count($klines);for ($z=0;$z
.X.  Имя: $dtk[0] Емайл: $dtk[1] Коментарий: $dtk[2] Оценка: $dtk[4]
";}}print"
";$cm=1;   // додумать!     // ДЕЛИМ ВСЕ РУБРИКИ на столбцы$zz=$maxi-$fm/$colrubperpage;if ((round(($maxi-$fm)/$colrubperpage))==(($maxi-$fm)/$colrubperpage)) {$cm++; print "
";// выводим СПИСОК доступных номеров СТРАНИЦ ВНИЗУprint "Страницы:  ";for($i=0; $i<$maxi;) {$ip=$i/$qq+1;if ($page==$ip) {print "$ip  ";} else {print "$ip  ";}$i=$i+$qq;} print "(дробление = $qq)";}// ищем сообщение для редактирования и выводим его в формуif (isset($_GET['rd']))  { $rd=$_GET['rd'];$lines=file($datafile); $maxi=count($lines); for($i=0; $i<$maxi;) {$dt=explode("|",$lines[$i]); if ($dt[0]==$rd) {$rd=$i;} $i++;}$dt=explode("|",$lines[$rd]);print "


";}print"";}}}}?>
Powered by WR-Meeting ©
ПараметрЗначение
ID
Логин
Пароль
Имя
E-mail
Дата рождения
Дата регистрации
Пол: 1-М 2-Ж
Рост
Вес
Город
Цель: 1-с.отнош. 2-флирт 3-друг 4-интим
Спиртное
Курение
Дети
Род деятельности
Сайт
ICQ
Телефон
О себе
Фото
Фото нэйм
Фото сайз
Ширина
Высота
Ищу: 1-её 2-его
IP
Просмотров: 492 | Добавил: realizator | Рейтинг: 0.0/0
Всего комментариев: 0
Имя *:
Email *:
Код *:
Поиск
Календарь
«  Январь 2011  »
ПнВтСрЧтПтСбВс
     12
3456789
10111213141516
17181920212223
24252627282930
31
Архив записей
Друзья сайта
  • Официальный блог
  • Сообщество uCoz
  • FAQ по системе
  • Инструкции для uCoz

  • Copyright MyCorp © 2025 | Бесплатный хостинг uCoz