Multiple Ads for VB3.x not working? Tried all previous posts.

Hi,

The main site (www.myprotein.co.uk) is running Coldfusion and I have successfully added 5 text-link's to the footer of each of .CFM pages using the script posted on this forum - this works great!

The forum (www.myprotein.co.uk/forum) is part of the site runs VB3 and is running PHP on Windows Server 2003. I have followed the set-up instructions and edited the ad_network.php (its the latest one) file so its uses the a shared ad_network_txt.txt file in the root. This is what I changed it too:

$ad_file = '../ad_network_ads.txt';

PHP:

I made all the other changes per setup.

Within the footer i added:

$ad_network[0] $ad_network[1] $ad_network[2] $ad_network[0] $ad_network[3] $ad_network[4]

The problem is I just get one link repeated 5 times?

I tried using implode but then it returns nothing?

Can anyone help as Im pulling my hair out!

Thanks

 

This is it:

<?php

	if (!function_exists('file_get_contents')) {
		function file_get_contents($url) {
			$handle = fopen($url, 'r');
			$string = fread($handle, 4096000);
			fclose($handle);
			return $string;
		}
	}
	
	if (!function_exists('make_seed')) {
		function make_seed() {
			list($usec, $sec) = explode(' ', microtime());
			return (float) $sec + ((float) $usec * 100000);
		}
		srand (make_seed());
	}

	if (!isset($_SERVER)) $_SERVER = $HTTP_SERVER_VARS;

	$ad_file = '../ad_network_ads.txt';
	for ($i = 0; $i <= 11; $i++) {
		$p = substr ('../../../../../../../../../../', 0, $i * 3);
		if (file_exists ($p . $ad_file)) {
			$ad_file = $p . $ad_file;
			break;
		}
	}

	if (is_writable ($ad_file)) {
		$ads = file_get_contents ($ad_file);
		$ads = explode ('<ad_break>', $ads);

		if (count ($ads) < 401 || $ads[0] + 900 < time()) {
			$new_ad = file_get_contents ('http://ads.digitalpoint.com/network.php?s=' . $_SERVER['SERVER_NAME'] . '&type=link');
			$ads[] = $new_ad;
			$ads[0] = time();
			if (count ($ads) > 401) unset ($ads[1]);
			if ($new_ad) {
				$file = fopen($ad_file, 'r+');
				if (flock ($file, LOCK_EX)) {
					fwrite ($file, implode ('<ad_break>', $ads));
					ftruncate ($file, ftell($file));
					flock ($file, LOCK_UN);
				}
				fclose ($file);
			}
			$ad = end ($ads);
		} else {
			$ad = $ads[rand(1,count($ads) - 1)];
		}
		$ad_network[] = $ad;
		while (count ($ad_network) < 5) {
			$ad_network[] = $ads[rand(1,count($ads) - 1)];
		}
	} else {
		$ad_network[] = 'You must set the "ad_network_ads.txt" file to be writable.';
	}
	if (substr (@$_SERVER['DOCUMENT_NAME'], -6) == '.shtml') {
		ini_set ('zlib.output_compression', 0);
		echo end ($ad_network);
	}

?>

PHP:

 

Ok changed to abs path:

$ad_file = 'D:\Inetpub\myprotein\ad_network_ads.txt';

PHP:

...but it still dupes the links? You can see it here: (www[dot]myprotein co.uk/forum/)

This is the code I have in the footer:

$ad_network[0] $ad_network[1]

PHP:

Please help as this is very fustrating.

 

There is 7k's worth... (thanks for your cont. help)

 

Darn it is a werid one.

Im hosting @ crystaltech.com on Win Server 2003 box which has windows PHP support so that maybe is the issue?

Is there any other way of getting it to work using a HTML or CFML method?

 

PHP Version 4.x (windows) the box also supports CFMX and ActiveState Perl.

 

Ah sorry.

Taken from phpinfo()

PHP Version 4.3.9

 

It looks like you might have quotes around part of an implode statement.

echo "(\" \", $ad_network)";

PHP:

using the above statement I come close to duplicating the output I see on your page. It needs to be

echo implode(' ', $ad_network);   //  without any extra quotes.

PHP:

 

I did try adding the implode function to the "footer style" as I read this fix on another post. Your correct it doesn't work.

Well I'm stumped which is a shame as my forum is PR6 so was hoping to get multiple links on there...

Is there anyway of me hacking a .php file and adding the implode function to it instead?

 

Ahhh I thought that was going to work but it just repeats the link 5 times. Werid!