PHP Code:
<?php
error_reporting(E_ALL & ~E_NOTICE);
define('NO_REGISTER_GLOBALS', 1);
define('THIS_SCRIPT','chat');
require_once('./global.php');
$advertising = "";
$direktory = "./images/banners";
$handle=opendir($direktory);
while ($file = readdir($handle)) {
$filelist[] = $file;
}
asort($filelist);
while (list ($a, $file) = each ($filelist)) {
if ($file == "." || $file == ".." || $file == "index.htm" || $file == "CVS") {
} else {
$bild = "./images/banners/$file";
$info = getimagesize($bild);
$id = filesize($bild);
$size = round ($id / 1024 ,2);
$advertising .= "<IMG SRC=\"".$vbulletin->options['bburl']."/images/banners/".$file."\"><BR>Pixel : ". $info[0] ." x " . $info[1] ." ca. ".$size." KB";
$advertising .= "
<BR>
<BR>
<table cellpadding=\"0\" cellspacing=\"0\" border=\"0\" width=\"745px\">
<tr>
<td class=\"smallfont\" align=\"left\">
Source Code to be linked:</td><td class=\"smallfont\" align=\"right\">
(Box Double-Click copies source code to clipboard)
</td>
</tr>
</table>";
$advertising .= "<a ondblclick='java_script_:window.clipboardData.setData(\"Text\",
this.innerText); alert(\"Source Code copied into clipboard.\");'>
<pre><div class=\"alt2\" style=\"margin:0px; padding:6px; border:1px inset;
width:745px; height:70px; overflow:auto; text-align:left\">
<code style=\"white-space:nowrap\">
<!-- " . $vbulletin->options['bburl'] ." Advertising Start --><BR>
<A HREF=\"".$vbulletin->options['bburl']."\"><BR><IMG SRC=\"".$vbulletin->options['bburl']."/images/banners/".$file."\" border=\"0\" ></A><BR>
<!-- " . $vbulletin->options['bburl'] ." Advertising End -->
</code></pre>
</A><BR><BR>";
}
}
eval('$navbar = "' . fetch_template('navbar') . '";');
eval('print_output("' . fetch_template('LinkMe') . '");');
?>
The above code stopped working after I upgrade to the latest version of VB - Pls tell me what I have to do to get this working again.
The URL is
http://www.hotwebhostingtalk.com/LinkMe.php