// +------------------------------+
// |     Form Field Functions     |
// +------------------------------+



// ----- Focus Search Field (object, boolean) -----
function focusSearchField(obj, bool)
{
	if (bool) {
		if (obj.value == "Search...") {
			obj.value = "";
		}
	} else if (obj.value == "") {
		obj.value = "Search...";
	}
}



// +-----------------------------+
// |     Print Page Function     |
// +-----------------------------+



/* Support Variables */
var da = (document.all) ? 1 : 0;
var pr = (window.print) ? 1 : 0;
var mac = (navigator.userAgent.indexOf("Mac") != -1); 



/* Print Page Function */
function printPage()
{
	if (pr) // NS4, IE5
		window.print();
	else if (da && !mac) // IE4 (Windows)
		vbPrintPage();
	else // other browsers
		alert("Sorry, your browser doesn't support this feature. Please use the File Menu and select Print.");
	return false;
}



/* Write VB Script */
if (da && !pr && !mac) with (document) {
	writeln('<OBJECT ID="WB" WIDTH="0" HEIGHT="0" CLASSID="clsid:8856F961-340A-11D0-A96B-00C04FD705A2"></OBJECT>');
	writeln('<' + 'SCRIPT LANGUAGE="VBScript">');
	writeln('Sub window_onunload');
	writeln('  On Error Resume Next');
	writeln('  Set WB = nothing');
	writeln('End Sub');
	writeln('Sub vbPrintPage');
	writeln('  OLECMDID_PRINT = 6');
	writeln('  OLECMDEXECOPT_DONTPROMPTUSER = 2');
	writeln('  OLECMDEXECOPT_PROMPTUSER = 1');
	writeln('  On Error Resume Next');
	writeln('  WB.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER');
	writeln('End Sub');
	writeln('<' + '/SCRIPT>');
}