//********** global variables ****************************************************************************************************************************************************
	// email address format checker
	var chk = /^([^<>()\[\]\\\\.,;:\s@\"]+(\.[^<>()\[\]\\\\.,;:\s@\"]+)*)@((([a-záàäçéèêñóòôöüæøå]|#\d+?)([a-z0-9áàäçéèêñóòôöüæøå-]|#\d+?)*([a-z0-9áàäçéèêñóòôöüæøå]|#\d+?)\.)+([a-z]{2,4}))$/i;
	var links_win = 0;
//********************************************************************************************************************************************************************************
//********** check exchange links form and submit ********************************************************************************************************************************
function check_links_form()
{
	var err = 0, si, s = "", sl = " has been set.\n", s2 = " must be selected.\n", h, w, x, y;

	// check company / organisation has been set
	if (!document.link_ex.company_link_name.value.length)
	{
		err++;											// inc error number
		s += err + ". No company or organisation" + sl;							// add error string
	}

	// check email is set & valid format
	if (!document.link_ex.company_email_addr.value.length)
	{
		err++;											// inc error number
		s += err + ". No email address" + sl;							// add error string
	}
	else if (!document.link_ex.company_email_addr.value.match (chk))
	{
		err++;											// inc error number
		s += err + ". An invalid email address" + sl;			// add error string
	}

	// get category index
	si = document.link_ex.category.selectedIndex;

	// check category set value is not null
	if (!document.link_ex.category.options[si].value.length)
	{
		err++;
		s += err + ". No category or a heading with no value" + s2;
	}

	// if category - other - check text set
	if ((document.link_ex.category.options[si].value == "Other") && (!link_ex.other.value.length))
	{
		err++;
		S += err + ". Other category has been selected but other text" + sl;
	}

	// check URL
	if (!document.link_ex.url_name.value.length)
	{
		err++;
		s += err + ". No link URL" + sl;
	}

	// check text set
	if (!document.link_ex.url_text.value.length)
	{
		err++;
		s += err + ". No link URL text" + sl;
	}

	// web page URL with LWD link
	if (!document.link_ex.user_url.value.length)
	{
		err++;
		s += err + ". No URL where www.lakesideworlddarts.co.uk will appear" + sl;
	}

	// if form errors - display
	if (err)
	{
		alert (s);
	}
	else
	{
		// set window width and depth
		w = 650;
		h = 525;

		// centre window
		x = -1;
		y = -1;

		// open reply window
		links_win = open_win (links_win, "links", h, w, "", x, y, "no", "no", "no", "no", "no");

		// submit form
		link_ex.submit ();
	}
}
//********************************************************************************************************************************************************************************