function getOpinionMenu(currentPage, folder){

	var menu = ""

	currentPage = currentPage.substring(currentPage.lastIndexOf("/") + 1)
	
    menu+= "<table BORDER=0 CELLPADDING=3 CELLSPACING=0 width=150>"
    menu+= "<tr><td valign=top><b>Plus d’opinions</b></td></tr>"
    
    menu+= addHeader("Les Autorités de Contrôles")

    menu+= addMenuItem(currentPage, "Académie_américaine_de_pédiatrie.asp", "Académie américaine de pédiatrie", folder)
    menu+= addMenuItem(currentPage, "Autorité_européenne_de_sécurité_des_aliments_(EFSA).asp", "Autorité européenne de sécurité des aliments (EFSA)", folder)
    menu+= addMenuItem(currentPage, "Centres_épidémiologiques.asp", "Centres épidémiologiques", folder)
    menu+= addMenuItem(currentPage, "Comité_britannique_de_la_toxicité_des_aliments_chimiques.asp", "Comité britannique de la toxicité", folder)
    menu+= addMenuItem(currentPage, "Comité_scientifique_de_l’alimentation_humaine.asp", "Comité scientifique de l’alimentation humaine de la CEE 1984", folder)
    menu+= addMenuItem(currentPage, "Stévia_Stévioside_et_Aspartame.asp", "Commission européenne", folder)
    menu+= addMenuItem(currentPage, "Le_Conseil_américain_des_sciences_et_de_la_santé.asp", "Conseil américain des sciences et de la santé", folder)
    menu+= addMenuItem(currentPage, "La_direction_générale_canadienne_la_santé.asp", "Direction générale canadienne la santé", folder)
    menu+= addMenuItem(currentPage, "Food_et_Drug_Administration_Etats-Unis.asp", "Food & Drug Administration des Etats-Unis (USFDA)", folder)
    menu+= addMenuItem(currentPage, "L’utilisation_de_l’aspartame_a_été_approuvée.asp", "FSA (Agence des normes alimentaires), Royaume-Uni", folder)
    menu+= addMenuItem(currentPage, "Le_ministre_hollandais_confirme_l’innocuité_de_l’aspartame.asp", "Ministre hollandais de la Santé publique confirme l’innocuité de l’aspartame", folder)
    menu+= addMenuItem(currentPage, "Rapport_de_l’Institut_danois_pour_l’alimentation.asp", "Rapport de l’Institut danois pour l’alimentation", folder)
    menu+= addMenuItem(currentPage, "Santé_Canada_reconnaît_l'innocuité_de_l'aspartame.asp", "Santé Canada", folder)
    menu+= addHeader("Les Chercheurs")
    menu+= addMenuItem(currentPage, "La_nature_non_scientifique_des_allégations.asp", "Dr A R Rolla, Ecole de médecine de Harvard", folder)
    menu+= addMenuItem(currentPage, "L’aspartame_et_Internet.asp", "Dr A Zehetner et Dr M Mclean, Westmead Hosp, Sydney, Australia", folder)
    menu+= addMenuItem(currentPage, "L'aspartame_et_ses_effets_sur_la_santé.asp", "Prof M Lean and Dr C Hankey, University of Glasgow", folder)
    menu+= addHeader("Les Organisations et Associations")
    menu+= addMenuItem(currentPage, "Le_Conseil_des_affaires_scientifiques.asp", "American Medical Association", folder)
    menu+= addMenuItem(currentPage, "Association_des_diabétiques_américains.asp", "Association des diabétiques américains", folder)
    menu+= addMenuItem(currentPage, "Chemistry_et_Industry.asp", "Chemistry & Industry", folder)
    menu+= addMenuItem(currentPage, "L’aspartame_a_été_accepté_en_Finlande.asp", "Comité national de l’alimentation de Finlande", folder)
    menu+= addMenuItem(currentPage, "L’alerte_inopportune_et_non_corroborée_sur_l’aspartame.asp", "Fondation pour la sclérose en plaques (FSEP)", folder)
    menu+= addMenuItem(currentPage, "Institut_de_l’épilepsie.asp", "Institut de l’épilepsie", folder)
    menu+= addMenuItem(currentPage, "Rapport_de_l’Office_de_la_comptabilité_publique_des_Etats-Unis.asp", "Rapport de l’Office de la comptabilité publique des Etats-Unis", folder)
    menu+= addMenuItem(currentPage, "L’aspartame_est_utilisé_dans_les_boissons.asp", "Syndicat National de Producteurs d'Additifs et d'ingredients alimentaires (SYNPA)", folder)

    if(folder == "")
		menu+= "<tr><td><a class=rmenu href=../opinion.asp><b>Retour au Sommaire</b></a></td></tr>"
    menu+= "</table>"
    
        
    return menu    
        
}   








function addMenuItem(currP, menuItem, txt, fldr){
	var ret
	//txt = menuItem.replace(new RegExp(/\_/g)," ");

	if(currP.toLowerCase() == menuItem.toLowerCase())
		ret = "<tr><td class=rmenusmall>" + txt + "</td></tr>"
    else
		ret = "<tr><td><A class=rmenu HREF=\"" + fldr + menuItem + "\">" + txt + "</A></td></tr>"
    return ret
}     

function addHeader(header){
	return "<tr><td bgcolor=#f0f0f0 class=rmenuhdr>" + header + "</td></tr>"
}