YOU asked for it ;o)
<?php
session_start();
require(\"php_include.php\");
if (!isset($user)) { header(\"location: default.asp\");
$url=\"
http://www.eksperten.dk/bruger.phtml?navn=\".urlencode($user).\"&i8=1\";
$arr_content = @file($url);
$e_statsishome=false;
if (is_array($arr_content)) {
$content = join(\"\", $arr_content);
$content = strtolower($content);
$send = strpos($content, \"helvetica\\\" size=\\\"1\\\" color=\\\"#d9d9d9\\\"><b>top \"); $content = substr($content, 0, $send);
$send = strpos($content, \"<input type=\\\"hidden\\\" name=\\\"i12\\\" value=\\\"0\\\">\"); $content = substr($content, $send, strlen($content));
preg_match_all(\"/(>+[0-9\\: -]+<)/\", $content, $regs, PREG_PATTERN_ORDER);
for ($i=0; $i< sizeof($regs)-1; $i++) {
for ($x=0; $x< sizeof($regs[$i]); $x++) {
$e_stats[$i]=ereg_replace(\"(\\<|\\>)\", \"\", $regs[$i][$x]);
}
}
$e_statsishome=true;
}
$user=str_replace(\"\'\", \"\'\'\", $user);
$link=mysql_connect(\"ha ha\",\"nææ nej!\",\"tror du selv ?\") or die(\"Kunne ikke etablere forbindelse til databasen! Prøv igen senere...\");
mysql_selectdb(\"tdaugaard\");
$res=mysql_query(\"SELECT fotx_users.*,fotx_drinks.name AS drink FROM fotx_users INNER JOIN fotx_drinks ON fotx_drinks.id=fotx_users.favdrink WHERE user=\'$user\'\",$link);
if ($sq_user = mysql_fetch_array($res)) {
$sethits=false;
if (!isset($userid)) { setcookie(\"userid\",session_id(),time()+99999); $userid=session_id();}
$res=mysql_query(\"SELECT * FROM fotx_visits WHERE userid=\'$userid\' AND uservisited=\'$user\'\", $link);
if ($row = mysql_fetch_array($res)) {
if (datediff(\"d\", $row[\"datetime\"],now())>0) {
mysql_query(\"DELETE FROM fotx_visits WHERE id=\".$row[\"id\"],$link);
mysql_query(\"INSERT INTO fotx_visits (userid,uservisited,datetime) VALUES (\'$userid\',\'$user\',now())\", $link);
$sethits=true;
}
} else {
mysql_query(\"INSERT INTO fotx_visits (userid,uservisited) VALUES (\'$userid\',\'$user\')\", $link);
$sethits=true;
}
if ($sethits) { mysql_query(\"UPDATE fotx_users SET hits=hits+1 WHERE user=\'$user\'\", $link); }
$user_realname = \"\".$sq_user[\"realname\"];
$user_email = \"\".$sq_user[\"email\"];
$user_drink = \"\".$sq_user[\"drink\"];
$user_age = $sq_user[\"age\"];
$user_sex = $sq_user[\"sex\"];
$user_icq = \"\".$sq_user[\"icq\"];
$user_http = \"\".$sq_user[\"http\"];
$user_text = \"\".$sq_user[\"text\"];
$user_picture = \"\".$sq_user[\"picture\"];
$user_hits = $sq_user[\"hits\"] + $sq_user[\"oldhits\"];
$user_geekrate = $sq_user[\"geekrate\"];
$user_area = $sq_user[\"area\"];
$user_raters = $sq_user[\"raters\"];
$res=mysql_query(\"SELECT name FROM fotx_areas WHERE id=$user_area\", $link);
if ($row=mysql_fetch_array($res)) { $user_area = $row[0]; } else { $user_area = \"(ikke angivet)\"; }
if ($user_raters > 0) {
$user_gprate = $user_raters * 5;
$ratepercent = ($user_geekrate * 100) / $user_gprate;
$nsize = (298 / 100) * $ratepercent;
}
if (!$user_realname) {$user_realname = \"-\"; }
if (!$user_email) { $user_email = \"-\"; } else { $user_email = \"<a href=\\\"mailto:$user_email\\\">$user_email</a>\"; }
if ($user_age < 1 || $user_age > 100) { $user_age = \"-\"; } else { $user_age = \"$user_age år\"; }
if (!$user_icq || !is_numeric($user_icq)) {
$user_icq = \"-\";
} else {
$user_icq = \"<img src=\\\"
http://wwp.icq.com/scripts/online.dll?icq=$user_icq&img=5\\\"> <a href=\\\"
http://wwp.mirabilis.com/scripts/search.dll?to=$user_icq\\\">$user_icq</a>\"; }
if (!$user_http) { $user_http = \"-\"; } else { $user_http = format_post2(strtolower($user_http)); }
if (!$user_text) {
$user_text = \"-\";
} else {
$user_text = format_post2($user_text);
$user_text = nl2br($user_text);
$user_text = str_replace(\"<ul><br>\", \"<ul>\", $user_text);
}
if (!$user_picture) {
$user_picture = \"nopic.gif\";
} else {
$user_picture = \"pictures/$user_picture\";
$user_picbig = \"<br><a href=\\\"#\\\" onclick=\\\"java script:window.open(\'$user_picture\');\\\"><font size=\\\"1\\\">Se billede i fuld størrelse</font></a>\";
}
switch ($user_sex) {
case 0: $user_sex = \"-\"; break;
case 1: $user_sex = \"Mand\"; break;
case 2: $user_sex = \"Kvinde\"; break;
}
// echo date(\"d-m-Y @ H:i:s\", $e_stats[0]);
/* if ($e_statsishome) {
$e_days = datediff(\"d\", $e_stats[0], now());
$e_point = number_format($user_Point, 0, True, True, True) ;
$e_point_dag = FormatNumber(($user_Point / (intDays + 1)), 1, True, True, True);
// strDateTime = FormatDateTime($user_DOC, vbLongDate) & \" @ \" & FormatDateTime($user_DOC, vbLongTime) & \" (\" & intDays & \" dage)\"
} else {
$e_point = \"N/A\";
$e_point_dag = \"N/A\";
$e_datedime = \"N/A\";
} */
}
?>
<table cellspacing=\"0\" cellpadding=\"1\" border=\"0\" width=\"100%\" bgcolor=\"#000000\">
<tr>
<td bgcolor=\"#000000\">
<table cellspacing=\"0\" cellpadding=\"0\" border=\"0\" width=\"100%\">
<tr bgcolor=\"#336699\"><td class=\"small\"><img src=\"t.gif\" width=\"4\" height=\"1\"><font color=\"#D9D9D9\"><b>Bruger: <%=Request(\"user\")%></b> (<%=$user_hits%> hits)</font></td></tr>
<tr><td bgcolor=\"#000000\" colspan=\"7\"><img src=\"t.gif\" width=\"1\" height=\"1\"></td></tr>
<tr><td class=\"small\">
<table cellspacing=\"0\" cellpadding=\"0\" border=\"0\" bgcolor=\"#3399CC\" width=\"100%\">
<tr>
<td valign=\"top\">
<table cellspacing=\"4\" cellpadding=\"0\" border=\"0\" width=\"139\">
<tr><td width=\"134\"><img src=\"<%=$user_picture%>\" width=\"131\" height=\"170\"><%=$user_picbig%></td></tr>
</table>
</td>
<td valign=\"top\">
<img src=\"t.gif\" width=\"1\" height=\"2\"><br>
<table cellspacing=\"0\" cellpadding=\"0\" border=\"0\">
<tr><td width=\"110\" valign=\"top\"><b>Brugernavn:</b></td> <td valign=\"top\"><%=$user_User%><td></tr>
<tr><td width=\"110\" valign=\"top\"><b>Rigtige navn:</b></td> <td valign=\"top\"><%=$user_realname%><td></tr>
<tr><td width=\"110\" valign=\"top\"><b>Alder:</b></td> <td valign=\"top\"><%=$user_age%><td></tr>
<tr><td width=\"110\" valign=\"top\"><b>Køn:</b></td> <td valign=\"top\"><%=$user_sex%><td></tr>
<tr><td width=\"110\" valign=\"top\"><b>Bosat i:</b></td> <td valign=\"top\"><%=$user_Area%><td></tr>
<tr><td width=\"110\" valign=\"top\"><b> </b></td> <td valign=\"top\"> <td></tr>
<tr><td width=\"110\" valign=\"top\"><b>E. Oprettelse:</b></td> <td valign=\"top\"><%=strDateTime%><td></tr>
<tr><td width=\"110\" valign=\"top\"><b># E. Point:</b></td> <td valign=\"top\"><%=strPoint%><td></tr>
<tr><td width=\"110\" valign=\"top\"><b># E. Point/Dag:</b></td><td valign=\"top\"><%=strPointDag%><td></tr>
<tr><td width=\"110\" valign=\"top\"><b> </b></td> <td valign=\"top\"> <td></tr>
<tr><td width=\"110\" valign=\"top\"><b>Email:</b></td> <td valign=\"top\"><%=$user_email%><td></tr>
<tr><td width=\"110\" valign=\"top\"><b>ICQ #:</b></td> <td valign=\"top\"><%=$user_icq%><td></tr>
<tr><td width=\"110\" valign=\"top\"><b>Website:</b></td> <td valign=\"top\"><%=$user_http%><td></tr>
<tr><td width=\"110\" valign=\"top\"><b>Yndlings drik:</b></td> <td valign=\"top\"><%=$user_drink%><td></tr>
<tr><td width=\"110\" valign=\"top\"><b>Fritekst:</b></td> <td valign=\"top\"><%=$user_text%><td></tr>
<% if ($user_picbig > \"\" Then %>
<tr><td width=\"110\" valign=\"top\"> </td> <td valign=\"top\"> <td></tr>
<tr><td width=\"110\" valign=\"top\"><b>Geek rate:</b></td> <td valign=\"top\">
<% if ($user_raters > 0 Then %>
<table cellspacing=\"0\" cellpadding=\"0\" border=\"0\">
<tr>
<td width=\"1\" bgcolor=\"#000000\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
<td width=\"<%=$nsize%>\" bgcolor=\"#000000\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
<td width=\"1\" bgcolor=\"#000000\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
</tr>
<tr>
<td width=\"1\" bgcolor=\"#000000\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
<td width=\"<%=$nsize%>\" bgcolor=\"#336699\"> <img src=\"t.gif\" width=\"<%=$nsize%>\" height=\"11\"></td>
<td width=\"1\" bgcolor=\"#000000\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
</tr>
<tr>
<td width=\"1\" bgcolor=\"#000000\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
<td width=\"<%=$nsize%>\" bgcolor=\"#000000\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
<td width=\"1\" bgcolor=\"#000000\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
</tr>
</table>
<% Else %>
<table cellspacing=\"0\" cellpadding=\"0\" border=\"0\">
<tr>
<td width=\"1\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
<td width=\"<%=$nsize%>\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
<td width=\"1\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
</tr>
<tr>
<td width=\"1\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
<td width=\"<%=$nsize%>\"> <img src=\"t.gif\" width=\"<%=$nsize%>\" height=\"11\"></td>
<td width=\"1\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
</tr>
<tr>
<td width=\"1\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
<td width=\"<%=$nsize%>\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
<td width=\"1\"> <img src=\"t.gif\" width=\"1\" height=\"1\"></td>
</tr>
</table>
<% End If %>
<table cellspacing=\"0\" cellpadding=\"0\" border=\"0\">
<tr>
<td width=\"298\"><img src=\"t.gif\" width=\"1\" height=\"1\"></td>
</tr>
<tr>
<td width=\"298\" bgcolor=\"#000000\"><img src=\"t.gif\" width=\"1\" height=\"1\"></td>
</tr>
</table>
<td></tr>
<tr><td></td><td>
<form action=\"geekrate.asp\" method=\"get\" name=\"frmRate\">
<input type=\"hidden\" name=\"user\" value=\"<%=$user_User%>\">
Hvordan vil du rate <%=$user_User%>\'s geekness ?<br>
<select name=\"geekness\">
<option value=\"0\">(Vælg)</option>
<option value=\"1\">Uvidende wannabe</option>
<option value=\"2\">Nogenlunde normal</option>
<option value=\"3\">Meget normal</option>
<option value=\"4\">En *smule* geek</option>
<option value=\"5\">Total geek!</option>
</select>
<input type=\"submit\" value=\"Udfør\">
</form>
</td></tr>
<% End If %>
</table>
</td>
</tr>
</table>
</td></tr>
</table>
</td>
</tr>
</table>
<font size=\"1\">E. = Eksperten.dk<font>