17. File Comparison Report

Produced on Wed Jun 18 08:01:27 2008 UTC. This report uses XHTML and CSS2, and is best viewed with a reasonably standards compliant browser such as the latest version of Firefox or Internet Explorer. For optimum results when printing this report, use landscape orientation and enable printing of background images and colours in your browser.

17.1 Files compared

# Location File Last Modified
1 Dolphin-v.6.1.1\admin profiles.php Sun May 11 13:17:02 2008 UTC
2 Dolphin-v.6.1.2\admin profiles.php Wed Jun 18 06:23:58 2008 UTC

17.2 Comparison summary

Description Between
Files 1 and 2
Text Blocks Lines
Unchanged 7 1154
Changed 5 19
Inserted 1 1
Removed 0 0

17.3 Comparison options

Whitespace All differences in whitespace within lines are ignored
Character case Differences in character case are significant
Line endings Differences in line endings (CR and LF characters) are ignored
CR/LF characters Not shown in the comparison detail

17.4 Active regular expressions

No regular expressions were active.

17.5 Comparison detail

1   <?   1   <?
2     2  
3   /********* ********** ********** ********** ********** ********** ********** ******   3   /********* ********** ********** ********** ********** ********** ********** ******
4   *                              D olphin Sma rt Communi ty Builder   4   *                              D olphin Sma rt Communi ty Builder
5   *                                 --------- --------   5   *                                 --------- --------
6   *     begi n                 : M on Mar 23  2006   6   *     begi n                 : M on Mar 23  2006
7   *     copy right             : ( C) 2006 Bo onEx Group   7   *     copy right             : ( C) 2006 Bo onEx Group
8   *     webs ite               : h ttp://www. boonex.com /   8   *     webs ite               : h ttp://www. boonex.com /
9   * This fil e is part  of Dolphin  - Smart C ommunity B uilder   9   * This fil e is part  of Dolphin  - Smart C ommunity B uilder
10   *   10   *
11   * Dolphin  is free so ftware. Th is work is  licensed  under a Cr eative Com mons Attri bution 3.0  License.    11   * Dolphin  is free so ftware. Th is work is  licensed  under a Cr eative Com mons Attri bution 3.0  License. 
12   * http://c reativecom mons.org/l icenses/by /3.0/   12   * http://c reativecom mons.org/l icenses/by /3.0/
13   *   13   *
14   * Dolphin  is distrib uted in th e hope tha t it will  be useful,  but WITHO UT ANY WAR RANTY;   14   * Dolphin  is distrib uted in th e hope tha t it will  be useful,  but WITHO UT ANY WAR RANTY;
15   * without  even the i mplied war ranty of   MERCHANTAB ILITY or F ITNESS FOR  A PARTICU LAR PURPOS E.   15   * without  even the i mplied war ranty of   MERCHANTAB ILITY or F ITNESS FOR  A PARTICU LAR PURPOS E.
16   * See the  Creative C ommons Att ribution 3 .0 License  for more  details.    16   * See the  Creative C ommons Att ribution 3 .0 License  for more  details. 
17   * You shou ld have re ceived a c opy of the  Creative  Commons At tribution  3.0 Licens e along wi th Dolphin   17   * You shou ld have re ceived a c opy of the  Creative  Commons At tribution  3.0 Licens e along wi th Dolphin
18   * see lice nse.txt fi le; if not , write to  marketing @boonex.co m   18   * see lice nse.txt fi le; if not , write to  marketing @boonex.co m
19   ********** ********** ********** ********** ********** ********** ********** *****/   19   ********** ********** ********** ********** ********** ********** ********** *****/
20     20  
21   require_on ce( '../in c/header.i nc.php' );   21   require_on ce( '../in c/header.i nc.php' );
22   require_on ce( BX_DIR ECTORY_PAT H_INC . 'd esign.inc. php' );   22   require_on ce( BX_DIR ECTORY_PAT H_INC . 'd esign.inc. php' );
23   require_on ce( BX_DIR ECTORY_PAT H_INC . 'p rofiles.in c.php' );   23   require_on ce( BX_DIR ECTORY_PAT H_INC . 'p rofiles.in c.php' );
24   require_on ce( BX_DIR ECTORY_PAT H_INC . 'a dmin_desig n.inc.php'  );   24   require_on ce( BX_DIR ECTORY_PAT H_INC . 'a dmin_desig n.inc.php'  );
25   require_on ce( BX_DIR ECTORY_PAT H_INC . 'u tils.inc.p hp' );   25   require_on ce( BX_DIR ECTORY_PAT H_INC . 'u tils.inc.p hp' );
26   require_on ce( BX_DIR ECTORY_PAT H_INC . 't ags.inc.ph p' );   26   require_on ce( BX_DIR ECTORY_PAT H_INC . 't ags.inc.ph p' );
27     27  
28   $logged['a dmin'] = m ember_auth ( 1, true,  true );   28   $logged['a dmin'] = m ember_auth ( 1, true,  true );
29   $ADMIN = $ logged[adm in];   29   $ADMIN = $ logged[adm in];
30     30  
31   $_page['cs s_name'] =  'profiles .css';   31   $_page['cs s_name'] =  'profiles .css';
32     32  
33     33  
34   if ( $_POS T['prf_for m_submit']  && !$demo _mode)   34   if ( $_POS T['prf_for m_submit']  && !$demo _mode)
35   {   35   {
36       $sel_s tr = "";   36       $sel_s tr = "";
37       while(  list( $ke y, $val )  = each( $_ POST ) )   37       while(  list( $ke y, $val )  = each( $_ POST ) )
38           if  ( (int)$k ey && $val  )   38           if  ( (int)$k ey && $val  )
39           $s el_str .=  ",$key";   39           $s el_str .=  ",$key";
40       $sel_s tr = subst r( $sel_st r, 1 );   40       $sel_s tr = subst r( $sel_st r, 1 );
41       $sel_a rr = explo de( ",", $ sel_str );   41       $sel_a rr = explo de( ",", $ sel_str );
42     42  
43       $owner  = $PARTNE R ? $_COOK IE['partne rID'] : 0;   43       $owner  = $PARTNE R ? $_COOK IE['partne rID'] : 0;
44       while(  list( $ke y, $val )  = each( $s el_arr ) )   44       while(  list( $ke y, $val )  = each( $s el_arr ) )
45       {   45       {
46           sw itch ( $_P OST['prf_f orm_submit '] )   46           sw itch ( $_P OST['prf_f orm_submit '] )
47           {   47           {
48                case "De lete":   48                case "De lete":
49                    prof ile_delete ( $val );   49                    prof ile_delete ( $val );
50                break;   50                break;
51                case "Co nfirm Emai l":   51                case "Co nfirm Emai l":
52                    acti vation_mai l( $val, 0  );   52                    acti vation_mai l( $val, 0  );
53                break;   53                break;
54                case "Se nd Message ":   54                case "Se nd Message ":
55                    prof ile_send_m essage( $v al, $_POST ['Message' ] );   55                    prof ile_send_m essage( $v al, $_POST ['Message' ] );
56                break;   56                break;
57                case 'Ac tivate':   57                case 'Ac tivate':
58                    db_r es( "UPDAT E `Profile s` SET `St atus` = 'A ctive' WHE RE `ID` =  '" . (int) $val . "'"  );   58                    db_r es( "UPDAT E `Profile s` SET `St atus` = 'A ctive' WHE RE `ID` =  '" . (int) $val . "'"  );
59                    crea teUserData File((int) $val);   59                    crea teUserData File((int) $val);
60                    repa rseObjTags ( 'profile ', (int)$v al );   60                    repa rseObjTags ( 'profile ', (int)$v al );
61                break;   61                break;
62                case 'Ap proval':   62                case 'Ap proval':
63                    db_r es( "UPDAT E `Profile s` SET `St atus` = 'A pproval' W HERE `ID`  = '" . (in t)$val . " '" );   63                    db_r es( "UPDAT E `Profile s` SET `St atus` = 'A pproval' W HERE `ID`  = '" . (in t)$val . " '" );
64                    crea teUserData File((int) $val);   64                    crea teUserData File((int) $val);
65                    repa rseObjTags ( 'profile ', (int)$v al );   65                    repa rseObjTags ( 'profile ', (int)$v al );
66                break;   66                break;
67                case 'Ba n':   67                case 'Ba n':
68                    if ( (int)$val> 0 && (int) $_REQUEST[ 'time_hrs' ]>0) {   68                    if ( (int)$val> 0 && (int) $_REQUEST[ 'time_hrs' ]>0) {
69                         $iBanTime  = ((int)$_ REQUEST['t ime_hrs'])  * 3600;   69                         $iBanTime  = ((int)$_ REQUEST['t ime_hrs'])  * 3600;
70                         $sCheckBan SQL = "SEL ECT * FROM  `AdminBan List` WHER E `ProfID` ='{$val}'  LIMIT 1";   70                         $sCheckBan SQL = "SEL ECT * FROM  `AdminBan List` WHER E `ProfID` ='{$val}'  LIMIT 1";
71                         db_res($sC heckBanSQL );   71                         db_res($sC heckBanSQL );
72                         if (mysql_ affected_r ows()==1)  {   72                         if (mysql_ affected_r ows()==1)  {
73                             $sBamS QL = "UPDA TE `AdminB anList` SE T `Time`=' {$iBanTime }', `DateT ime`=NOW()  WHERE `Pr ofID`='{$v al}'";   73                             $sBamS QL = "UPDA TE `AdminB anList` SE T `Time`=' {$iBanTime }', `DateT ime`=NOW()  WHERE `Pr ofID`='{$v al}'";
74                         } else {   74                         } else {
75                             $sBamS QL = "INSE RT INTO `A dminBanLis t` SET `Ti me`='{$iBa nTime}', ` DateTime`= NOW(), `Pr ofID`='{$v al}'";   75                             $sBamS QL = "INSE RT INTO `A dminBanLis t` SET `Ti me`='{$iBa nTime}', ` DateTime`= NOW(), `Pr ofID`='{$v al}'";
76                         }   76                         }
77                         db_res($sB amSQL);   77                         db_res($sB amSQL);
78                    }   78                    }
79                break;   79                break;
80                case 'Un Ban':   80                case 'Un Ban':
81                    if ( (int)$val> 0) {   81                    if ( (int)$val> 0) {
82                         $sCheckBan SQL = "DEL ETE FROM ` AdminBanLi st` WHERE  `ProfID`=' {$val}' LI MIT 1";   82                         $sCheckBan SQL = "DEL ETE FROM ` AdminBanLi st` WHERE  `ProfID`=' {$val}' LI MIT 1";
83                         db_res($sC heckBanSQL );   83                         db_res($sC heckBanSQL );
84                    }   84                    }
85                break;   85                break;
86           }   86           }
87       }   87       }
88   }   88   }
89     89  
90   // - GET v ariables - ---------- ---   90   // - GET v ariables - ---------- ---
91     91  
92   $page            = (i nt)$_GET[' page'];   92   $page            = (i nt)$_GET[' page'];
93   $p_per_pag e     = (i nt)$_GET[' p_per_page '];   93   $p_per_pag e     = (i nt)$_GET[' p_per_page '];
94   $profiles        = $_ GET['profi les'];   94   $profiles        = $_ GET['profi les'];
95   $sorttype        = $_ COOKIE['so rttype'];   95   $sorttype        = $_ COOKIE['so rttype'];
96   $sortor          = $_ GET['sorto r'] ? $_GE T['sortor' ] : $_COOK IE['sortor '];   96   $sortor          = $_ GET['sorto r'] ? $_GE T['sortor' ] : $_COOK IE['sortor '];
97   $sex             = $_ GET['sex'] ;   97   $sex             = $_ GET['sex'] ;
98   $search          = $_ GET['searc h'];   98   $search          = $_ GET['searc h'];
99   $showAffMe mbers = (i nt)$_GET[' showAffMem bers'];   99   $showAffMe mbers = (i nt)$_GET[' showAffMem bers'];
100     100  
101   if ( !$pag e )   101   if ( !$pag e )
102       $page  = 1;   102       $page  = 1;
103     103  
104   if ( !$p_p er_page )   104   if ( !$p_p er_page )
105       $p_per _page = 30 ;   105       $p_per _page = 30 ;
106     106  
107   if ( $show AffMembers  > 0 )   107   if ( $show AffMembers  > 0 )
108   {   108   {
109       $aff_p art_w = "  AND idAff  = $showAff Members AN D idProfil e = ID";   109       $aff_p art_w = "  AND idAff  = $showAff Members AN D idProfil e = ID";
110       $aff_p art_f = ", aff_member s ";   110       $aff_p art_f = ", aff_member s ";
111   }   111   }
112     112  
113   switch( $p rofiles )   113   switch( $p rofiles )
114   {   114   {
115       case ' Active':   115       case ' Active':
116           $p rof_part =  "AND `Sta tus` = '$p rofiles'";   116           $p rof_part =  "AND `Sta tus` = '$p rofiles'";
117           br eak;   117           br eak;
118       case ' Unconfirme d':   118       case ' Unconfirme d':
119       case ' Approval':   119       case ' Approval':
120       case ' Rejected':   120       case ' Rejected':
121       case ' Suspended' :   121       case ' Suspended' :
122           $p rof_part =  "AND `Sta tus` <> 'A ctive'";   122           $p rof_part =  "AND `Sta tus` <> 'A ctive'";
123           br eak;   123           br eak;
124       defaul t:   124       defaul t:
125           $p rof_part =  "";   125           $p rof_part =  "";
126   }   126   }
127     127  
128   if ( strle n($sex) )   128   if ( strle n($sex) )
129       $sex_p art = "AND  Sex = '"  . process_ db_input($ sex, 1) .  "'";   129       $sex_p art = "AND  Sex = '"  . process_ db_input($ sex, 1) .  "'";
130     130  
131     131  
132   if (strlen ($search))   132   if (strlen ($search))
133   {   133   {
134       if ($_ GET['s_mai l'])   134       if ($_ GET['s_mai l'])
135           $e mail_part  = " AND `E mail` LIKE  '%$search %' ";   135           $e mail_part  = " AND `E mail` LIKE  '%$search %' ";
136       elseif  ($_GET['s _nickname' ])   136       elseif  ($_GET['s _nickname' ])
137           $e mail_part  = " AND `N ickName` L IKE '%$sea rch%' ";   137           $e mail_part  = " AND `N ickName` L IKE '%$sea rch%' ";
138       elseif  ($_GET[s_ id])   138       elseif  ($_GET[s_ id])
139            $email_par t   =   "   AND   `
ID`   =   '$search'   ";
  139            $email_par t   =   "   AND   ` Profiles`. ` ID`   =   '$search'   ";
140     140  
141   }   141   }
142     142  
143   if (isset( $_GET['med ia']) && i sset($_GET ['status'] ))   143   if (isset( $_GET['med ia']) && i sset($_GET ['status'] ))
144   {   144   {
145       $sType        = h tmlspecial chars_adv( $_GET['med ia']);   145       $sType        = h tmlspecial chars_adv( $_GET['med ia']);
146       $sStat us      =  htmlspecia lchars_adv ($_GET['st atus']);   146       $sStat us      =  htmlspecia lchars_adv ($_GET['st atus']);
147       $sqlJo inPart = " LEFT JOIN  `media` ON  (`media`. `med_prof_ id` = `Pro files`.`ID `)";   147       $sqlJo inPart = " LEFT JOIN  `media` ON  (`media`. `med_prof_ id` = `Pro files`.`ID `)";
148       $sqlWh ere    = "  AND `med_ status` =  '$sStatus'  AND `med_ type`='$sT ype'";   148       $sqlWh ere    = "  AND `med_ status` =  '$sStatus'  AND `med_ type`='$sT ype'";
149       $sqlGr oup    = "  GROUP BY  `Profiles` .`ID`";   149       $sqlGr oup    = "  GROUP BY  `Profiles` .`ID`";
150   }   150   }
151     151  
152     152  
153   $sqlCouple  = "(`Coup le`=0 OR ` Couple`>`P rofiles`.` ID`)";   153   $sqlCouple  = "(`Coup le`=0 OR ` Couple`>`P rofiles`.` ID`)";
154   $sqlWhere  .= ' AND '  . $sqlCou ple;   154   $sqlWhere  .= ' AND '  . $sqlCou ple;
155     155  
156   // ------- ---------- ---------- ---   156   // ------- ---------- ---------- ---
157     157  
158   $sQuery =  "SELECT `P rofiles`.` ID` as `ID `,    158   $sQuery =  "SELECT `P rofiles`.` ID` as `ID `, 
159                      `N ickName`,   159                      `N ickName`,
160                      `E mail`,   160                      `E mail`,
161                      `S ex`,   161                      `S ex`,
162                       D ATE_FORMAT (`DateLast Login`,  ' $date_form at' ) AS ` DateLastLo ginCur`,   162                       D ATE_FORMAT (`DateLast Login`,  ' $date_form at' ) AS ` DateLastLo ginCur`,
163                       D ATE_FORMAT (`DateReg` ,  '$date_ format' )  AS `DateRe g`,   163                       D ATE_FORMAT (`DateReg` ,  '$date_ format' )  AS `DateRe g`,
164                       ` Status`   164                       ` Status`
165                       $ sMemField   165                       $ sMemField
166                       F ROM `Profi les` $aff_ part_f   166                       F ROM `Profi les` $aff_ part_f
167                       $ sqlJoinPar t   167                       $ sqlJoinPar t
168                       $ sMemJoin   168                       $ sMemJoin
169                       W HERE 1 $em ail_part $ aff_part_w  $prof_par t $sex_par t $sqlWher e $sqlGrou p";   169                       W HERE 1 $em ail_part $ aff_part_w  $prof_par t $sex_par t $sqlWher e $sqlGrou p";
170     170  
171   $rData = d b_res($sQu ery);   171   $rData = d b_res($sQu ery);
172   $p_num = m ysql_num_r ows($rData );   172   $p_num = m ysql_num_r ows($rData );
173   $pages_num  = ceil( $ p_num / $p _per_page  );   173   $pages_num  = ceil( $ p_num / $p _per_page  );
174     174  
175   $real_firs t_p = (int )($page -  1) * $p_pe r_page;   175   $real_firs t_p = (int )($page -  1) * $p_pe r_page;
176   $page_firs t_p = $rea l_first_p  + 1;   176   $page_firs t_p = $rea l_first_p  + 1;
177     177  
178   /* checkin g for inco ming value  for sort  order   178   /* checkin g for inco ming value  for sort  order
179    * if we o pen this p age withou t sortor p aram   179    * if we o pen this p age withou t sortor p aram
180    * we use  ID as defa ult   180    * we use  ID as defa ult
181    * after t hat we put  old value  to cookie   181    * after t hat we put  old value  to cookie
182    * $sortod er - stand s for valu e for ORDE R BY query   182    * $sortod er - stand s for valu e for ORDE R BY query
183   */   183   */
184     184  
185   if ( $sort or == "" )   185   if ( $sort or == "" )
186   {   186   {
187       $sorto r = "DateL astLogin";   187       $sorto r = "DateL astLogin";
188   }   188   }
189   setcookie(  "sortor",  $sortor ) ;   189   setcookie(  "sortor",  $sortor ) ;
190     190  
191   /* here we  make chec k for the  first clic k on the v alue   191   /* here we  make chec k for the  first clic k on the v alue
192    * in case  we change  our incom ing value  we set ord er type to  ASCENDING   192    * in case  we change  our incom ing value  we set ord er type to  ASCENDING
193    * in othe r case we  check for  additional  clicks an d change t he image   193    * in othe r case we  check for  additional  clicks an d change t he image
194    * $sortty pe - ASCEN DING or DE SCENDING   194    * $sortty pe - ASCEN DING or DE SCENDING
195   */   195   */
196   if ( $_GET ['sortor']  && ($_GET ['sortor']  != $_COOK IE['sortor ']) )   196   if ( $_GET ['sortor']  && ($_GET ['sortor']  != $_COOK IE['sortor ']) )
197   {   197   {
198       $sortt ype = "DES C";   198       $sortt ype = "DES C";
199   }   199   }
200   elseif ( $ _GET['sort or'] )   200   elseif ( $ _GET['sort or'] )
201   {   201   {
202       if ( $ _COOKIE['s orttype']  == "ASC" )   202       if ( $ _COOKIE['s orttype']  == "ASC" )
203       {   203       {
204           $s orttype =  "DESC";   204           $s orttype =  "DESC";
205           $s ortor_imag e = "<img  src=\"./im ages/desc_ order.gif\ ">";   205           $s ortor_imag e = "<img  src=\"./im ages/desc_ order.gif\ ">";
206       }   206       }
207       else   207       else
208       {   208       {
209           $s orttype =  "ASC";   209           $s orttype =  "ASC";
210           $s ortor_imag e = "<img  src=\"./im ages/asc_o rder.gif\" >";   210           $s ortor_imag e = "<img  src=\"./im ages/asc_o rder.gif\" >";
211       }   211       }
212   }   212   }
213   setcookie(  "sorttype ", $sortty pe );   213   setcookie(  "sorttype ", $sortty pe );
214     214  
215   /* the che ck for mem ber status   215   /* the che ck for mem ber status
216    * in case  we have t he full me mber list  without an y statuses  we set it  to nothin g   216    * in case  we have t he full me mber list  without an y statuses  we set it  to nothin g
217    * in othe r case we  add anothe r option t o the quer y   217    * in othe r case we  add anothe r option t o the quer y
218    * $inc_pr ofiles - v ariable re turning th e incoming  parameter  for profi le status   218    * $inc_pr ofiles - v ariable re turning th e incoming  parameter  for profi le status
219   */   219   */
220   if ( $prof iles != ""  )   220   if ( $prof iles != ""  )
221   {   221   {
222       $inc_p rofiles =  "profiles= $profiles& ";   222       $inc_p rofiles =  "profiles= $profiles& ";
223   }   223   }
224   else   224   else
225   {   225   {
226       $inc_p rofiles =  "";   226       $inc_p rofiles =  "";
227   }   227   }
228   $n_arr = d b_arr( 'SE LECT COUNT (*) FROM ` Profiles`'  . " WHERE  {$sqlCoup le}" );   228   $n_arr = d b_arr( 'SE LECT COUNT (*) FROM ` Profiles`'  . " WHERE  {$sqlCoup le}" );
229   $status_ar r[0] = "Ac tive";   229   $status_ar r[0] = "Ac tive";
230   $status_ar r[1] = "Ap proval";   230   $status_ar r[1] = "Ap proval";
231   $status_ar r[2] = "Un confirmed" ;   231   $status_ar r[2] = "Un confirmed" ;
232   $status_ar r[3] = "Re jected";   232   $status_ar r[3] = "Re jected";
233   $status_ar r[4] = "Su spended";   233   $status_ar r[4] = "Su spended";
234     234  
235   if (getPar am("free_m ode") != ' on') {   235   if (getPar am("free_m ode") != ' on') {
236       $sMemF ield = ",  `IDLevel`,  IF(ISNULL (`MemLevel s`.`Name`) ,'', `MemL evels`.`Na me`) AS `M emName`";   236       $sMemF ield = ",  `IDLevel`,  IF(ISNULL (`MemLevel s`.`Name`) ,'', `MemL evels`.`Na me`) AS `M emName`";
237        $sMemJoin    =   "LEFT   JOIN   `ProfileMe mLevels`   ON   `ProfileMe mLevels`.` ID L e v e l `=`Profile s`.`ID`     237        $sMemJoin    =   "LEFT   JOIN   `ProfileMe mLevels`   ON   `ProfileMe mLevels`.` ID M e mb e r `   =   `Profiles` .`ID`  
238                      LE FT JOIN `M emLevels`  ON `Profil eMemLevels `.`IDLevel ` = `MemLe vels`.`ID`  ";   238                      LE FT JOIN `M emLevels`  ON `Profil eMemLevels `.`IDLevel ` = `MemLe vels`.`ID`  ";
239       $sMemL evelShow =  'style="d isplay:blo ck;"';   239       $sMemL evelShow =  'style="d isplay:blo ck;"';
    240       $sGrou p = "GROUP  BY `Profi les`.`ID`" ;
240   }   241   }
241   else   242   else
242       $sMemL evelShow =  'style="d isplay:non e;"';   243       $sMemL evelShow =  'style="d isplay:non e;"';
243     244  
244     245  
245   $sQuery   =   "SELECT   `Profiles` .`ID`   as   `ID`,     246   $sQuery =  "
    247       SELECT
    248           
`Profiles` .`ID`   as   `ID`,  
246                      `N ickName`,   249           `N ickName`,
247                      `E mail`,   250           `E mail`,
248                      `S ex`,   251           `S ex`,
249                       D ATE_FORMAT (`DateLast Login`,  ' $date_form at' ) AS ` DateLastLo ginCur`,   252           DA TE_FORMAT( `DateLastL ogin`,  '$ date_forma t' ) AS `D ateLastLog inCur`,
250                       D ATE_FORMAT (`DateReg` ,  '$date_ format' )  AS `DateRe g`,   253           DA TE_FORMAT( `DateReg`,   '$date_f ormat' ) A S `DateReg `,
251                       ` Status`   254           `S tatus`
252                       $ sMemField   255           $s MemField
253                        FROM   `Profiles`   $aff_part_ f   256        FROM   `Profiles`
    257           $a ff_part_f
254                       $ sqlJoinPar t   258           $s qlJoinPart
255                       $ sMemJoin   259           $s MemJoin
256                        WHERE   1   $email_par t   $aff_part_ w   $prof_part   $sex_part   $sqlWhere   $sqlGroup   ORDER   BY   $sortor   $sorttype   LIMIT   $real_firs t_p,   $p_per_pag e;";   260       WHERE
    261           
1   $email_par t   $aff_part_ w   $prof_part   $sex_part   $sqlWhere
    262       $sqlGr oup
    263       $sGrou p
    264       ORDER  BY $sortor  $sorttype
    265       LIMIT  $real_firs t_p, $p_pe r_page
    266       ";
257     267  
258   $result =  db_res($sQ uery);   268   $result =  db_res($sQ uery);
259     269  
260   $_page['he ader'] = " Members' P rofiles";   270   $_page['he ader'] = " Members' P rofiles";
261   $_page['he ader_text' ] = "Membe rs profile s sorted b y modifica tion date" ;   271   $_page['he ader_text' ] = "Membe rs profile s sorted b y modifica tion date" ;
262   $_page['js '] = 1;   272   $_page['js '] = 1;
263   TopCodeAdm in();   273   TopCodeAdm in();
264     274  
265     275  
266   ContentBlo ckHead("To tal regist ered membe rs");   276   ContentBlo ckHead("To tal regist ered membe rs");
267     277  
268   ?>   278   ?>
269     279  
270       <table  cellspaci ng="1" cel lpadding=" 2" bgcolor ="#cccccc"  style="bo rder: none ; width: 7 0%; backgr ound-color : #ccc; te xt-align:  center;">   280       <table  cellspaci ng="1" cel lpadding=" 2" bgcolor ="#cccccc"  style="bo rder: none ; width: 7 0%; backgr ound-color : #ccc; te xt-align:  center;">
271           <t r>   281           <t r>
272                <td styl e="backgro und-color:  #E5E5E5;  text-align : left;" c lass="text ">   282                <td styl e="backgro und-color:  #E5E5E5;  text-align : left;" c lass="text ">
273                    <a h ref="<?php  echo $sit e['url_adm in']; ?>pr ofiles.php ">   283                    <a h ref="<?php  echo $sit e['url_adm in']; ?>pr ofiles.php ">
274                         Total regi stered mem bers:   284                         Total regi stered mem bers:
275                    </a>   285                    </a>
276                </td>   286                </td>
277                <td styl e="backgro und-color:  #E5E5E5;  width: 50p x; text-al ign: right ;" class=" text">   287                <td styl e="backgro und-color:  #E5E5E5;  width: 50p x; text-al ign: right ;" class=" text">
278                    <b>< ?= $n_arr[ 0] ?></b>   288                    <b>< ?= $n_arr[ 0] ?></b>
279                </td>   289                </td>
280           </ tr>   290           </ tr>
281     291  
282   <?   292   <?
283   $i = 0;   293   $i = 0;
284   $iK = 1;   294   $iK = 1;
285     295  
286   $sActEmCol or = " #FF FFFF";   296   $sActEmCol or = " #FF FFFF";
287     297  
288   while( lis t( $key, $ val ) = ea ch( $statu s_arr ) )  {   298   while( lis t( $key, $ val ) = ea ch( $statu s_arr ) )  {
289       if ( $ val == 'Ac tive' ) {   299       if ( $ val == 'Ac tive' ) {
290           $s Add = " `S tatus` = ' $val' AND  {$sqlCoupl e}";   300           $s Add = " `S tatus` = ' $val' AND  {$sqlCoupl e}";
291           $s Capt = $va l;   301           $s Capt = $va l;
292       } else  {   302       } else  {
293           if  ( $iK <=  1 ) {   303           if  ( $iK <=  1 ) {
294                $sAdd =   " `Status ` <> 'Acti ve' AND {$ sqlCouple} ";   304                $sAdd =   " `Status ` <> 'Acti ve' AND {$ sqlCouple} ";
295                $iK++;   305                $iK++;
296                $sCapt =  'Inactive ';   306                $sCapt =  'Inactive ';
297           }  else   307           }  else
298                continue ;   308                continue ;
299       }   309       }
300          310       
301       $n_arr  = db_arr(  "SELECT C OUNT(*) FR OM `Profil es` WHERE  $sAdd" );   311       $n_arr  = db_arr(  "SELECT C OUNT(*) FR OM `Profil es` WHERE  $sAdd" );
302     312  
303       if ( $ n_arr[0] )  {   313       if ( $ n_arr[0] )  {
304           ?>   314           ?>
305           <t r>   315           <t r>
306                <td clas s="text" s tyle="back ground-col or: #fffff f; text-al ign: left;  vertical- align: mid dle; paddi ng-left: 2 0px;">   316                <td clas s="text" s tyle="back ground-col or: #fffff f; text-al ign: left;  vertical- align: mid dle; paddi ng-left: 2 0px;">
307                    <img  src="imag es/arrow.g if" />   317                    <img  src="imag es/arrow.g if" />
308                    <a h ref="profi les.php?pr ofiles=<?=  $val ?>"> <?= $sCapt  ?></a>   318                    <a h ref="profi les.php?pr ofiles=<?=  $val ?>"> <?= $sCapt  ?></a>
309                </td>   319                </td>
310                <td clas s="prof_st at_<?= $va l ?>" styl e="width:  50px; text -align: ri ght;">   320                <td clas s="prof_st at_<?= $va l ?>" styl e="width:  50px; text -align: ri ght;">
311                    <?=  $n_arr[0]  ?>   321                    <?=  $n_arr[0]  ?>
312                </td>   322                </td>
313           </ tr>   323           </ tr>
314           <?   324           <?
315       }   325       }
316          326       
317       if ( g etParam("a utoApprova l_ifNoConf Email") !=  'on' && $ val != 'Ac tive' )   327       if ( g etParam("a utoApprova l_ifNoConf Email") !=  'on' && $ val != 'Ac tive' )
318       {   328       {
319           $s ActEmColor  = ' #66CC 66';   329           $s ActEmColor  = ' #66CC 66';
320           $n _arr = db_ arr( "SELE CT COUNT(* ) FROM `Pr ofiles` WH ERE `Statu s`='Unconf irmed'" );   330           $n _arr = db_ arr( "SELE CT COUNT(* ) FROM `Pr ofiles` WH ERE `Statu s`='Unconf irmed'" );
321     331  
322           if  ( $n_arr[ 0])   332           if  ( $n_arr[ 0])
323           {   333           {
324                ?>   334                ?>
325           <t r>   335           <t r>
326                <td clas s="text" s tyle="back ground-col or: #fffff f; text-al ign: left;  vertical- align: mid dle; paddi ng-left: 2 0px;">   336                <td clas s="text" s tyle="back ground-col or: #fffff f; text-al ign: left;  vertical- align: mid dle; paddi ng-left: 2 0px;">
327                    <img  src="imag es/arrow.g if" />   337                    <img  src="imag es/arrow.g if" />
328                    <a h ref="profi les.php?pr ofiles=Unc onfirmed">   338                    <a h ref="profi les.php?pr ofiles=Unc onfirmed">
329                         With uncon firmed ema ils   339                         With uncon firmed ema ils
330                    </a>   340                    </a>
331                </td>   341                </td>
332                <td clas s="prof_st at_<?= $va l ?>" styl e="width:  50px; text -align: ri ght;">   342                <td clas s="prof_st at_<?= $va l ?>" styl e="width:  50px; text -align: ri ght;">
333                    <?=  $n_arr[0]  ?>   343                    <?=  $n_arr[0]  ?>
334                </td>   344                </td>
335           </ tr>   345           </ tr>
336                <?   346                <?
337           }   347           }
338       }   348       }
339   }   349   }
340   $aMedia =  array('pho to');   350   $aMedia =  array('pho to');
341   foreach ($ aMedia as  $iK=>$sVal )   351   foreach ($ aMedia as  $iK=>$sVal )
342   {   352   {
343       $sqlUn p = "SELEC T * FROM ` media` WHE RE `med_st atus` = 'p assive' AN D `med_typ e`= '$sVal ' GROUP BY  `med_prof _id`";   353       $sqlUn p = "SELEC T * FROM ` media` WHE RE `med_st atus` = 'p assive' AN D `med_typ e`= '$sVal ' GROUP BY  `med_prof _id`";
344       $rUnp  = db_res($ sqlUnp);   354       $rUnp  = db_res($ sqlUnp);
345          355       
346       if ($r Unp && mys ql_num_row s($rUnp))   356       if ($r Unp && mys ql_num_row s($rUnp))
347       {   357       {
348           ?>   358           ?>
349           <t r>   359           <t r>
350                <td clas s="text" s tyle="back ground-col or: #fffff f; text-al ign: left;  vertical- align: mid dle;">&nbs p;&nbsp;&n bsp;&nbsp; <img src=" images/arr ow.gif" />   360                <td clas s="text" s tyle="back ground-col or: #fffff f; text-al ign: left;  vertical- align: mid dle;">&nbs p;&nbsp;&n bsp;&nbsp; <img src=" images/arr ow.gif" />
351                    <a h ref="profi les.php?me dia=photo& status=pas sive">With  unapprove d <?= $sVa l ?></a>   361                    <a h ref="profi les.php?me dia=photo& status=pas sive">With  unapprove d <?= $sVa l ?></a>
352                </td>   362                </td>
353                <td clas s="text" s tyle="widt h: 50px; t ext-align:  right;">< ?= mysql_n um_rows($r Unp) ?></t d>   363                <td clas s="text" s tyle="widt h: 50px; t ext-align:  right;">< ?= mysql_n um_rows($r Unp) ?></t d>
354           </ tr>   364           </ tr>
355           <?   365           <?
356       }   366       }
357   }   367   }
358     368  
359   ?>   369   ?>
360       </tabl e>   370       </tabl e>
361     371  
362   <?   372   <?
363   ContentBlo ckFoot();   373   ContentBlo ckFoot();
364   ContentBlo ckHead("Se arch profi le");   374   ContentBlo ckHead("Se arch profi le");
365   ?>   375   ?>
366   <table cel lspacing=0  cellpaddi ng=0 style ="border:  none; text -align: ri ght; paddi ng-bottom:  10px;" cl ass="text" >   376   <table cel lspacing=0  cellpaddi ng=0 style ="border:  none; text -align: ri ght; paddi ng-bottom:  10px;" cl ass="text" >
367       <tr>   377       <tr>
368           <t d>   378           <t d>
369                <a href= "<?= $site [url]; ?>j oin.php">A dd a new p rofile</a>   379                <a href= "<?= $site [url]; ?>j oin.php">A dd a new p rofile</a>
370           </ td>   380           </ td>
371       </tr>   381       </tr>
372   </table>   382   </table>
373     383  
374   <form meth od="get" a ction="pro files.php" >   384   <form meth od="get" a ction="pro files.php" >
375       <table  cellspaci ng="2" cel lpadding=" 2" style=" border: no ne; text-a lign: cent er; width:  100%;">   385       <table  cellspaci ng="2" cel lpadding=" 2" style=" border: no ne; text-a lign: cent er; width:  100%;">
376           <t r>   386           <t r>
377                <td alig n="center"  colspan=" 3">   387                <td alig n="center"  colspan=" 3">
378                    <inp ut class=" text" name ='search'  size="50">   388                    <inp ut class=" text" name ='search'  size="50">
379                </td>   389                </td>
380           </ tr>   390           </ tr>
381           <t r>   391           <t r>
382                <td alig n="right">   392                <td alig n="right">
383                    <inp ut name="s _nickname"  type="sub mit" value ="Search b y Nickname " />   393                    <inp ut name="s _nickname"  type="sub mit" value ="Search b y Nickname " />
384                </td>   394                </td>
385                <td alig n="center" >   395                <td alig n="center" >
386                    <inp ut name="s _mail" typ e="submit"  value="Se arch by Em ail" />   396                    <inp ut name="s _mail" typ e="submit"  value="Se arch by Em ail" />
387                </td>   397                </td>
388                <td alig n="left">   398                <td alig n="left">
389                    <inp ut name="s _id" type= "submit" v alue="Sear ch by ID"  />   399                    <inp ut name="s _id" type= "submit" v alue="Sear ch by ID"  />
390                </td>   400                </td>
391           </ tr>   401           </ tr>
392       </tabl e>   402       </tabl e>
393   </form>   403   </form>
394     404  
395   <?   405   <?
396   ContentBlo ckFoot();   406   ContentBlo ckFoot();
397   ContentBlo ckHead("Pr ofiles");   407   ContentBlo ckHead("Pr ofiles");
398   ?>   408   ?>
399     409  
400     410  
401   <center>   411   <center>
402       <?= Re sNavigatio nRet( 'Pro filesUpper ', 0 ) ?>   412       <?= Re sNavigatio nRet( 'Pro filesUpper ', 0 ) ?>
403   </center>   413   </center>
404     414  
405   <form acti on="profil es.php<?=  substr( ge t_vars(),  0, strlen( $get_vars)  - 1 ) ?>"  method="p ost" name= "prf_form" >   415   <form acti on="profil es.php<?=  substr( ge t_vars(),  0, strlen( $get_vars)  - 1 ) ?>"  method="p ost" name= "prf_form" >
406       <table  cellspaci ng="1" cel lpadding=" 0" class=" small1" st yle="borde r: none; b ackground- color: #ee e; width:  590px; tex t-align: c enter;">   416       <table  cellspaci ng="1" cel lpadding=" 0" class=" small1" st yle="borde r: none; b ackground- color: #ee e; width:  590px; tex t-align: c enter;">
407          417       
408   <?   418   <?
409   if ( !$p_n um )   419   if ( !$p_n um )
410       echo " <td class= panel>No p rofiles av ailable</t d>";   420       echo " <td class= panel>No p rofiles av ailable</t d>";
411   else {   421   else {
412       ?>   422       ?>
413           <t r class="p anel">   423           <t r class="p anel">
414                <td>&nbs p;</td>   424                <td>&nbs p;</td>
415                <td alig n="center" >   425                <td alig n="center" >
416                    <a h ref="profi les.php?<? = $inc_pro files ?>so rtor=ID&p_ per_page=< ?= $p_per_ page ?>">I D</a>   426                    <a h ref="profi les.php?<? = $inc_pro files ?>so rtor=ID&p_ per_page=< ?= $p_per_ page ?>">I D</a>
417                    <?=  ( $sortor  == 'ID' )  ? $sortor_ image : ''  ?>   427                    <?=  ( $sortor  == 'ID' )  ? $sortor_ image : ''  ?>
418                </td>   428                </td>
419                <td alig n="center" >   429                <td alig n="center" >
420                    <a h ref="profi les.php?<? = $inc_pro files ?>so rtor=NickN ame&p_per_ page=<?= $ p_per_page  ?>">   430                    <a h ref="profi les.php?<? = $inc_pro files ?>so rtor=NickN ame&p_per_ page=<?= $ p_per_page  ?>">
421                         NickName   431                         NickName
422                    </a>   432                    </a>
423                    <?=  ( $sortor  =='NickNam e' ) ? $so rtor_image  : '' ?>   433                    <?=  ( $sortor  =='NickNam e' ) ? $so rtor_image  : '' ?>
424                </td>   434                </td>
425                <td alig n="center" >E-mail</t d>   435                <td alig n="center" >E-mail</t d>
426                <td alig n="center" >Registere d</td>   436                <td alig n="center" >Registere d</td>
427                   437                
428                <td alig n="center" >   438                <td alig n="center" >
429                    <a h ref="profi les.php?<? = $inc_pro files ?>so rtor=DateL astLogin&p _per_page= <?= $p_per _page ?>">   439                    <a h ref="profi les.php?<? = $inc_pro files ?>so rtor=DateL astLogin&p _per_page= <?= $p_per _page ?>">
430                         Last Visit ed   440                         Last Visit ed
431                    </a>   441                    </a>
432                    <?=  ( $sortor  == 'DateLa stLogin' )  ? $sortor _image : ' ' ?>   442                    <?=  ( $sortor  == 'DateLa stLogin' )  ? $sortor _image : ' ' ?>
433                </td>   443                </td>
434                   444                
435                <td alig n="center" >Photos</t d>   445                <td alig n="center" >Photos</t d>
436                <td alig n="center" >Audio</td >   446                <td alig n="center" >Audio</td >
437                <td alig n="center" >BGs</td>   447                <td alig n="center" >BGs</td>
438                <td alig n="center"  <?= $sMem LevelShow  ?> style=" display:no ne;">Membe rship</td>   448                <td alig n="center"  <?= $sMem LevelShow  ?> style=" display:no ne;">Membe rship</td>
439           </ tr>   449           </ tr>
440       <?   450       <?
441          451       
442       while  ( $p_arr =  mysql_fet ch_array(  $result )  ) {   452       while  ( $p_arr =  mysql_fet ch_array(  $result )  ) {
443           $c ol = "tabl e";   453           $c ol = "tabl e";
444           $s Email = $p _arr['Stat us'] == 'U nconfirmed ' ? '<span  style="ba ckground-c olor: #FF6 666;">'.$p _arr['Emai l'].'</spa n>' : '<sp an style=" background -color:'.$ sActEmColo r.';">'.$p _arr['Emai l'].'</spa n>';   454           $s Email = $p _arr['Stat us'] == 'U nconfirmed ' ? '<span  style="ba ckground-c olor: #FF6 666;">'.$p _arr['Emai l'].'</spa n>' : '<sp an style=" background -color:'.$ sActEmColo r.';">'.$p _arr['Emai l'].'</spa n>';
445           $s BannedColo r = (isLog gedBanned( $p_arr['ID '])==true)  ? '#F99'  : '#fff';   455           $s BannedColo r = (isLog gedBanned( $p_arr['ID '])==true)  ? '#F99'  : '#fff';
446           ?>   456           ?>
447     457  
448           <t r class=<? =$col?> st yle="backg round-colo r: <?= $sB annedColor  ?>;">   458           <t r class=<? =$col?> st yle="backg round-colo r: <?= $sB annedColor  ?>;">
449                <td alig n="center" >   459                <td alig n="center" >
450                    <inp ut type=ch eckbox nam e="<?= $p_ arr[ID] ?> " />   460                    <inp ut type=ch eckbox nam e="<?= $p_ arr[ID] ?> " />
451                </td>   461                </td>
452                   462                
453                <td>   463                <td>
454                    <a h ref="../pe dit.php?ID =<?= $p_ar r[ID]; ?>" >   464                    <a h ref="../pe dit.php?ID =<?= $p_ar r[ID]; ?>" >
455                         <?= $p_arr [ID] ?>   465                         <?= $p_arr [ID] ?>
456                    </a>   466                    </a>
457                </td>   467                </td>
458                   468                
459                <td><?=  $p_arr['Ni ckName'] ? ></td>   469                <td><?=  $p_arr['Ni ckName'] ? ></td>
460                   470                
461                <td><?=  $sEmail ?> </td>   471                <td><?=  $sEmail ?> </td>
462                   472                
463                <td alig n="center" ><?= $p_ar r['DateReg '] ?></td>   473                <td alig n="center" ><?= $p_ar r['DateReg '] ?></td>
464                <td alig n="center" ><?= $p_ar r['DateLas tLoginCur' ] ?></td>   474                <td alig n="center" ><?= $p_ar r['DateLas tLoginCur' ] ?></td>
465                <td><?=  getUserMed ia($p_arr[ 'ID'], 'ph oto') ?></ td>   475                <td><?=  getUserMed ia($p_arr[ 'ID'], 'ph oto') ?></ td>
466                <td alig n="center" ><?= getUs erMedia($p _arr['ID'] , 'audio')  ?></td>   476                <td alig n="center" ><?= getUs erMedia($p _arr['ID'] , 'audio')  ?></td>
467                <td alig n="center" ><?= getUs erMedia($p _arr['ID'] , 'bg') ?> </td>   477                <td alig n="center" ><?= getUs erMedia($p _arr['ID'] , 'bg') ?> </td>
468                <td alig n="center"  <?= $sMem LevelShow  ?>>   478                <td alig n="center"  <?= $sMem LevelShow  ?>>
469                    <?=  strlen( $p _arr['MemN ame'] ) ?  $p_arr['Me mName'] :  'Standard'  ?>   479                    <?=  strlen( $p _arr['MemN ame'] ) ?  $p_arr['Me mName'] :  'Standard'  ?>
470                </td>   480                </td>
471           </ tr>   481           </ tr>
472     482  
473           <?   483           <?
474       }   484       }
475   }   485   }
476   ?>   486   ?>
477       </tabl e>   487       </tabl e>
478     488  
479       <table  class=tex t style="b order: non e; width:  590px; tex t-align: c enter;">   489       <table  class=tex t style="b order: non e; width:  590px; tex t-align: c enter;">
480           <t r>   490           <t r>
481                <td>   491                <td>
482                    <tab le cellpad ding="0" c ellspacing ="0" borde r="0">   492                    <tab le cellpad ding="0" c ellspacing ="0" borde r="0">
483                         <tr>   493                         <tr>
484                             <td wi dth="60">   494                             <td wi dth="60">
485                                 <a  href="#"  onclick="s etCheckbox es( 'prf_f orm', true  ); return  false;">   495                                 <a  href="#"  onclick="s etCheckbox es( 'prf_f orm', true  ); return  false;">
486                                      Check al l   496                                      Check al l
487                                 </ a>   497                                 </ a>
488                             </td>   498                             </td>
489                             <td al ign="left"  width="14 0">   499                             <td al ign="left"  width="14 0">
490                                 <a  href="#"  onclick="s etCheckbox es( 'prf_f orm', fals e ); retur n false;">   500                                 <a  href="#"  onclick="s etCheckbox es( 'prf_f orm', fals e ); retur n false;">
491                                      Uncheck  all   501                                      Uncheck  all
492                                 </ a>   502                                 </ a>
493                             </td>   503                             </td>
494                             <td wi dth="90" a lign="cent er"><input  class=tex t type=sub mit name=" prf_form_s ubmit" val ue="Delete " /></td>   504                             <td wi dth="90" a lign="cent er"><input  class=tex t type=sub mit name=" prf_form_s ubmit" val ue="Delete " /></td>
495                             <td wi dth="90" a lign="cent er"><input  class=tex t type=sub mit name=" prf_form_s ubmit" val ue="Confir m Email" / ></td>   505                             <td wi dth="90" a lign="cent er"><input  class=tex t type=sub mit name=" prf_form_s ubmit" val ue="Confir m Email" / ></td>
496                             <td wi dth="90" a lign="cent er"><input  class=tex t type=sub mit name=" prf_form_s ubmit" val ue="Activa te" /></td >   506                             <td wi dth="90" a lign="cent er"><input  class=tex t type=sub mit name=" prf_form_s ubmit" val ue="Activa te" /></td >
497                             <td wi dth="90" a lign="cent er"><input  class=tex t type=sub mit name=" prf_form_s ubmit" val ue="Approv al" /></td >   507                             <td wi dth="90" a lign="cent er"><input  class=tex t type=sub mit name=" prf_form_s ubmit" val ue="Approv al" /></td >
498                         </tr>   508                         </tr>
499                         <tr>   509                         <tr>
500                             <td></ td>   510                             <td></ td>
501                             <td></ td>   511                             <td></ td>
502                             <td></ td>   512                             <td></ td>
503                             <td al ign="cente r">   513                             <td al ign="cente r">
504                                 Ba n time<br  />   514                                 Ba n time<br  />
505                                 (i n hours)   515                                 (i n hours)
506                                 <i nput class =text type =text name ="time_hrs " value="1 " style="w idth:70px; " />   516                                 <i nput class =text type =text name ="time_hrs " value="1 " style="w idth:70px; " />
507                             </td>   517                             </td>
508                             <td al ign="cente r"><input  class=text  type=subm it name="p rf_form_su bmit" valu e="Ban" /> </td>   518                             <td al ign="cente r"><input  class=text  type=subm it name="p rf_form_su bmit" valu e="Ban" /> </td>
509                             <td al ign="cente r"><input  class=text  type=subm it name="p rf_form_su bmit" valu e="UnBan"  /></td>   519                             <td al ign="cente r"><input  class=text  type=subm it name="p rf_form_su bmit" valu e="UnBan"  /></td>
510                         </tr>   520                         </tr>
511                    </ta ble>   521                    </ta ble>
512                </td>   522                </td>
513           </ tr>   523           </ tr>
514           <t r>   524           <t r>
515                <td alig n="center" >   525                <td alig n="center" >
516                    <hr  style="wid th:90%; co lor:#e4e4e 4; height: 1px;">   526                    <hr  style="wid th:90%; co lor:#e4e4e 4; height: 1px;">
517                    <tex tarea name ="Message"  style="wi dth:540px;  height:10 0px;"></te xtarea>   527                    <tex tarea name ="Message"  style="wi dth:540px;  height:10 0px;"></te xtarea>
518                </td>   528                </td>
519           </ tr>   529           </ tr>
520           <t r>   530           <t r>
521                <td  ali gn="center ">   531                <td  ali gn="center ">
522                    <inp ut class=t ext type=s ubmit name ="prf_form _submit" v alue="Send  Message"  />   532                    <inp ut class=t ext type=s ubmit name ="prf_form _submit" v alue="Send  Message"  />
523                </td>   533                </td>
524           </ tr>   534           </ tr>
525       </tabl e>   535       </tabl e>
526   </form>   536   </form>
527     537  
528     538  
529   <center>   539   <center>
530       <?= Re sNavigatio nRet( 'Pro filesLower ', 0 ) ?>   540       <?= Re sNavigatio nRet( 'Pro filesLower ', 0 ) ?>
531   </center>   541   </center>
532     542  
533   <?   543   <?
534   ContentBlo ckFoot();   544   ContentBlo ckFoot();
535   ContentBlo ckFoot();   545   ContentBlo ckFoot();
536   BottomCode ();   546   BottomCode ();
537     547  
538     548  
539     549  
540     550  
541     551  
542     552  
543     553  
544     554  
545   function g etUserMedi a($ID, $sT ype = '')   555   function g etUserMedi a($ID, $sT ype = '')
546   {   556   {
547       switch  ($sType)   557       switch  ($sType)
548       {   558       {
549           ca se 'video'   559           ca se 'video'
550                break;   560                break;
551           ca se 'audio' :   561           ca se 'audio' :
552                $sAct     = " AND ` Owner`='$I D'";   562                $sAct     = " AND ` Owner`='$I D'";
553                $sPas     = " AND ` Owner`='$I D'";   563                $sPas     = " AND ` Owner`='$I D'";
554                $sqlAct   = "SELECT  COUNT(*)  as `Num` F ROM `RayMp 3Files` WH ERE 1 $sAc t";   564                $sqlAct   = "SELECT  COUNT(*)  as `Num` F ROM `RayMp 3Files` WH ERE 1 $sAc t";
555                //$sqlPa s  = "SELE CT COUNT(* ) as `Num`  FROM `Ray Mp3Files`  WHERE 1 $s Pas";   565                //$sqlPa s  = "SELE CT COUNT(* ) as `Num`  FROM `Ray Mp3Files`  WHERE 1 $s Pas";
556                $sqlPas   = "SELECT  COUNT(*)  as `Num` F ROM `RayMp 3Files` WH ERE 0";   566                $sqlPas   = "SELECT  COUNT(*)  as `Num` F ROM `RayMp 3Files` WH ERE 0";
557                $sHrefA   = 'post_m od_audio.p hp?iUser=' .$ID;   567                $sHrefA   = 'post_m od_audio.p hp?iUser=' .$ID;
558                $sHrefP   = 'post_m od_audio.p hp?iUser=' .$ID;   568                $sHrefP   = 'post_m od_audio.p hp?iUser=' .$ID;
559                break;   569                break;
560           ca se 'photo' :   570           ca se 'photo' :
561                $sAct     = " AND ` med_status `='active'  AND `med_ prof_id`=' $ID'";   571                $sAct     = " AND ` med_status `='active'  AND `med_ prof_id`=' $ID'";
562                $sPas     = " AND ` med_status `='passive ' AND `med _prof_id`= '$ID'";   572                $sPas     = " AND ` med_status `='passive ' AND `med _prof_id`= '$ID'";
563                $sqlAct   = "SELECT  COUNT(*)  as `Num` F ROM `media ` WHERE `m ed_type`=' $sType' $s Act";   573                $sqlAct   = "SELECT  COUNT(*)  as `Num` F ROM `media ` WHERE `m ed_type`=' $sType' $s Act";
564                $sqlPas   = "SELECT  COUNT(*)  as `Num` F ROM `media ` WHERE `m ed_type`=' $sType' $s Pas";   574                $sqlPas   = "SELECT  COUNT(*)  as `Num` F ROM `media ` WHERE `m ed_type`=' $sType' $s Pas";
565                $sHrefA   = 'post_m od_photos. php?media= photo&stat us=active& iUser='.$I D;   575                $sHrefA   = 'post_m od_photos. php?media= photo&stat us=active& iUser='.$I D;
566                $sHrefP   = 'post_m od_photos. php?media= photo&stat us=passive &iUser='.$ ID;   576                $sHrefP   = 'post_m od_photos. php?media= photo&stat us=passive &iUser='.$ ID;
567                break;   577                break;
568                   578                
569           ca se 'bg':   579           ca se 'bg':
570                $sqlAct   = "SELECT  COUNT(*)  as `Num` F ROM `Profi lesSetting s` WHERE ` IDmember`= '$ID' AND  `Status`=' Active' AN D `Backgro undFilenam e`<>''";   580                $sqlAct   = "SELECT  COUNT(*)  as `Num` F ROM `Profi lesSetting s` WHERE ` IDmember`= '$ID' AND  `Status`=' Active' AN D `Backgro undFilenam e`<>''";
571                $sqlPas   = "SELECT  COUNT(*)  as `Num` F ROM `Profi lesSetting s` WHERE ` IDmember`= '$ID' AND  (`Status`  IS NULL OR  `Status`< >'Active')  AND `Back groundFile name`<>''" ;   581                $sqlPas   = "SELECT  COUNT(*)  as `Num` F ROM `Profi lesSetting s` WHERE ` IDmember`= '$ID' AND  (`Status`  IS NULL OR  `Status`< >'Active')  AND `Back groundFile name`<>''" ;
572                $sHrefA   = 'post_m od_profile s.php?iUse r='.$ID.'& status=act ive';   582                $sHrefA   = 'post_m od_profile s.php?iUse r='.$ID.'& status=act ive';
573                $sHrefP   = 'post_m od_profile s.php?iUse r='.$ID;   583                $sHrefP   = 'post_m od_profile s.php?iUse r='.$ID;
574                break;   584                break;
575       }   585       }
576       $sActP art = db_v alue($sqlA ct) > 0 ?  '<div clas s="activeM edia"><a h ref="'.$sH refA.'">'. db_value($ sqlAct).'< /a></div>'  : '';   586       $sActP art = db_v alue($sqlA ct) > 0 ?  '<div clas s="activeM edia"><a h ref="'.$sH refA.'">'. db_value($ sqlAct).'< /a></div>'  : '';
577       $sPasP art = strl en($sqlPas ) && db_va lue($sqlPa s) > 0 ? ' <div class ="passiveM edia"><a h ref="'.$sH refP.'">'. db_value($ sqlPas).'< /a></div>'  : '';   587       $sPasP art = strl en($sqlPas ) && db_va lue($sqlPa s) > 0 ? ' <div class ="passiveM edia"><a h ref="'.$sH refP.'">'. db_value($ sqlPas).'< /a></div>'  : '';
578          588       
579       return  $sActPart .$sPasPart ;   589       return  $sActPart .$sPasPart ;
580   }   590   }
581     591  
582   ?>   592   ?>